vb连接access

Question

visual basic 怎么连接Access数据库啊 ,怎么提示我不能识别的数据库标识,好象是jet的问题,jet怎么用啊,急...

Answer 1

Dim cn As Object, rs As Object
 
 Set cn = New ADODB.Connection
 
 Set rs = New ADODB.Recordset
 
 If cn.State = adStateOpen Then cn.Close
   
   cn.Provider = "Microsoft.Jet.OLEDB.4.0"
   
   cn.ConnectionString = App.Path & "\data\yyzlgl.mdb"
   
   cn.Open
   
   Set rs.ActiveConnection = cn
   
   rs.CursorType = adOpenStatic
   
   rs.LockType = adLockOptimistic
   
    rs.Open "SELECT * FROM TABLE"然后对记录集rs操作就OK了

Answer 2

Private Sub MDIForm_Load()
    Set dbBooks = OpenDatabase("E:\book.mdb")
    frmViewList.Display dbBooks, Me, "book"
End Sub
请问这段代码是干么用的呢

Answer 3

怎么提示我不能识别的数据库标识,好象是jet的问题,jet=========================================================
Microsoft.Jet.OLEDB.4.0"，用这个