<<< 返回 access911.net 编程静态资料库索引页

更改密码再一例

 

作者:  摘自:  录入:cg1  时间:2003-2-5  浏览人次:1919


专题地址:http://access911.net/fixhtm/72FAB71E17DC.htm 如果需要更详细的评论或说明,请点击该地址。

 

简述:

 


问题:

如何用VBA更改数据库密码?

 


方法一:

用DAO方式处理
Private Sub cmdChangeDAO_Click()
    Dim strNewPassword As String
    
    'Check if a database is open
    If fDC Then 'using data control
        'Get new password
        strNewPassword = InputBox("Please type in new password. Leave blank to remove password protection")
        'Change password
        Data1.Database.NewPassword strPassword, strNewPassword
    Else
        If strSource = "" Then
            MsgBox "No current database open"
        Else
            'Get new password
            strNewPassword.....................
...........

资料库随时有更新,欲查看最新详情请单击专题地址http://access911.net/fixhtm/72FAB71E17DC.htm

 


上一篇:请问用vbscript怎样检测当前分辨率?

下一篇:tbody标签有何妙用?

2017年2月22日生成静态资料