社区
数据库(包含打印,安装,报表)
帖子详情
有谁知道如何用VB打开带密码的ACCESS数据库文件(已知密码)???
richiez
2000-04-24 12:38:00
有谁知道如何用VB打开带密码的ACCESS数据库文件(已知密码)???
...全文
438
7
打赏
收藏
有谁知道如何用VB打开带密码的ACCESS数据库文件(已知密码)???
有谁知道如何用VB打开带密码的ACCESS数据库文件(已知密码)???
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
7 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
dongdong
2000-04-24
打赏
举报
回复
如果用ADODC,可以这样在Adodc1.ConnectionString的属性中,再加入PWD=YOURPASSWORD一项也可以实现,(注意其他项不能省)
008
2000-04-24
打赏
举报
回复
同意
solomon
2000-04-24
打赏
举报
回复
opendatabase("dbfile", , , ";pwd=yourpassword")
Calf
2000-04-24
打赏
举报
回复
Dim cnDB As New ADODB.Connection
Dim ConnString As String
ConnString = "Provider=Microsoft.Jet.OLEDB.3.51;Persist Security Info=False;Data Source=dbfile"
cnDB.ConnectionString = ConnString
cnDB.Properties("Jet OLEDB:Database Password") = "password"
cnDB.Open
Janven
2000-04-24
打赏
举报
回复
If Right(App.Path, 1) = "\" Then
gsDatabase = App.Path + "YourDb.mdb"
Else
gsDatabase = App.Path + "\YourDb.mdb"
End If
gsConnect = "ms access;pwd=YourPassWord"
Set WorkDefault = DBEngine.Workspaces(0)
Set Dbs = DBEngine.Workspaces(0).OpenDatabase(gsDatabase, False, False, gsConnect)
按我的方法试吧,倒不一定非用DBEngine,主要是gsConnect 的格式。
Un1
2000-04-24
打赏
举报
回复
aaa=opendatabase("c:\abcdef.mdb", , , ";pwd='123'") 行不行?
richiez
2000-04-24
打赏
举报
回复
!!!我是过了程序如下:
dim aaa
aaa=opendatabase("c:\abcdef.mdb", , , ";pwd=123")
但是出现提示说密码错。(密码绝对正确)
请问能用VB 的 Data 控件打开带密码的数据库吗?
先谢了。
数据库(包含打印,安装,报表)
1,216
社区成员
55,954
社区内容
发帖
与我相关
我的任务
数据库(包含打印,安装,报表)
VB 数据库(包含打印,安装,报表)
复制链接
扫一扫
分享
社区描述
VB 数据库(包含打印,安装,报表)
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章