hallo pakar access semua,
saya membuat report dengan nama "CultureDeliveryRpt2" dan didalam report
tsb ada field "Delivery Date" kemudian akan saya buka report tsb
menggunakan VBA sbb:
Private Sub CmdCultureDelivery_Click()
On Error GoTo Err_CmdCultureDelivery_Click
Dim stDocName As String
Dim datDeliveryDate As Date
stDocName = "CultureDeliveryRpt2"
datDeliveryDate = InputBox("Masukan tangal Delivey Date")
DoCmd.OpenReport stDocName, acPreview, , "Delivery Date = '" &
datDeliveryDate & "'"
Exit_CmdCultureDelivery_Click:
Exit Sub
Err_CmdCultureDelivery_Click:
MsgBox Err.Description
Resume Exit_CmdCultureDelivery_Click
End Sub
setelah diklik muncul inputbox kemudian saya masukan tanggal 25/02/2010
tapi report-nya tidak terbuka malah keluar error sbb:
Syntax arror (missing operator) in query expression '(Delivery Date =
'25/03/2010')'
kenapa ya?
