tSql = "Update Db_SJH Set Status = -1 where No_Sj= '" & Me.Sub1!No_SJ & "'"
Salam Hangat dan Jabat Erat Murid Belajar Access EdyWiyono From: [email protected] [mailto:[email protected]] On Behalf Of bingtiong Sent: Friday, July 16, 2010 11:59 To: [email protected] Subject: [belajar-access] Update Field di Database atau Query Salam Access, Saya lagi buat skenario bahwa kalau status "FALSE" maka bisa di print, tetapi sehabis print maka status dirubah menjadi "TRUE" saya sudah coba dgn statement dibawah ini : If Me.Sub1!Status = False Then If Not IsNull(Me.Sub1!No_SJ) Then sWhereP = "[No_SJ] = '" & Me.Sub1!No_SJ & "'" DoCmd.OpenReport "Rpt_SJ", acViewPreview, , sWhereP tSql = "Update Db_SJH Set Status = '" & "True" & "' where No_Sj= '" & Me.Sub1!No_SJ & "' ;" DoCmd.RunSQL tSql End If Else MsgBox "Surat Jalan Sudah Pernah Di Cetak !!", vbOKOnly,namaModul End If Kenapa timbul message : Microsoft Office Access didn't update 1 field(s)due to a type conversion failure .............................. Kenapa yach ? thk's for support nya.
