Aha....., Nisam procitao sve postove... ali sad kontam...
Imam jedno resenje koje je funcionalno 100 %, samo nije bas najelegantnije, ali ce ti posluziti posto je jednostavno za izradu.
Naci prvo terbas da nastavis jednu bazu koju ces privremeno koristiti, i potom se podaci brisu iz nje, ili na kraju rada ili na pocetku novog rada..
Ovim resenjem ne samo da ces moci tri nego neograniceni broj uplatnica na jednom reportu
Evo ga:
1.Trebas da napravi bazu podataka koja ce da sadrzi field ove sa podacima koje zelis da ti forma ispisuje (ime, prezime, adresa, primalac, .....) preporucujem da koristis visual data manager, ako googlas trazi VisData
2.Napravis formu preko koje ces da unosis podatke u tu bazu sa svim pomocnim tasterima, imam nekih ideja i ako buedem imao vremena Izradicu ti jednu. (predpostavljam da ovo do sad znas da radis)
E dalje....
E sad o Data Reportu.... On je dosta smotan dodatak, ja ga bas ne gotivim, i ima dosta nedostatka, to sto trebas da znas o njemu je to da on u sekciji jedan >Detail (Section1)< Izcitava podatke iz baze i ispisuje ih po odredjenom kriterijumu jedan ispod drugog, koliko ih ima, pa makar bilo vise stranica on ce ih dodavati. Sto ti vidis, kad ga ubacis u projekat je Report Heather i Footer (section 2, 3) Oni se poljavljulju na pocetku izvestaja i kraju izvestaja, Imas Page Heathe i Footer (section 4, 5) koji se poljavljulju na vrhu i dnu svaake stranice reporta, tu mozes ubacivati neke funkcije, npr da ti sabire sve svote koje se nalaze na Reportu, sto tebi moze cak i da pomogne, datum, itd itd,. I naravno ima Details (section 1) o kojem sam ti vec pricao, nama je sad on potreban.
Ja ti preporucujem da pogasis Section 2, 3, 4, 5 jel bi ti oni smetali pri pravljenju rasporeda, kasnije ih mozes upotrebiti.
Takodje ti preporucujem da merne jedinice koje koristi VB (twip) prebacis u cm ili mm radi toga da bi lakse mogao da napravis raspored, Ti trebas da napravis samo jednu semu za uplatnicu ostalo ce uraditi vb, tj DataReport, u section 1 ga pravis
Ubaci tekst boxove za promenjljive, tj ime prezime,... a za ispise labele.
Imas Vise opcija kako da povezes report sa bazom bodataka.
Ako si vise vizualan tip onda ti preporucujem Data Environment Designer, ali ako hoces na standardni nacin onda nema druge neg pisati kod.
u daljem tekstu cu ti dodati i cod.
ako si se odlucio za kod, sto ti ja preporucujem onda trebas da uradis veze, tj jest da podesis data report>> record source, i za svaki txt box datafield i data member. ako radis preko DED a onda neke korake mozes da izostavis ali si i donekle ogranicen.
e pa ja mislim da je donekle to to
Evo ti cod za pravljenje i pozivanje konekcije:
Code:
Private Sub Form_Load()
Set conn = New ADODB.Connection
conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=" & App.Path & "\uplatnice.mdb;" & _ '<< ovo uplatnice.mdb je ime baze podataka,
"Persist Security Info=False"
End Sub
Private Sub cmdReport_Click()
Set rs = conn.Execute("SELECT *FROM uplatnice")
Set datareport1.DataSource = rs '<< datareport1 je ime reporta
rptTitles.Show vbModal
End Sub
Private Sub Form_Unload(Cancel As Integer)
conn.Close
End Sub
u kod sam dodao i red za podesavanje recordsource a tako da to ne moras da podesavas
Tu ce ti se verovatno javiti greska da se ne refreshuje report, ali taj problem imam i ja i nisam ga jos elegantno resio posto sam sve ko majmun radio preko ded a da bi ustedeo vreme ne misleci o posledicama i sad se mucim, ali ako radis sa ADO recordsetom podataka onda to nije problem
Probaj pa pitaj, postavicu neki projekat sa reportom, ako ga nadjem.
ordamir