On 9/20/06, mr_setiawan <[EMAIL PROTECTED]> wrote:

aku lagi coba bikin Crystal Repport dan punya formula sbb
CrystalReport1.ReportFileName = App.Path & "\rpt_kwitansi_BARU5.rpt"
If Check1.Value = 0 Then
CrystalReport1.SelectionFormula = "{kwitansi.tgl_input} = " &
Date & DTP_awal.Day & "," & DTP_awal.Month & "," & DTP_awal.Year & ")"
DTP_akhir.Month & "," & DTP_akhir.Day & ")"

knp code-nya ada tanda kurung tutup, tapi kurung bukanya ga ada ya?
 
   knp juga "Date & Date_awal.Day", coba cek dulu codingnya d. thx.

 

CrystalReport1.SelectionFormula + " And {kwitansi.tgl_input} <= Date
(" & DTP_akhir.Year & "," & DTP_akhir.Month & "," & DTP_akhir.Day
& ")"
Else
CrystalReport1.SelectionFormula = ""
End If
CrystalReport1.WindowState = crptMaximized
CrystalReport1.RetrieveDataFiles
CrystalReport1.Action = "">
tapi TGL selelu muncul semua, apa formulanya salh ya.. please bantuin




--
Regards,Layong LimPT. Indomobil Trada NasionalMIS-IT DepartmentPhone : (021) 856-9117Ext : 1305 __._,_.___

Wahana Programmer Groups Links

<*> Untuk mengunjungi sponsor milis ini, klik link berikut:
    http://wahanaprogrammer.net

<*> Untuk menghubungi owner milis ini, kirim email ke:
    [EMAIL PROTECTED]

<*> Konsultasi pemrogramman bisa chat disini:
    Yahoo! Messenger: wahanaprogrammer





SPONSORED LINKS
Indonesia phone card Programmer Indonesia tour
Indonesia travel Indonesia flower

Your email settings: Individual Email|Traditional
Change settings via the Web (Yahoo! ID required)
Change settings via email: Switch delivery to Daily Digest | Switch to Fully Featured
Visit Your Group | Yahoo! Groups Terms of Use | Unsubscribe

__,_._,___

Kirim email ke