sql = "select * from login and userid like ' " & txt_NIP.Text & " ' "

harusnya :

sql = "select * from login Where userid like ' " & txt_NIP.Text & " ' "

 

  _____  

From: [email protected] [mailto:[EMAIL PROTECTED]
On Behalf Of farid anywhere
Sent: Wednesday, December 05, 2007 5:12 AM
To: [email protected]
Subject: [Programmer-VB] BIsa bantuin proses edit yang error

 

Dear all VB master,

saya mau nanya masalah proses edit yang bingung, di form yang lain jalan
tapi disini koq error, kira-kira apa ya...?

If conn.State = adStateOpen Then conn.Close
cls_pub.connect_db

If rsuplog.State = adStateOpen Then rsuplog.Close
rsuplog.CursorLocation = adUseClient

sql = "select * from login and userid like ' " & txt_NIP.Text & " ' "
rsuplog.Open sql, conn, adOpenKeyset, adLockOptimistic

If rsuplog.RecordCount <> 0 Then
With rsuplog
.Fields(0) = txt_NIP.Text
.Fields(1) = txt_pwd.Text
.Fields(3) = cmb_Hak.Text
.Fields(2) = txt_nama.Text
.Update

End With
End If

Pesan errornya seperti ini "Insufficient key column information for updating
or refreshing".
Atas jawaban rekan-rekan sekalian , makasih banyak ya....

__________________________________________________________
Be a better pen pal. 
Text or chat with friends inside Yahoo! Mail. See how. http://overview.
<http://overview.mail.yahoo.com/> mail.yahoo.com/

 

Kirim email ke