thanx to mr Purwedi & Geoffrey....
dah jalan programmnya.....
coba dirubah menjadi spt ini:
cn.BeginTrans
qsql = "Delete from tblsend where Tanggal BetWeen #" &
Format(txtTgl,
"mm-dd-yyyy") & "# And #" & Format(txtTgl2, "mm-dd-yyyy") &
"#"
cn.Execute qsql
cn.CommitTrans
rgds
[wwn]
On 9/14/05, Dedy <[EMAIL PROTECTED]>
wrote:
guys,
dimana letak kesalahan script dibawah ini,
cn.BeginTrans
qsql = "Delete from tblsend where Tanggal BetWeen '" &
Format(txtTgl,
"mm-dd-yyyy") & "' And '" & Format(txtTgl2, "mm-dd-yyyy") &
"'"
cn.Execute qsql
cn.CommitTrans
Error message " Data type mismatch in criteria _expression_"
saya dah cek di database(ms Access) type data yg saya pakai date/time
kok, kenapa mismatch ya....
------------------------ Yahoo! Groups Sponsor
--------------------~-->
Fair play? Video games influencing politics. Click and talk back!
http://us.click.yahoo.com/T8sf5C/tzNLAA/TtwFAA/k7folB/TM
--------------------------------------------------------------------~->
Untuk keluar dari millis ini, kirim email kosong ke:
[EMAIL PROTECTED]
Yahoo! Groups Links
<*> To visit your group on the web, go to:
http://groups.yahoo.com/group/Programmer-VB/
<*> To unsubscribe from this group, send an email to:
[EMAIL PROTECTED]
<*> Your use of Yahoo! Groups is subject to:
http://docs.yahoo.com/info/terms/
Untuk keluar dari millis ini, kirim email kosong ke:
[EMAIL PROTECTED]
YAHOO! GROUPS LINKS
|