Biasanya sih saya caranya begini Dim rst as new adodb.recordset
Set rst = new adodb.recordset Rst.open "Tran_D" , currentproject.connection ,adopenstatic ,adlockoptimistic Semoga membantu From: [email protected] [mailto:[email protected]] On Behalf Of Eko Puji Santoso Sent: Saturday, August 29, 2009 4:44 PM To: [email protected] Subject: [belajar-access] RE : OpenRecordset Type mismatch ?? Dim dbs As Database Dim rst As Recordset Set dbs = CurrentDb() Set rst = dbs.OpenRecordset("Tran_D", , adOpenStatic, adLockOptimistic) Mohon pencerahan.. terima kasih 2009/8/29 HENDRA <[email protected]> Kl boleh tahu Anda deklarasi kan rst sebagai apa, dan dbs sebagai apa? From: [email protected] [mailto:[email protected]] On Behalf Of Eko Puji Santoso Sent: Saturday, August 29, 2009 1:59 PM To: [email protected] Subject: [belajar-access] OpenRecordset Type mismatch ?? sy sudah coba Set rst = dbs.Open("Tran_D", , adOpenStatic, adLockOptimistic) tp eror spt ini : <http://mail.google.com/mail/?ui=2&ik=6d9c93d754&view=att&th=1236504a99e33c6 a&attid=0.1&disp=emb&zw> sy ganti dgn : Set rst = dbs.OpenRecordset("Tran_D", , adOpenStatic, adLockOptimistic) hasilnya spt ini <http://mail.google.com/mail/?ui=2&ik=6d9c93d754&view=att&th=1236504a99e33c6 a&attid=0.2&disp=emb&zw> mohon solusinya. Terima kasih. Salam, Eko PS 2009/8/29 HENDRA <[email protected]> Coba ubah menjadi Set rst = dbs.open("tblpenj" , , adOpenStatic, adLockOptimistic) Semoga membantu
