社区 › VB › [求助]如何VB与Access的密码连接？

idoo 发表于 2008-6-2 19:23:00

[求助]如何VB与Access的密码连接？

在做VB与CAD时，遇到一个需要VB与Access的连接问题，如下连接语句，在access没有密码时，是可以连接通讯的，但是当给access加了密码后，就进不去了：
Dim dbWR As Workspace
Dim dbDB As Database
Dim dbDL As Recordset
Set dbWR = CreateWorkspace("", "admin", "", dbUseJet)
Set dbDB = dbWR.OpenDatabase("C:\Program Files\Database.mdb", False, True, "")
Set dbDL = dbDB.OpenRecordset("H-Data", dbOpenDynaset, dbReadOnly)
如果设置密码为123456，则做了如下调整，可还是不行：
Set dbWR = CreateWorkspace("", "admin", "123456", dbUseJet)
求解…………

dxhy 发表于 2009-3-18 13:31:00

"\Database.mdb;Jet OLEDBatabase Password=123456;Everyone,000000"

查看完整版本: [求助]如何VB与Access的密码连接？