Pemrograman Database dengan ADO Code

'Deskripsi: Contoh source code untuk menangani database, lengkap dengan
'           fungsi/prosedur menambah, menyimpan, mengedit, menghapus,
'           navigasi, mencari pertama, mencari berikutnya, memfilter, dan
'           menyortir data. Sangat cocok untuk digunakan sebagai template
'           pemrograman database menggunakan coding yang memerlukan
'           validasi data dan penanganan khusus lainnya.
'           Menggunakan reference Microsoft ActiveX Data Objects 2.0 Library
'           dan component DataGrid untuk penanganan data.
'Pembuat  : Masino Sinaga (masino_sinaga@posindonesia.co.id)
'Hari/Tgl : Sabtu, 11 Mei 2002
'Modifik. : Jumat, 31 Mei 2002
'Persiapan: 1. Buat 1 Project baru dengan 2 Form, beri nama frmADOCode
'              dan frmInfo.
'           2. Pada frmData (utilitas database), tambahkan sebagai berikut:
'              * TextBox:
'                - txtFields(0), set properti DataField = NIM
'                - txtFields(1), set properti DataField = Nama
'                - txtFields(2), set properti DataField = Nippos
'                - txtFields(3), set properti DataField = Alamat
'                - txtFields(4), set properti DataField = Tgl_lahir
'              * DataGrid, Name = grdDataGrid
'              * Picturebox, Name = picStatBox, di dalamnya tambahkan:
'                - cmdFirst       (Commandbutton)
'                - cmdPrevious    (Commandbutton)
'                - cmdNext        (Commandbutton)
'                - cmdLast        (Commandbutton)
'                - lblStatus      (Label)
'              * Picturebox, Name = picButtons, di dalamnya tambahkan:
'                - cmdAdd         (Commandbutton)
'                - cmdUpdate      (Commandbutton)
'                - cmdCancel      (Commandbutton)
'                - cmdDelete      (Commandbutton)
'                - cmdEdit        (Commandbutton)
'                - cmdRefresh     (Commandbutton)
'                - cmdAbout       (Commandbutton)
'                - cmdClose       (Commandbutton)
'              * Picturebox, Name = picUtility, di dalamnya tambahkan:
'                - cmdFindFirst   (Commandbutton)
'                - cmdFindNext    (Commandbutton)
'                - cmdView        (Commandbutton)
'                - cmdClearSearch (Commandbutton)
'                - cmdFilter      (Commandbutton)
'                - cmdUnFilter    (Commandbutton)
'                - cmdSortASC     (Commandbutton)
'                - cmdSortDESC    (Commandbutton)
'           3. Pada frmInfo (utk pencarian data), tambahkan sebagai berikut:
'              * Textbox, beri nama Text1, set property Multiline = True
'              * Commandbutton, sbb:
'                - cmdFindFirst   (Commandbutton)
'                - cmdFindNext    (Commandbutton)
'                - cmdClearSearch (Commandbutton)
'                - cmdSimpan      (Commandbutton)
'                - cmdOK          (Commandbutton)
'           4. Tambahkan reference "Microsoft ActiveX Data Objects 2.0 Library"
'              dari menu Project->References...
'           5. Tambahkan component "Microsoft Common Dialog Control 6.0 (SP3)"
'              dari menu Project->Components... pada frmInfo
'           6. Copy-kan coding untuk setiap form yang bertalian
'              (lihat di frmADOCode dan frmInfo di bawah)
'---------------------------------------------------------------------------------