dear pak, sebenarnya ada pak, cuma bapak perlu tahu dulu connectionnya pake apa....sekalian aja ya saya kasih semuanya pak:
- untuk mengetahui suatu connection di adp, procedurenya adalah: public function showconnectstring() dim objcurrent as object set objcurrent = application.currentproject msgbox "connectionnya pake: " & objcurrent.baseconnectionstring end function - untuk membuka suatu connection di adp, procedurenya adalah: public function openadpconnection() 'harap diganti initial catalog, data source, dan password sa nya, ini contoh aja yah pak... 'kalo bingung, contek aja hasil dari procedure showconnectstring() diatas pak... application.currentproject.openconnection "provider=sqloledb.1;persist security info=false;initial catalog=northwind;data source=mis\sqlexpress;use procedure for prepare=1;auto translate=true;workstation id=mis", "sa", "mysapassword" end function - untuk menutup suatu connection di adp, procedurenya adalah: public function closeadpconnection() application.currentproject.closeconnection end function Wassalaamu'alaikum Warahmatullahi Wabarakatuh, Sofyan Efendi. http://opi.110mb.com ----- Original Message ----- From: "andhit_r" <[EMAIL PROTECTED]> To: <[email protected]> Sent: Thursday, August 07, 2008 6:53 PM Subject: [belajar-access] alternatif pengganti datalink properties > Dear rekan-rekan pengguna access, > > Ada yang pernah membuat cara alternatif membuat koneksi ke SQL server > tanpa menggunakan "docmd.runcommand accmdconnection"?. Kalau ada bisa > tlg dishare ... > > Best Regard, > > andhit > > > ------------------------------------ > > SPAM IS PROHIBITEDYahoo! Groups Links > > > >
