Thx mas Sofyan Saya sudah buat seperti itu code-nya saya dapet tambahan juga dari code sample-nya SQL Server 2000 (adomain.vbp), dan tambahan juga dari Module-"StartUp"nya mas Haer di GIPustaka, dan Smaple Database Northwind.
Code yang mas Sofyan tulis : 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" berarti user dan password ke SQL Servernya dibuat di VBA Code-nya ya ? ga bisa otomatis rubah dong kalau di SQL Server Enterprise Manager (atau dari tempat lain) dirubah. Juga kan "PERSIST SECURITY INFO=FALSE" berarti Password tidak disave, krn kalau password di save nilainya adalah TRUE ?? But, anyway saya coba dulu.. nanti hasilnya kita diskusikan lagi Thx Salam Bobby --- In [email protected], "Sofyan Efendi" <[EMAIL PROTECTED]> wrote: > > Setuju mas Bobby, emang sih file access 2000 kalo mo di mde-in harus pake access 2000, 2002 sama 2002 dan 2003 sama 2003. Kalo rumus data link properties ADP, bisa buat sendiri lho... > > - Untuk mengetahui suatu connection di ADP, procedurenya adalah: > > Public Function LiatKoneksiADP() > Dim objCurrent As Object > Set objCurrent = Application.CurrentProject > MsgBox "Koneksi ADP ini pake " & objCurrent.BaseConnectionString > End Function > > - Untuk membuka suatu connection di ADP, procedurenya adalah: > > Public Function BukaKoneksiADP() > 'Harap diganti INITIAL CATALOG, DATA SOURCE, dan password SA nya sesuai pada PC nya > 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 > > bisa nggak nya send balik, ok? > > Wassalaamu'alaikum Warahmatullahi Wabarakatuh, > Sofyan Efendi. > Ingin belajar Excel? Pls send blank mail to: > [EMAIL PROTECTED] > ----- Original Message ----- > From: Bobby > To: [email protected] > Sent: Tuesday, July 31, 2007 3:13 PM > Subject: [belajar-access] Re: Access Runtime > > > Mas Sofyan > > Kalau formatnya pake Access 2000 nanti ga bisa > dibuat mde/ade dong.... > > Saya juga sedang coba-coba access 2003 runtime.. > salah satu masalah yang muncul ialah > tidak munculnya data link properties (saya pake adp).. > > Sekarang sedang mencoba bikin form data link properties sendiri > tapi sedang kesulitan untuk membuat code utk > save password utk login ke SQL Server (loginnya pake > password). > Gitu.... > > Mungkin ada yang bisa bantu..... > > Salam > Bobby > --- In [email protected], G4ND4 <putra.ganda@> wrote: > > > > Hello Sofyan, > > > > Monday, July 30, 2007, 10:22:07 AM, you wrote: > > > > > > > > > > Sedikit nambahin : Format filenya kudu pake Access 2000 ya. Juga > > > kalo pake tambahan activeX yg bukan bawaan access, kudu di copy > > > juga ke masing-masing PC yang menggunakan program tsb ... > > > > Terima kasih atas petuahnya, Mas sofyan dan Mas Erwin. Akan saya coba > dulu. > > >
