Dear Mr. Kid, Berkaitan dengan penjelasan Mr. Kid ini, pernahkah dibahas dimilis tentang hal tersebut. kalau pernah dibahas, mohon info judulnya.
Regards, Harry ________________________________ Dari: Kid Mr. <[email protected]> Kepada: [email protected] Dikirim: Selasa, 13 Maret 2012 22:25 Judul: Re: [belajar-excel] Mohon bantuan Input CommandButton dari 2 PC ke 1 Bank Data Mengambil, menulis, menghapus data di sebuah database (baik berupa spreadsheet berkaidah database maupun di sebuah database dari aplikasi mesin database tertentu) dapat dilakukan melalui data connection. Data connection membutuhkan sebuah data provider. Interaksi dengan aplikasi interface membutuhkan sebuah object. Jadi, harus ada object yang dapat memanfaatkan data provider untuk dapat membangun koneksi dan berkomunikasi dengan database. MisalnyaVBA Excel dengan ADO. ADO adalah object untuk berhubungan dengan data provider. Object ini akan memudahkan aplikasi interface untuk berkomunikasi aktif dengan database. Data provider bisa dipilih sesuai database yang digunakan. Misal, untuk MS Access atau Spreadsheet Excel yang berkaidah database bisa menggunakan data provider MS Jet OLEDB (versi 2003 kebawah) atau MS ACE OLEDB (versi 2007 keatas). Jadi, gambaran umumnya : Database : (bisa berupa) 1. sebuah folder berisi text file (txt) yang isinya berkaidah database 2. database dari aplikasi database sederhana (seperti ms Access) 3. spreadsheet berkaidah database 4. database dari aplikasi DBMS yang besar seperti MS SQL Server, ORACLE, MySQL, dsb Data Provider : Dipilih berdasar database yang digunakan. Banyak webpage yang membahas tentang hal ini Data Object : Untuk aplikasi Excel VBA, bisa menggunakan ADO daripada DAO. Bahasa komunikasi dengan database : Structured Query Language (SQL). SQL dengan varian yang lebih native dengan database akan lebih baik. Syarat utama sebuah spreadsheet untuk bisa menggunakan hal seperti ini : -> Membangun konsep pengolahan data berkaidah database -> Menyusun data-data dasar (data source) berkaidah database Jadi, akan perlu sedikit pengubahan cara berpikir dari aplikasi yang sudah Bapak buat agar bisa menerapkan hal di atas. Wassalam, Kid. On Tue, Mar 13, 2012 at 21:06, Harry <[email protected]> wrote: > >Dear Mr. Kid, > >Lebih jauh mengenai materi ini, bisa atau kemungkinan bisa jika file databasenya tidak perlu dibuka. Dengan kata lain; untuk mendapatkan data dan mengirimkan data dari file database (file yang berbada= "d:\data\database.xls") kita tidak perlu membuka dan/atau tidak perlu mengaktifkan file database tersebut. > >Sebagaimana rumus dari Mr. kid sebelumnya sbb: >set wbkdb=workbooks.open "d:\data\database.xls" >rumus tersebut berarti kita harus membuka file databasenya walaupun setelah itu bisa otomatis tertutup sendiri setelah mengambil dan mengirimkan data dari dan ke file database tersebut. > >Karena untuk proses buka dan tutup file database sangat memakan waktu sehingga hasilnya tidak efektif dan sangat tidak efisien. >Mohon berkenan informasi. > >Regards, > > >Harry > > > > >________________________________ > Dari: Kid Mr. <[email protected]> >Kepada: [email protected] > >Dikirim: Jumat, 24 Februari 2012 23:24 > >Judul: Re: [belajar-excel] Mohon bantuan Input CommandButton dari 2 PC ke 1 >Bank Data > > > > >Bisa Pak. >Urutan prosesnya : >1. Buka file database >2. Copy nilai-nilai terkait yang ada di database ke sebuah sheet di file >aplikasi >3. Tampilkan ke setiap control yang dikehendaki. > >Selamat berkreasi. >Kid. > > >On Fri, Feb 24, 2012 at 21:29, Harry <[email protected]> wrote: > > >> >>Dear Mr. Kid, >> >> >>Terima kasih atas berkenan penjelasan dan lampirannya. Somoga bermanfaat. >> >>Masih berkenaan dengan lampiran yang saya kirimkantersebut, apakah >>CommandButton ("STATISTIK") bisa dijelaskan bisa atau tidaknya form tersebut >>dijalankan...??? >> >> >>Terima kasih & Wassalam, >> >> >> >> >>Harry >> >> >> >> >>________________________________ >> Dari: Kid Mr. <[email protected]> >>Kepada: [email protected] >>Dikirim: Kamis, 23 Februari 2012 21:40 >>Judul: Re: [belajar-excel] Mohon bantuan Input CommandButton dari 2 PC ke 1 >>Bank Data >> >> >> >> >>Coba bapak telusuri kembali seluruh isi thread yang berasal dari bapak sejak >>mulai tentang hal ini. Disana ada cara dengan ADO Connections. >>Proses buka tutup koneksi juga telah dijabarkan disana. Cara ini umumnya >>lebih praktis dan cepat. >> >>Jika menggunakan object workbook, maka file harus dibuka. Sedangkan kendala >>yang Bapak sampaikan adalah proses buka dan tutup database berlangsung lama. >>Artinya, proses buka tutup akan tidak memungkinkan. >> >>Jika kemudian menjadi memungkinkan, kendala yang muncul berikutnya adalah >>penggunaan bersama. >>Meski workbook database terbuka terus, tetapi terbuka dimana ? >>Object workbook membutuhkan rujukan yang jelas lokasi terbukanya workbook di >>komputer lokal (setahu saya). Untuk membuka workbook tertentu, bisa di >>komputer manapun dalam jaringan, tetapi si workbook exist dalam proses >>windows komputer lokal si user. >> >>File terlampir adalah contoh untuk mengetahui, apakah file datatbase dibuka >>dalam keadaan ReadOnly (karena sedang dibuka oleh instansi Excel lain entah >>dimana). >>Script diletakkan pada form frmregistrasi pada event click commandbutton >>cmdAdd >>penggalan beberapa baris awal script dalam event tersebut sampai dengan blok >>cek status readonly : >>Private Sub cmdAdd_Click() >> Dim iRow As Long, Reg As Range, oCtrl As Control >> >> '---------------------------- >> 'Kid : 2012-01-29 : modified >> 'Kid : 2012-02-23 : tambahkan blok cek workbook terbuka as read only >> '---------------------------- >> 'deklarasi variabel workbook >> Dim wbkA As Workbook, wbkDB As Workbook >> >> 'init workbooknya >> Set wbkA = ThisWorkbook >> >> '--- WBK READ ONLY ??? ---' >> START >> Dim lTry As Long, lJeda As Long >> Application.ScreenUpdating = False >> Application.DisplayAlerts = False >>CobaBuka: >> For lTry = 1 To 20 >> Set wbkDB = Workbooks.Open(wbkA.Path & "\database.xls") >> If wbkDB.ReadOnly Then >> wbkDB.Close False >> If lTry = 20 Then >> If MsgBox("Sudah dicoba membuka " & lTry & _ >> " kali, dan masih digunakan oleh instansi Excel yang >>lain" & vbCrLf & _ >> "Coba lagi ?", vbExclamation + vbYesNo, "Akses ke >>database") = vbYes Then >> GoTo CobaBuka >> Else >> Application.ScreenUpdating = False >> Exit Sub >> End If >> End If >> Else >> wbkA.Activate >> Exit For >> End If >> For lJeda = 1 To 100000000 >> Next lJeda >> Next lTry >> Application.ScreenUpdating = True >> '--- WBK READ ONLY ??? ---' >> END >> >>Cara mencobanya : >>1. Letakkan file terlampir bersama file database.xls >>2. buka windows explorer, lalu buka file database dari windows explorer >>(double click) >>3. buka file aplikasi dari windows explorer >>4. klik tombol registrasi >>5. klik tombol save >> >>Wassalam. >>Kid. >> >> >>On Tue, Feb 21, 2012 at 19:52, Harry <[email protected]> wrote: >> >> >>> >>>Dear BeExceller, >>> >>>Mohon bantuan akan pertanyaan saya sebagaimana file terlampir. >>> >>>Terima kasih atas berkenan jawaban dan bantuannya. >>> >>>Regards, >>> >>>Harry >>> >>> >>>N/B: >>> >>>Wbk APLIKASI selalu Open sedangkan Wbk DATABASE selalu tertutup (tidak >>>aktif) pada file yang berbada >>> >> >> >> > > >
