Saturday, August 3, 2013

Membuat koneksi VB NET 2008 dengan MySql sekaligus menampilkannya

Langkah awal yang harus kita lakukan adalah menambahkan Reference, Caranya pilih Project=>Add Reference  Pilih Tab .NET cari mysql.data seperti gambar berikut, jika belum ada berarti belum diinstall mysql konektor net, silahkan download dulu di situr resmi mysql. Lihat gambar berikut.



Selanjutnya pada form ketikkan koding berikut :
Private Sub dispalydata()
        Dim konek As New MySql.Data.MySqlClient.MySqlConnection("server=www.db4free.net;user id=khoirulh1610;password=******;database=script16;port=3306")
        konek.Open()
        Dim rs As New MySql.Data.MySqlClient.MySqlDataAdapter("select * from toko", konek)
        Dim data As New DataTable("tb_user")
        rs.Fill(Data)
        DataGridView1.DataSource = Data
    End Sub
langkaah selanjutnya panggil sub tersebut pada saat form load

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Call dispalydata()
 End Sub



Namun disini saya hany mencontohkan cara menampilkan data saja, untuk fungsi lainya akan saya bahan berikutnya.

0 comments:

Post a Comment