Membuat Aplikasi Kasir Dengan Visual Basic 6.0. Bag.4

Di Tulis : Oemah Belajar |

Membuat Aplikasi Kasir Dengan Visual Basic 6.0. Bab ini adalah lanjutan pembelajaran pada bab sebelumnya. Jika anda baru bergabung, maka silahkan ikuti bab sebelumnya agar anda tidak tersesat.

BAB Sebelumnya :
BAB 1 : Membuat Project Aplikasi Kasir
BAB 2 : Membuat Form Menu Utama Aplikasi Kasir
BAB 3 : Membuat Database dan Tabel Kasir

Jika anda sudah mengikuti bab diatas, silahkan ikuti langkah dibawah ini :
Buka Project anda seblumnya :

Silahkan Klik Control Panel
Cari ODBC kemudian anda KLIK
Klik Add
Pilih MySQL ODBC 3.51 Driver kemudian klik Finish
Masukan data seperti gambar diatas, kemudian Klik OK

Kembali ke VB 6.0
Klik Project - Add Module
Membuat Koneksi Database Dengan Module Aplikasi Pembelian
Klik Open
Kemudian masukan koding dibawah pada Module1
 
Public koneksi As New ADODB.Connection
Public RSKasir As ADODB.Recordset
Public RSPelanggan As ADODB.Recordset
Public RSBarang As ADODB.Recordset
Public Sub BukaDB()
Set koneksi = New ADODB.Connection
Set RSKasir = New ADODB.Recordset
Set RSPelanggan = New ADODB.Recordset
Set RSBarang = New ADODB.Recordset
koneksi.Open "Provider=MSDASQL.1;Persist Security Info=False;Data Source=KonekDBKasir"
End Sub

Klik Save dan OK 
Dengan langkah datas, anda telah sukses membuat Koneksi database Access dengan Module


⬆
Top