Nån som har nåt bra kodexempel på hur man bygger en dynamisk rapport i Vb med Crystal Reports? Jag vill bara ha ett exempel på hur man bygger en rapport med kod från Vb, där man kan manipulera SQL-Strängen som rapporten ska baseras på...ungefär nåt sånt Jag använder 8 men om det fungerar i din version vet jag ej ¿ Det verkar som att det är annorlunda i min "gamla" version. Jag får kämpa vidare och leta lösningar, om jag inte får tag på en nyare version snart...Crystal Report
Sv: Crystal Report
Sv: Crystal Report
Dim Report As New CrystalReport1
Private con As ADODB.Connection
Private rec As ADODB.Recordset
Private Sub Form_Load()
Dim sql As String
sql = "select * from customer where customer like '" & Text1.text & "%'"
Set con = New ADODB.Connection
con.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\Lojalitetssystem.mdb;Persist Security Info=False"
con.Open
Set rec = New ADODB.Recordset
rec.Open sql, con, adOpenDynamic, adLockOptimistic
Report.Database.SetDataSource rec
Screen.MousePointer = vbHourglass
CRViewer1.ReportSource = Report
CRViewer1.ViewReport
Screen.MousePointer = vbDefault
CRViewer1.Zoom 100
Report.PaperSize = crPaperA4
End SubSv: Crystal Report