VB.NET + MySQLDataAdapter 連接 MySQL |
Imports MySql.Data.MySqlClient …… Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim connectionString As String Dim conn As MySqlConnection Dim SQL_Statement As String Dim cmd As MySqlCommand Dim da As New MySqlDataAdapter Dim ds As New DataSet connectionString = "server=<Host Name>;UId=<Login>;Pwd=<Password>;database=<Database Name>" conn = New MySqlConnection(connectionString) SQL_Statement = "SELECT * FROM `news_table` LIMIT 0 , 30" cmd = New MySqlCommand(SQL_Statement, conn) conn.Open() da.SelectCommand = New MySqlCommand(SQL_Statement, conn) da.Fill(ds) DataGridView1.DataSource = ds.Tables(0).DefaultView conn.Close() conn.Dispose() End Sub |