用ado方法使vc连接access时路径错误路径在哪里的代码求高手指点 15
展开全部
很简单下面是完整的连接代码:
Dim cn As New ADODB.Connection
Dim str As String
str = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & appdisk & "Data.mdb;Persist Security Info=False;Jet OLEDB:Database Password=6809977191 "
''注意了这里的 ata Source=" & appdisk & "Data.mdb;这里就是连接路径的代码了,现在是当前目录下的data.mdb 可根据不同的需要自行更改
If cn.State = 1 Then cn.Close
cn.Open str
cn.CursorLocation = adUseClient
Dim cn As New ADODB.Connection
Dim str As String
str = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & appdisk & "Data.mdb;Persist Security Info=False;Jet OLEDB:Database Password=6809977191 "
''注意了这里的 ata Source=" & appdisk & "Data.mdb;这里就是连接路径的代码了,现在是当前目录下的data.mdb 可根据不同的需要自行更改
If cn.State = 1 Then cn.Close
cn.Open str
cn.CursorLocation = adUseClient
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询