Predmet:Re: Cristal report Konekcija na Server

---

Evo instalisao sam i isprobao pa mi nije jasno gdje si zapeo.
Redosled mog rada:
Napravio sam konekciju:
ControlPanel--->Odbc32 i nova konekcija te na SQl i dao joj ime Kristal.
Podigao da pravim izvještaj novi odabrao odbc konekciju i odabrao kristal te napravio izvjestaj.

Sada VB
Nova app. vb
Dodao ocx Srystl32.ocx te na formu dodao kontrolu koju sam nazvao CrystalReport

Dodao jos jedan komandni taster pod imenom Command1
Kod ispod njega
Private Sub Command1_Click()

With CrystalReport
.ReportFileName = GetAppPath() & "report2.rpt"
.SQLQuery = ("SELECT * FROM Agregati WHERE Redoslijed=2")
.Password = ""
.Destination = crptToWindow
.Action = 1 ' 1 = "Run the Report"
End With

End Sub

---