Matakuliah : Visual Pemrograman 3 Versi : 1.0.0 Materi : Model Koneksi Database Dalam Visual Basic 6.0 Penyaji : Zulkarnaen NS
Model Koneksi Database Visual Basic 6.0 a. DAO (Data (Data Access Objects) Objects) Menggunakan Objek Tanpa Objek b. ADO (ActiveX (ActiveX Data Objects) Objects) Menggunakan Objek Tanpa Objek c. DSN (Data Source Name)
DAO (Data (Data Access Objects) Objects ) Pembuatan database dengan Visual Data Manager atau Ms. Access versi 97. Database yang dibuat dengan aplikasi ini menggunakan mesin JET OLEDB versi 3.5
ADO (ActiveX (ActiveX Data Object) Object) Pembuatan database dengan Ms. Access versi 2000 atau versi yang lebih tinggi dan database yang dapat ditangani diantaranya adalah MySQL, SQL Server, SyBase, Oracle, dan sejenisnya. Database yang dibuat diversi versi ini bekerja dengan mesin JET OLEDB versi 4.0
DSN (Data (Data Source Name) Name) Koneksi yang dijembatani melalui ODBC (Open Database Connectivity) yang terdapat pada control panel milik sistem operasi windows.
Pembuatan Database a. Teknik DAO (Data Access Objects) Menggunakan Visual Data Manager Menggunakan Ms. Access versi 97 Menggunakan Ms. Access 2000 > kemudian di konversi ke versi Ms. Access 97 b. ADO (ActiveX (ActiveX Data Objects) Objects) Menggunakan Ms. Access 2000 atau >
Implementasi 1. Koneksi Model DAO 1.1 Koneksi Model DAO Menggunakan Objek
Ubah setting properti berikut : 1. Database Name Digunakan untuk merujuk diposisi mana file database berada dan nama file database yang akan diakses. 2. RecordType Pengaturan ini dilakukan untuk menyesuaikan proses program. Jika data dalam tabel dicari menggunakan Seek (tabel berindex) maka RecordType untuk objek data harus 00-Table. Jika data dicari dengan SQL, RecordType harus bernilai 1-Dynaset atau 22-Snapshot
3. RecordSource Digunakan untuk memilih salah satu tabel yang ada di file database. Dengan pengaturan ini, secara khusus hanya satu tabel saja yang dijadikan sasaran program. Dalam kondisi tertentu properti ini boleh dikosongkan jika dengan satu data kontrol akan diakses semua tabel (biasanya menggunakan perintah SQL)
1.2 Koneksi Model DAO Tanpa Objek Koneksi dengan database pada konsep DAO dapat pula dilakukan tanpa objek, artinya dalam form tidak ditambahkan objek kontrol data. Cara ini harus dibuat program yang dapat menghubungkan dengan salah satu tabel pada file database. Berikut contoh program untuk melakukan koneksi ke database
Penjelasan Program: Berfungsi untuk mendefinisikan file database dalam sebuah variabel dengan nama DB.
Berfungsi untuk mendefinisikan tabel dalam sebuah variabel dengan nama RS
Berfungsi untuk menghubungkan file database dengan perintah OpenDabase (“Path”) dan membuka tabel dengan perintah OpenRecordset (“Tabel”). ‘Path’ disini berfungsi untuk menentukan posisi file database berada sedangkan tabel berfungsi untuk menentukan nama ‘Tabel’ yang ada dalam file database tersebut.
Jika dalam satu form akan dibuka beberapa tabel sekaligus, dapat menambahkan perintah OpenRecordset untuk tabel lainnya seperti script dibawah ini
2. Koneksi Model ADO 2.1 Koneksi Model ADO Menggunakan Objek Tambahkan terlebih dahulu component ADODC dengan memilih Project > Component > Pilih Microsoft ADO Data Control 6.0 (OLEDB) > Ok
Lalu tambahkan objek ADODC dalam form
Klik kanan pada ADODC kemudian pilih ADODC Properties
Pilih tab General > Use Connection String > Build
Pilih Microsoft Jet OLE DB 4.0 Provider
Pilih Next
Pilih Microsoft Jel OLE DB 4.0 Provider
Pilih lokasi database
Pilih Test Connection Pilih Ok
Pilih tab RecordSource
Pada Command Type pilih tab 2 - adCmdTable Pada Table or Procedure Name pilih tabel yang akan ditampilkan Pilik Ok
2.2 Koneksi Model ADO Tanpa Objek Dim Kon As New ADODB.Connection Dim Rec As New ADODB.Recordset Kon.Open “namaProvider” Kon.Close
2. Koneksi Model DSN Untuk membuat koneksi model ini terlebih dahulu membuat ODBC pada control panel. Kon.Open “DSN=namaDSN”