Koneksi MySqL dengan Visual Basic 6.0

Koneksi MySqL dengan Visual Basic 6.0 menggunakan mysql-connector-odbc 5.1.5, langkah pertama download mysql-connector-odbc 5.1.5 bagi yang belum punya !, yang kedua buat sebuah modul dan ketikan kode berikut :

Option Explicit
Global strCon As New ADODB.Connection

Public Sub BUKA_DATABASE()
On Error GoTo err
Set strCon = New ADODB.Connection
Dim StrString As String
Dim ser, user, pass, db, soc, pro As String
ser = "nama server anda"
db = "nama database"
user = "username"
pass = "password"

StrString = "DRIVER={MySQL ODBC 5.1 Driver};SERVER=" & ser & ";DATABASE=" & db & ";UID=" & user & ";PWD=" & pass & ";port=3306;OPTION=2105"
strCon.Open StrString
strCon.CursorLocation = adUseClient
Exit Sub
err:
MsgBox "Sistem belum terhubung ke server..!", vbOKOnly + vbInformation, "Administrator"
End Sub

untuk membuka koneksinya anda tinggal panggil nama prosedurnya
BUKA_DATABASE  di setiap ada koneksi

Read More

Program Penjualan Toko atau Minimarket (POS)

Program Penjualan Toko atau Minimarket (POS) ini dibuat dengan bahasa pemrograman Visual Basic 6.0 dan database MySql. Program ini dapat digunakan sebagai referensi bagi para programmer pemula khususnya bagi yang menyukai Visual basic 6.0 , atau bisa juga langsung digunakan untuk toko atau minimarket anda.

Lihat screenshotnya :

• Kategori Barang

• Data Barang

 

• Pembelian

 

• Penjualan

• Dll

Bagi anda yang berminat kami tawar kan  Program Penjualan Toko atau Minimarket (POS) + Source Code dan Database seharga Rp. 750.000,- + Ongkos Kirim bagi yang memesan di luar Jabodetabek. silahkan kirim email ke digitalcomputindo@gmail.com dan di cc ke dede.tyas@gmail.com.

Read More