Dim myconn As New System.Data.OleDb.OleDbConnection

Dim strcnn As String
strcnn = "provider=Microsoft.Jet.OLEDB.4.0;DataSource=C:\data.mdb"
myconn.ConnectionString = strcnn
myconn.Open()
Dim mycmd As New System.Data.OleDb.OleDbCommand
mycmd.CommandText = "select * from A"
mycmd.Connection = myconn
Dim myada As New System.Data.OleDb.OleDbDataAdapter(mycmd)
Dim myda As New DataSet
myada.Fill(myda, "A")
DataGrid1.DataSource = myada.TableMappings("A")
我用vb 连接数据库,但是执行的时候总是在myconn.Open()和myada.Fill(myda, "A")这出错,我都用Imports System.Data
Imports System.Data.OleDb,这两个了,怎么还不行啊,高人指点一下吧,感激不尽!

你用VB6.0的ADO来做就简单了。
Dim Cnn As New Connection
Dim Rs As New ADODB.Recordset

Cnn.Open LinkString, UserName, PassWord
SQL="Selct * from Table1"
Rs.CursorType = adOpenDynamic
Rs.CursorLocation = adUseClient
Rs.Open SQL, cnn, adOpenDynamic, adLockOptimistic
此时数据库已打开，并得到记录集Rs。
你用的是VB.Net？

是啊,用的是VB.NET,这个有时后很难解决,谢谢了,我试试别的吧