Question

vb.net 怎么把DataGridView 数据源 设为adodb

Dim conn As ADODB.Connection
Dim rs As ADODB.Recordset
Dim sql, conn_str As String
'conn_str = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\My Documents\Visual Studio 2008\仓库\WindowsApplication1\ck.mdb;Persist Security Info=False "
conn_str = ConfigurationManager.ConnectionStrings("myconnectionstring").ConnectionString
sql = "select * from us "
conn = New ADODB.Connection
conn.Open(conn_str)
rs = New ADODB.Recordset
rs.Open(sql, conn, 3, 3)
DataGridView1.DataSource = rs
DataGridView1.Refresh()
这是我的代码.可是运行时 DataGridView1没有反应.
数据是可以查出来的
我用TextBox1.Text = rs(1).Value 试过.可以显示信息。

Answer 1

这样就OK了
Dim conn As ADODB.Connection
Dim rs As ADODB.Recordset
Dim sql, conn_str As String
'conn_str = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\My Documents\Visual Studio 2008\仓库\WindowsApplication1\ck.mdb;Persist Security Info=False "
conn_str = ConfigurationManager.ConnectionStrings("myconnectionstring").ConnectionString
sql = "select * from us "
conn = New ADODB.Connection
conn.Open(conn_str)
rs = New ADODB.Recordset
rs.Open(sql, conn, 3, 3)

Dim da As New System.Data.OleDb.OleDbDataAdapter
Dim ds As New DataSet
da.Fill(ds, rs, "us")
DataGridView1.DataSource = ds.Tables(0)

DataGridView1.Refresh()