jangan pake sql yang >= and <= karena itu masih suka mleset mending pake
dim db as new adodc.connection dim rs as new adodc.recordset db.Open "provider=Microsoft.Jet.OLEDB.4.0;data source= " & c:/data.mdb & ";Persist Security Info=False" Set rs = New ADODB.Recordset rs.Open "select * from table1 where between tgl 1 and tgl2", db, adOpenDynamic, adLockPessimistic Report.Database.SetDataSource rs, 3, 1 Screen.MousePointer = vbHourglass CRViewer1.ReportSource = Report CRViewer1.ViewReport Screen.MousePointer = vbDefault Report.DiscardSavedData --- On Tue, 7/8/08, Tamiya FC <[EMAIL PROTECTED]> wrote: From: Tamiya FC <[EMAIL PROTECTED]> Subject: [Programmer-VB] Source untuk print laporan berdasarkan date From dan to To: [email protected] Date: Tuesday, July 8, 2008, 3:42 PM aku minta tolong dong untuk Source untuk print laporan dengan cristal report berdasarkan date From dan to gimana ya mohon bantuannya terima kasih
