Kalo pake conection ADP standard bisa otomatis berubah nggak mas kalo password sa di sql server nya berubah?
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 7:34 PM Subject: [belajar-access] Re: Access Runtime 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. > > >
