一个很菜的问题(如何连接带密码的Access数据库)

[yoki]

我在用ado访问Access时碰到这种问题，当test.mdb无密码时可以通过下面的方法连接
cnStart.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\test.mdb;Persist Security Info=False"
可是当test.mdb有密码时在里面加了一项password=8888却还是访问不了，请问时什么原因？？如何解决？

[sinacom]

好象还要加一项用户吧！

[hilite2000]

在连接字符串上加：
Jet OLEDB:DataBase Password=YourPassword
试一试

[yoki]

还是不行~

[yoki]

难道连接带密码的Access数据库只能用dao而不能用ado么？

[borisnew]

Function Cn() As Boolean
Dim str As String
Cn = False
str = "dsn=Warehouse;uid=andyhuang;pwd=1234; "


Set conn = New ADODB.Connection


On Err GoTo conn_Err

conn.Open str

Cn = True

Exit_Function:
Exit Function
conn_Err:
MsgBox Err.Description, vbOKOnly, "Error"
Resume Exit_Function

End Function

[pengdali]

SELECT *
FROM OpenDataSource( 'Microsoft.Jet.OLEDB.4.0',
'Data Source="c:\Finance\account.mdb";User ID=Admin;Password=')...YourTable

[yoki]

up