为什么我Access数据库加密后，用VB如何连接？

Question

为什么我Access数据库加密后，用VB如何连接？
>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
首先题目有语法错误你用的是DAO还是ADO连接的，在connectionString中将UserID和PWD加上就可以了

Answer 1

在连接字符串中：
ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=False;Data Source=" + PathName & ";Jet OLEDB:Database Password=" & Password

Answer 2

DAO :    gsDatabase = "D:\Documents and Settings\Administrator\桌面\NewFullText\FDFullTextDatabase.mdb"
    gsConnect = "ms access;pwd=yuanguanyuan"
    Set Dbs = DBEngine.Workspaces(0).OpenDatabase(gsDatabase, False, False, gsConnect)
ADO:
Option Explicit
Dim conn As New ADODB.Connection
Dim rst As New ADODB.RecordsetPrivate Sub Form_Load()
rst.Open "Select * from users", "DBQ=" & "D:\Inetpub\wwwroot\Password\_database\passwords.mdb" & ";Driver={Microsoft Access Driver (*.mdb)};UID=;PASSWORD=Xpass", 3, 1
End Sub

Answer 3

哈哈
还得区分工作组密码和数据文件密码
数据库的密码一下子就可以搞定的(指crack掉)工作组密码就讨厌拉

Answer 4

谢谢大家给我的意见，zfcheng已经一语解决了我的问题。非常感谢他。