Posted under Programlama & Visual Basic
Bu yazımızda MYSQL’e bağlanma, kayıt ekleme, kayıt silme fonksiyonlarını basitçe göreceğiz.
MYSQL BAĞLANTISI
1-BAĞLAN:
2-KAYIT EKLE:
3-KAYIT SİL:
MYSQL BAĞLANTISI
Bağlantıyı gerçekleştirebilmemiz için bizler için daha önce yazılmış olan referansı projemize eklemeliyiz bunun içinde;
Vb 2005 Net Den Add Refence den Browse den C:\Program Files\MySQL\MySQL Connector Net 1.0.7\bin\.NET 2.0 İÇİNDEKİ MySql.Data.dll
seçerek kodlamamıza geçiyoruz
‘Tanımlamarımız
Dim Dts As New DataSet
Dim Conn As New MySql.Data.MySqlClient.MySqlConnection
Dim Adp As New MySql.Data.MySqlClient.MySqlDataAdapter
Dim Cmd As New MySql.Data.MySqlClient.MySqlCommand
Bağlanmak için Button1_click fonksiyonuna kodlarımızı yazıoruz.sizde button 1 yada farklı bir fonksiyona bağlanma kodumuz yazarak örnek bağlantı kurabilirsiniz.:
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
‘mysql yapısında localhost’a(bilgisayarımızdaki mysql server) bağlanabilmek için bağlantı yazımızı yazıyor öncelikle.”server=localhost” kısmı bağlanacağımız serverı göstermektedir.Eğer kendi bilgisayarımız dışında bir mysql servera bağlancaksak ip adresi girmemiz gerekir.”database” kısmı serverda oluşturduğumuz veritabanının ismi olmalıdır.”uid” servera giriş için gerekli olan kullanıcı adıdır.Localhost serverlarda genellikle otomatikmen root olarak girilir.”pwd” giriş için gerekli olan şifremizdir.
Conn.ConnectionString = (”server=localhost;database=site;uid=root;pwd=;”)
Conn.Open()
Cmd.CommandText = “select * from bilgi” ‘
Cmd.Connection = Conn
Adp.SelectCommand = Cmd
Adp.Fill(Dts)
End Sub
Kayıt Ekleme Fonksiyonu:
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Cmd.Connection = Conn
Cmd.CommandText = ” insert into bilgi values(’10′,’Ugur’)”
Cmd.ExecuteNonQuery()
End Sub
Kayıt Silme Fonksiyonu
Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
Cmd.Connection = Conn
Cmd.CommandText = ” Delete from bilgi where ne=’10′”
Cmd.ExecuteNonQuery()
End Sub
ilerki zamanlarda mysql server ve sql komutlarını anlatan yazılar devam edecektir.