VB 怎么用ADO控件链接access数据库啊？

来源：百度知道 编辑：UC知道 时间：2024/05/22 05:29:47
我没有基础，请高手帮我解答，
过程详细点，谢谢大家，
如果有参考例子的话更好，谢谢大家

Public conn As ADODB.Connection
Set conn = New ADODB.Connection
conn.CursorLocation = adUseClient
conn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\*.mdb;Persist Security Info=True;Jet OLEDB:Database Password=*******"
conn.CommandTimeout = 30
conn.Open
如果数据库没有密码，database password=******那段就可以不要。

dim cnn as new adodb.connection
dim rs as new adodb.recordset
cnn.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\1.mdb
rs.open "(SQL查询语句)"，cnn，1，3
（其他语句）
rs.close
cnn.close

Dim myConn As New ADODB.Connection
Dim myRecord As New ADODB.Recordset
Set myConn = New ADODB.Connection

myConn.CursorLocation = adUseClient
myConn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\data.mdb" & ";Persist Security Info=False"
If myRec