Waw kalo db access ditaruh di sharing folder udah bisa diakses multi user. Saya coba buka db di sharing folder statusnya db-nya kan lock, apakah user lain bisa update db juga saat itu sedangkan status db masih status locked ??
----- Original Message ----- From: Slamet To: [email protected] Sent: Sunday, January 06, 2013 10:52 AM Subject: Re: [belajar-excel] Koleksi hasil query Ikutan urun rembug, db access nya di letakkan di sharing folder yang dapat di akses oleh seluruh user, Sedangkan excel nya di taruh di masing-masing PC user (ini akan merepotkan jika ada enhanchement terhadap aplikasi yang dibuat, karena harus mencopy file aplikasi master di PC setiap user) atau bisa juga tetap di sharing folder dengan satu aplikasi excel dengan access read only) Semangat..... On 1/5/2013 10:31 AM, Heru Safrudin wrote: Dear Mr.Kid, Wah ada harapan nih, tapi gimana cara share db-nya ms. access ? kalo excel bisa pake share workbook Regards, Heru Safrudin ----- Original Message ----- From: Mr. Kid To: [email protected] Sent: Friday, January 04, 2013 3:42 PM Subject: Re: [belajar-excel] Koleksi hasil query Bisa dengan kondisi : 1. db di share 2. excel yang digunakan adalah copy-an (bukan 1 file di share) Wassalam, Kid. 2013/1/4 Heru Safrudin <[email protected]> Waw cantik sekali... Thanks Oh ya misalkan saya bikin aplikasi di excel yg dipakai beberapa user, bisakah beberapa user mengupdate data yg saya simpan di file access (mdb) sekaligus secara bersamaan ? Kalau nggak bisa adakah trik untuk mengakali ? Pada tanggal 04/01/13, Mr. Kid [email protected]> menulis: > Hai Heru, > > 1. Jika ingin copy ke range tertentu seluruh hasil open recordset, gunakan > method CopyFromRecordset >>> misal akan di salin mulai baris 7 kolom A > sheets("nama sheet tujuan").range("a7").copyfromrecordset rs 'rs > adalah variabel record set yang sudah berisi dataset hasil query > > 2. Jika ingin loop setiap data >>> usai open recordset > > rs.movefirst > do while not rs.eof > 'proses disini > rs.movenext > loop > > Wassalam, > Kid. > > 2013/1/4 Heru Safrudin [email protected]> > >> ** >> >> >> Dear Mr Kid >> >> Menampilkan data di Tabel1 yang tidak ada di Tabel2 atas petunjuk Mr. >> Kid Alhamdulillah udah berhasil. Nah sekarang bagaimana menampilkan >> koleksi hasil query berikut ini menggunakan For each .... >> >> ConnectDB >> RS.Open "SELECT P2.JOB FROM P2 P2 LEFT OUTER JOIN P3 P3 ON P2.JOB = >> P3.JOB WHERE (P3.JOB Is Null)", CON, adOpenKeyset, adLockOptimistic >> For each data ................ >> MsgBox data >> Next >> RS.Close >> DisconnectDB >> >> -- >> Regards, >> >> Heru Safrudin >> >> Pak Heru, >> >> Kedua tabel terpisah loh ya, bukan jadi 2 kolom berjejer demikian, >> kecuali jika definisi tabel dalam query didefinisikan dengan detil >> mengikuti kolomnya. >> Coba pelajari SQL tentang LEFT OUTER JOIN clause dan WHERE clause. >> Kira-kira bunyinya : >> SELECT dt1.kolom1 >> FROM Table1 AS dt1 >> LEFT OUTER JOIN Table2 AS dt2 >> ON dt1.kolom1=dt2.kolom1 >> WHERE dt2.kolom1 IS NULL >> >> Wassalam, >> Kid. >> >> > -- Regards, Heru Safrudin
