主题：采集数据问题

db2,mysql等数据库，不能像sql server,access,oracle那样可以直接引入修改和保存。

 必须用ODBC连接，引入只能作为查询表，如连mysql

Dim conn As MySql.Data.MySqlClient.MySqlConnection
Dim cmd As MySql.Data.MySqlClient.MySqlCommand
Dim sdr As MySql.Data.MySqlClient.MySqlDataReader

Dim connStr As String = "server=localhost; port=3306; user id=root; password=root; database=dbexhibitionprinter"
conn = New MySql.Data.MySqlClient.MySqlConnection(connStr)
conn.Open

Dim dt As new System.Data.DataTable
cmd = new MySql.Data.MySqlClient.MySqlCommand("select * fr om usersInfo", conn)
sdr = cmd.ExecuteReader()
dt.load(sdr)
Tables("窗口1_Table1").DataSource  = dt
Tables("窗口1_Table1").AllowEdit = True

conn.close