Question

如何设置或取消（删除）MDB数据库的密码？

如何设置或取消（删除）MDB数据库的密码？
我以前问过如何修改密码，已经知道怎么做了。下面是对应的函数。
Private Function 修改MDB密码(ByVal strOldPassword As String, ByVal
strNewPassword As String)
Dim conn As ADODB.Connection
Set conn = New ADODB.Connection
If strOldPassword = "" Then
strOldPassword = "NULL"
End If
If strNewPassword = "" Then
strNewPassword = "NULL"
End If
Call conn.Open("Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=" & App.Path & "\test.mdb;" & _
"Mode=Share Deny Read|Share Deny Write;" & _
"Persist Security Info=False;" & _
"Jet OLEDB:Database Password=" & strOldPassword)
Call conn.Execute("ALTER DATABASE PASSWORD " & strNewPassword & " " &
strOldPassword)
Call conn.Close
Set conn = Nothing
End Function
但这个程序中，只能修改密码。
如果是原来没有密码，则需要令旧密码为"NULL"；
或如果原来有密码，要删除掉密码，则需要令新密码为"NULL"。
这样就有个新的问题了。
如果想把密码设置为"NULL"字符串，而不是取消密码，应该怎么写呢？
是不是有什么转义字符可以表示呢？
我说的是用程序修改啊。
用ACCESS我也会。
第一位回答者的答案不行。

Answer 1

1、进入数据库之后，选择创建。选择模板里的空白桌面数据库。

2、创建之后，在桌面的位置保持，并更改文件名。

3、一定要重新创建之后才能够设置密码。在数据库上的【文件】点击进入。

4、在【信息】可以看到【用密码进行加密】。

5、然后调出【设置数据库密码】，设置密码和验证。

6、设置密码之后调出【使用分组加密进行加密与行级别锁定不兼容】。

7、设置密码时候之后。双击数据库之后就要求输入密码才能打开。

Answer 2

启动acess,然后选文件-以独占方式打开文件,然后选工具-安全-设置数据库密码

Answer 3

进入access，点击文件，打开选择所要修改密码的文件，以独占方式打开。

输入密码打开文件，然后点击文件———信息——解密数据库。

解除密码后，在点击文件——信息——用密码进行加密，设置新的密码即可。

【注意】

一定要以独占方式打开才能设置。