Salam utk semua anggota milis

Saya punya koding seperti ini

If sRec.State = adStateOpen Then sRec.Close
   sComm.CommandText = "select * from exim_beacukai_trc_bc23 where no
='" & Text1(23).Text & "'"
   sComm.ActiveConnection = sConn
   sRec.Open sComm, , adOpenDynamic, adLockOptimistic

    If Not sRec.EOF Then
        sRec("kode") = Text1(24).Text
        srec.update
    end if

tetapi muncul message update failed because row to update not found,
kok bisa yah, padahal didatabase ada, dan saya sudah debug ( F8 )
query diatas, tapi saat mau update muncul message itu lagi, kadang
kalau saya develop program, kadang muncul kasus seperti ini, kadang
tidak muncul di program lainnya, apakah hal ini dipengaruhi oleh
banyaknya field dalam tabel tersebut ??

please advicenya, karena repot sekali jika saya harus ganti koding
menjadi query 'update bla bla bla...'

Please advicenya, anggota milis

saya pakai vb 6, cr 9 + mysql + mysqlodbc versi 3.5

Best Regard's

Benny

Kirim email ke