Alhamdulillah hari ini bisa posting kembali berbagi mengenai hal yang telah didapatkan, mengenai masalah pada visal basic 6, mungkin masalah ini untuk orang awam seperti saya :D :'( masalah ini muncul ketika saya akan menyimpan data ke database acces yang mana pada data tersebut terdapat karakter tanda kutif ( ' ), seperti Assalamu'alaikum,, ada tanda kutifnya kan ?... hehe lanjuuttt.....
kemudian saya cari di Om G gak gek ketemu juga, dan alhamdulillah saya dapatkan solusinya dari kang admin http://coding4ever.wordpress.com, terimakasih atas solusinya kang.... :) Semoga menjadi amal ibadah yang baik.
Langsung aja :
Sesuaikan kode nya seperti dibawah ini :
Private Function rep(ByVal s As String) As String
rep = Replace(s, "'", "''")
End Function
Private Sub cmdTes_Click()
strsql = "INSERT INTO tabel (field_1, field_2) VALUES ('" & rep(text1.Text) & "', '" & rep(text2.Text) & "')"
End Sub
Mudah kan?.. hehehe
Semoga Bermanfaat.
Wassalamu'alaikum
.jpg)
