Koneksi VB.Net Ke Mysql Server

Berikut ini koneksi Vb.Net Ke Mysql Menggunakan Module.

Imports MySql.Data.MySqlClient

Module Mudule1

Public con As MySqlConnection

public sub koneksikemysql()

Try

dim koneksi as string
koneksi = “server=localhost” _
& “;port=3306” _
& “;user=root” _
& “;password=root” _
& “;database=contohprogram”
con = New MySqlConnection(koneksi)
con.Open()
Catch ex As Exception
MsgBox(“Tidak Bisa Konek Ke Database” + ex.ToString)
End Try
End Sub

End Module

Jadi Pas di form nya itu tinggal di panggil “call koneksikemysql()”

Moga aja berguna ,Jika ada pertanyaan dan lain2 posting aja ke blog kami

Terima Kasih.