________________________________
From: Eko Puji Santoso Sent: Saturday, August 29, 2009 4:44 PM To: '[email protected]' Subject: 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] <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=1236504a99e 33c6a&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=1236504a99e 33c6a&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
