O kreiranju DataReporta bi se moglo pisati dosta, ali najosnovnije je da u VB okruzenju ides na meni Project ->Add DataReport.
Kada dodas nov izvestaj, izaberi sa linije kontrola na levoj strani neku od kontrola za prikaz(rptTextBox, rptImage, rptLabel ili rptFunction) da bi prikazao podatke iz BP.

Deo koji je najbitniji jeste da povezes ove kontrole sa poljima u bazi podataka.
Postoje dva nacina:

1. Da koristis DataEnviroment
2. Da koristis programski kod

Ja vise volim drugi nacin, jer daje malo vise kontrole nad izvrsavanjem programa.
Da bi ti bilo jasnije dacu ti deo programa, kod koga se vrsi povezivanje sa BP

Private Sub Command1_Click()
Dim strSQLUpit As String

'Izvor podataka koji se koristi u DataReportu

strSQLUpit = "SELECT SifDivljaci,Naziv,BrojM,BrojZ,Ukupno FROM Divljac"
conVeza.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\baza\Sumadija.mdb;Persist Security Info=False"
conVeza.Open

rsPrivremeni.Sort = "SifDivljaci ASC"
Set rsPrivremeni = conVeza.Execute(strSQLUpit)

'Povezuje se izvestaj sa izvorom podataka
Set DataReport3.DataSource = rsPrivremeni

'Vrsi se prikazivanje vrednosti polja u kontrole izvestaja(dataReporta)

DataReport3.Sections("Section1").Controls.Item("Text1").DataField = rsPrivremeni.Fields(0).Name
DataReport3.Sections("Section1").Controls.Item("Text2").DataField = rsPrivremeni.Fields(1).Name
DataReport3.Sections("Section1").Controls.Item("Text3").DataField = rsPrivremeni.Fields(2).Name
DataReport3.Sections("Section1").Controls.Item("Text4").DataField = rsPrivremeni.Fields(3).Name
DataReport3.Sections("Section1").Controls.Item("Text5").DataField = rsPrivremeni.Fields(4).Name

DataReport3.WindowState = vbMaximized

'Fizicki prikazujemo izvestaj
DataReport3.Show

'Ponistavamo objekte koji su korisceni
Set rsPrivremeni = Nothing
Set conVeza = Nothing

End Sub


ADO je samo tehnologija(fizicka biblioteka) za povezivanje sa BP, tako da se moze koristiti i Access97 BP

DataEnviroment je (kako mu ime kaze) nacin da integrises BP u VB-u , odnosno da na jednom mestu imas sve potrebne podatke za obradu, odnosno prikaz. Ovo je amo ukratko o DataEnviromentu

Uz sitne prepravke, ovo radi izvrsno

Puno hvala

Evo jedno pitanje. Posto imam puno podataka bilo bi korisno da je papir drugacije okrenit, da siri nego vislji. Kako to izvesti?

Koristi Orientation svojstvo DataReport kontrole:

Npr:
datareport3.Orientation = rptOrientLandscape

Da, to bi bilo dobro, al neradi. Kaze "Metod or data member not found".
Kad pisem datareport3.on bi mi trebo ponudit Orientation medjutim, ne ponudi. Datareport3 postoji, to nije problem. Ponudi on druge stvari ali ne i ovu. Sta trebam ukljucit da bi radilo (neku komponentu, referencu, nesto drugo...)???

Hvala

Najnoviji Service Pack.

Mislim da pise da koristi WIN98.
Ja imam isti problem. Imam Win98 SE.

Jel postoji nesto drugo?

Service Pack za Visual Studio 6.0, bre!

Aha... a i to postoji?!
Jel znas odakle se moze skiniti, sa koje adrese?

Data Dynamics Active reports (mislim da je poslednja verzija 2.0 ali proveri na http://www.datadynamics.com) - nekada sam koristio - sjajna alatka za reporte u VB.

Pozdrav

Evo, nasao sam SP2, instalirao i... pokajao se.
Naime, pri pokretanju projekta javi 1000 problema tipa Can't find project or library i otvori mi Reference pri cemu je oznacio pr. WithEvents adoPrimaryRS As Recordset

Sta sad? Probao sam ukljuciti sve i svasta al ocito nisam pronasao ono pravo.
Mozete li pomoci