用VB如何于Access数据库建立连接，急 100分相送

Question

急~~~~~~~

Answer 1

Dim conn As New ADODB.Connection
conn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\HandReaderInterface\RHand.mdb;Persist Security Info=False"
conn.Open
上面的参数当中provider是驱动程序,如果是office97,则为Microsoft.Jet.OLEDB.3.5
Data Source是数据库的实际路径.
这是用程序联接,你也可以拉一个adodc控件.

Answer 2

用ADO方法：
Dim cn As New ADODB.Connection
Dim rs As New ADODB.Recordset
Dim str As Stringstr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=E:\db1.mdb"
cn.Open str
rs.CursorLocation = adUseClient
rs.Open "select * from tb1", cn, adOpenKeyset, adLockOptimistic
Set DataGrid1.DataSource = rs
也可以用DAO方法

Answer 3

工程里要引用 Microsoft ActiveX Data Objects 2.x Library