Belajar VB 6.0 dan Belajar VB .Net: Koneksi Database Dengan Module VB 6.0

Koneksi Database Dengan Module VB 6.0

Ini adalah Tahap #KeEmpat dalam membuat Aplikasi Penjualan Retail dengan Visual Basic 6.0. Tahap keemapat ini kita akan membuat koneksi database dengan Module. Kenapa harus module??? masih ingat dengan Tahap ke-3 ? tahap ketiga adalah membuat tabel dan master. Jika telah membuat database maka kita akan mengkoneksikan database ke Visual Basic 6.0. Script atau koding koneksi database akan kita taruh di Module. fungsinya adalah untuk menandakan bahwa Module adalah untuk koneksi database, dan nantinya dengan koding tersebut untuk memudahkan dalam pemanggilan.

Jika kita tidak menggunakan module, maka kita akan Boros dalam membuat koding. disetiap form kita harus membuat koding koneksi database. Oleh karena itu dengan adanya module, maka koding akan semakin hemat :)

Sebelum anda mengikuti Tutorial dibawah, pastikan anda sudah mengikuti tutorial sebelumnya yaitu :
1. Membuat Project Pada VB 6.0 Aplikasi Penjualan VB 6.0
2. Membuat Form Menu Utama Aplikasi Penjualan VB 6.0
3. Membuat Database dan Tabel Master Aplikasi Penjualan VB 6.0

Berikut ini adalah langkah dalam Membuat Koneksi Database dengan Module
Buka Project VB anda sebelumnya :

Double Klik Belajar VB

KlikProject
Add Module

Klik Open

Klik save

Kemudian pada Module1 masukan Koding dibawah ini :

Public koneksi As New ADODB.Connection
Public RSAdmin As ADODB.Recordset
Public Sub BukaDB()
Set koneksi = New ADODB.Connection
Set RSAdmin = New ADODB.Recordset
koneksi.Open "PROVIDER=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\DBAplikasi.mdb"
End Sub

Dengan mengikuti langkah diatas, anda telah sukses membuat Koneksi Database DBAplikasi.mdb dengan Module. Silahkan ikuti Pembelajaran VB 6.0 kami selanjutnya

Silahkan KLIK DISINI Untuk Download Project diatas
Silahkan KLIK DISINI Untuk Melanjutkan Tahap-5 dalam membuat Aplikasi Penjualan VB 6.0

14 komentar

Write komentar

Anonymous

AUTHOR

September 12, 2014 at 6:26 AM delete

Trim's infonya. Bagaimana cara menghitung jumlah record database access dengan menggunakan kode VB dan menampilkan hasilnya di Label.caption?

Tutarni

September 15, 2014 at 10:04 PM delete

Hi Anonym,
Silahkan SMS ke kami yaaa

Unknown

November 25, 2014 at 11:31 PM delete

bu kok error compilingnya di & setelah Source= dan setelah App.Path &

December 8, 2014 at 1:24 PM delete

Bu saya ada msasalah di Public koneksi As New ADODB.Connection... error pas saya running bu.. itu kenapa ya bu.. terima kasih atas infonya bu...

December 15, 2014 at 12:29 AM delete

Hi Fitrian,
Jika error tersebut silahkan masukan adodc dan datagrid terlebih dahulu didalam form, kemudian di run, jika sudah bisa silahkan delete saja adodc dan datagridnya..
semoga jawaban diatas membantu

December 15, 2014 at 12:30 AM delete

Hi Tomy,
Jika error tersebut silahkan masukan adodc dan datagrid terlebih dahulu didalam form, kemudian di run, jika sudah bisa silahkan delete saja adodc dan datagridnya..
semoga jawaban diatas membantu

March 25, 2015 at 2:59 AM delete

Bu saya ada msasalah di Public koneksi As New ADODB.Connection... masukan adodc dan datagrid terlebih dahulu didalam form maksdunya bagaimana ya bu tolong bantuannya terimakasih

March 28, 2015 at 4:12 AM delete

Hi Christantio,
Yuppp pastikan pada components kamu masukan ADODC dan Datagrid
kemudian pada form masukan saja ADODC, kemudian hapus kembali
langkah ini hanya untuk meregisterkan Adodc pada Project yang kamu buat atau bahasa mudahnya agar project yang kamu buat bisa terkoneksi dengan database

apakah sudah jelas?

April 22, 2015 at 2:29 AM delete

Maaf Bu, saya masih kurang jelas dengan maksud Ibu untuk memasukkan ADODC dan Datagrid, Bagaimana cara memasukkan kedua object tersebut dan dimana (form yang mana) saya harus letakkan kedua object tersebut? terima kasih sebelumnya, mohon pencerahannya Bu...

April 22, 2015 at 2:04 PM delete

Hi Ocky,
Untuk penambahan AODC dan Datagrid, sebenarnya hanya untuk memancing saja bahwa form VB yang kita gunakan terhubung dengan database.
untuk itu silahkan masukan ke Form Utama atau Form Login (terserah) setelah di tempel pada Form, coba kamu Run, jika sudah tidak ada error, ADODC dan Datagridnya bisa dihapus.
Mohon feedbacknya ya jika berhasil........

December 6, 2015 at 1:47 AM delete

bu debug di sini.. ekstensi access nya beda soalnya bu. sudah saya ganti ke .accdb pun tetap debug.
koneksi.Open "PROVIDER=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\DBAplikasi.mdb" mohon pencerahannya bu