改变ACCESS数据库的密码

2016-02-19 13:30 0 1 收藏

生活已是百般艰难,为何不努力一点。下面图老师就给大家分享改变ACCESS数据库的密码，希望可以让热爱学习的朋友们体会到设计的小小的乐趣。

【 tulaoshi.com - 编程语言】

Public Function ChangeDatabasePassword(DBPath As String, _
newPassword As String, oldPassWord As String) As Boolean

`Usage: Change DatabasePassword
`Parameters: sDBPath: Full Path to Access Database

`newPassword: the password
`oldPassword: the previous password
`returns true on success false otherwise

If Dir(DBPath) = "" Then Exit Function

Dim db As DAO.Database

On Error Resume Next
Set db = OpenDatabase(DBPath, True, False, ";pwd=" & oldPassWord)
If Err.Number 0 Then Exit Function
db.newPassword oldPassWord, newPassword
ChangeDatabasePassword = Err.Number = 0
db.Close

End Function

来源:https://www.tulaoshi.com/n/20160219/1604494.html

上一篇： Declarations and Access Control (1)
下一篇：避免页面布局被大尺寸图片和长字符串破坏

看过《改变ACCESS数据库的密码》的人还看了以下文章更多>>

如何优化Access数据库

标签：编程语言网络编程

How to speed up database access Here is a trick to loop through a recordset faster. Often when looping through a recordset people will use the following code: Do While Not Records.EOF Combo1.AddItem Records![Full Name] Eecords.Movenext LoopThe problem is that everytime the database moves to the next re...

JSP连接Access数据库

标签： Web开发

一.建立数据库及ODBC数据源１.建立jcc.mdb数据库及user表２.添加测试数据３.配置ODBC数据源二.在%wwwroot%/下，新建Access数据库连接文件Select.jsp Select.jsp源码如下： %@page contentType="text/html;charset=gb2312"% %@page import="java.sql.*"% html body ...

Access数据库技术（16)