MySql in Grid Vb Express 2010
Dim conn As New MySql.Data.MySqlClient.MySqlConnection
If conn.State = ConnectionState.Closed Then
Dim myString As String = "server=localhost;user=root;password=;database=dbname"
Try
conn.ConnectionString = myString
conn.Open()
Catch ex As MySql.Data.MySqlClient.MySqlException
MsgBox(ex.Message)
End
End Try
End If
Dim cmd As New MySql.Data.MySqlClient.MySqlCommand
cmd.CommandText = "SELECT nis from datasiswa"
cmd.Connection = conn
Dim table As New DataTable
Dim adapter As New MySql.Data.MySqlClient.MySqlDataAdapter(cmd.CommandText, conn)
Dim cb As New MySql.Data.MySqlClient.MySqlCommandBuilder(adapter)
adapter.Fill(table)
grid.DataSource = table
Posting Lebih Baru Posting Lama