“Hikayeler ikiye ayrılır; Gerçek olanlar, gerçek olması gerekenler.” - J. R. R. Tolkien

VB 2008′de MySQL Bağlantısı

Buraya tıklayarak örnek dosyaları ve eklentileri indirin, zaten indireceğiniz dosyada aşağıdaki kodların değişik bir biçimi mevcuttur.

Dosya için 2. alternatif adres


Imports System
Imports System.Data
Imports System.Windows.Forms
Imports MySql.Data.MySqlClientPublic Class start
Inherits System.Windows.Forms.Form

Dim conn As MySqlConnection
Dim data As DataTable
Dim da As MySqlDataAdapter
Dim cb As MySqlCommandBuilder

Private Sub start_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
data = New DataTable
Dim connStr As String
connStr = String.Format(“server={0};user id={1}; password={2}; database=mysql; pooling=false”, _
“localhost”, “root”, “123456″
)

conn = New MySqlConnection(connStr)
conn.Open()
conn.ChangeDatabase(“veritabaniadi”)

da = New MySqlDataAdapter(“SELECT * FROM tabloadi”, conn)

da.Fill(data)

datagrid1.DataSource = data ‘ önceden bi datgrid hazırlamanız gerekmekte


End Sub
End Class



Toplam Okunma: 34 | Bugunku Okunma: 2 | En Son Okunma: 08.05.2008 - 16:53

 

 

eXTReMe Tracker