带密码的access数据库联接

fhvsbgmy 北京兰贝科技有限公司 CEO/董事长/总经理  2004-11-01 01:29:12
用户名应该写什么啊? 或者带有密码的access数据库连接不是这样写代码的?
dim con as adodb.connection
dim ref as adodb.recordset
public function connects()
set con=new adodb.connection
con.provider="microsoft.jet.oledb.4.0"
con.connectionstring="data source = c:\abc.mdb"
con.open ,,"123" '用户名不知道应该写什么啊?大哥大姐们帮帮忙好不啦!
set ref=new adodb.recordset
ref.open "select * from table1",con,....
end function

...全文
80 点赞 收藏 4
写回复
4 条回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复
fhvsbgmy 2004-11-01
感谢hwcqboy!!!!!!!!!!!!!!!!!!!!!!!!!!
祝你全家精神愉快,天天发财,万事如意,五谷丰登,招财进宝,天上掉馅饼全掉你们家!!!!
回复
hwcqboy 2004-11-01
1、con.Provider = "Microsoft.Jet.OLEDB.4.0"
con.Properties("Jet OLEDB:Database Password") = "111"
con.Open "C:\ccc.mdb;Persist" 这个方法用于打开对ACCESS文件加密的方法。
2、"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=databaseName;User ID=userName;Password=userPassword;" 这个方法是用于打开设置了用户和组的密码
你用的是哪一种,你试一下总有一个可以
回复
wuxuetie 2004-11-01
Provider=Microsoft.Jet.OLEDB.4.0;Password=你的密码;User ID=你的用户名;Data Source=c:\abc.mdb;Pecurity Info=True
回复
lxcc 2004-11-01
con.Properties("User ID").Value = "Test"
con.Properties("Password").Value = "Test"
回复
发动态
发帖子

1180

社区成员

VB 数据库(包含打印,安装,报表)
申请成为版主
社区公告
暂无公告