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

[emerald_0616]

我用Access建数据库，为了加密，我加了数据库密码后，用VB就总是连接失败。除了用ODBC，但我是用代码连接的，不想用ODBC.请问各位高手，应如何连接？

[poweruser]

为什么我Access数据库加密后，用VB如何连接？
>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
首先题目有语法错误

你用的是DAO还是ADO连接的，在connectionString中将UserID和PWD加上就可以了

[zfcheng]

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

[Lontan]

在连接语句中加入用户名及您的数据库密码即可！！！！

[y1g1y1]

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.Recordset

Private 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

[4_Eye_Cat]

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

工作组密码就讨厌拉

[emerald_0616]

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

[emerald_0616]