Jangan lupa anda klik tools-reference trus centang Microsoft active dataobject 2.1 library , di jendela code visual basic anda.
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

