用 ADOX 对象创建 MDB 数据库,如何设定数据库密码?

AllCHN 2006-02-28 01:52:28
在 VB 中,使用 ADOX 创建一个 ACCESS 数据库文件,并创建一些数据表,
请问,如何在创建数据库文件时指定数据库密码?

引用 Microsoft ADO Ext. 2.8 for DDL and Security
代码如下:
Dim ConnStr As String ' 连接串
Dim cat As New ADOX.Catalog ' ADO 扩展对象
Dim nfConn As New Connection ' 新建数据库文件的连接

ConnStr = "PROVIDER=Microsoft.Jet.OLEDB.4.0;Data Source=demo.mdb;Mode=ReadWrite"
cat.Create ConnStr

我试图用
cat.Users("admin").ChangePassword "", "password"
cat.Users.Append "admin", "password"

结果都不行?
...全文
91 点赞 收藏 2
写回复
2 条回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复
faysky2 2006-02-28
参考:

Dim cat As New Catalog
cat.Create ("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\newdata.mdb;Jet OLEDB:DataBase password=12345")
回复
早起旺财 2006-02-28
Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & DbName & ";Jet OLEDB:DataBase Password=" & DbPass
回复
相关推荐
发帖

1188

社区成员

VB 数据库(包含打印,安装,报表)
申请成为版主
帖子事件
创建了帖子
2006-02-28 01:52
社区公告
暂无公告