如何用代码修改Access数据库的密码?
时 间:2017-02-28 10:37:42
作 者:麥田 ID:11 城市:上海 QQ:3002789054
摘 要:如何用代码修改Access数据库的密码?
正 文:
方法一:
'要修改密码可以使用NewPassword方法:
Dim Db As DAO.Database
SetDb = OpenDatabase("C:\MyDocuments\MyDB.mdb", True, _
False, ";pwd=MyPassword1")
Db.NewPassword "MyPassword1", "MyPassword2"
Db.Close
方法二:
'也可以使用CompactDatabase方法:
DBEngine.CompactDatabase "C:\MyDocuments\Test.mdb", _
"C:\MyDocuments\TestII.MDB", dbLangGeneral & ";pwd=MyNewPWD", _
dbVersion30, ";pwd=MyPassword1"
方法三:
'在ADO下执行,且必须独占打开MDB文件
dim conn
Set conn = CreateObject("adodb.connection")
conn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\TEMP\test.mdb;Mode=Share Deny Read|Share Deny Write[s:12]ersist Security Info=False;Jet OLEDB[s:6]atabase [s:12]assword=老密码"
conn.Open
conn.Execute "Alter DATABASE [s:12]ASSWORD 新密码 老密码 "
conn.Close
'取消密码
conn.Execute "Alter DATABASE [s:12]ASSWORD [] 老密码 "
Access软件网QQ交流群 (群号:483923997) Access源码网店
常见问答:
技术分类:
源码示例
- 【源码QQ群号19834647...(12.17)
- 【Access窗体导出PDF】...(04.08)
- 【Access窗体导出PDF】...(04.07)
- Access两种方式实现即时更...(03.01)
- Access隐藏与显示lacc...(01.12)
- 【Access高效办公】将每个...(12.23)
- Access21点游戏源代码(12.13)
- 【Access窗体导出Exce...(11.15)
- 【Access开发】Acces...(11.14)
- 通过Access宏录入数据到选...(11.10)
学习心得
最新文章
- 【Access表名称命名建议】将A...(04.20)
- Access学习笔记--用Acce...(04.19)
- 【Access重复项查询示例】将A...(04.17)
- Access快速开发平台企业版--...(04.16)
- 【Access模块示例】通过模块代...(04.15)
- Access查询里面分组合计功能添...(04.13)
- 【Access删除查询】删除数字最...(04.12)
- 显示文件夹中所有文件的修改时间(04.11)
- 铁路工程管理系统;铁路工程管理小程...(04.10)
- 【Access查询示例】怎么将两个...(04.09)