用VB能对access文件加密吗？

使用Access自己数据库的密码，很容易被解密的如果要求比较高，应该考虑用别的加密手段

解决方案 »

  1.   

    能呀，一是使用Access2000的数据库格式
    二是将字符串用你的算法加密一下。
      

  2.   

    恩，上面的已经说明白了！如在Access 2000 设密码
    代码如下：
    dbpath = App.Path & "\datebase\mainbase.mdb"
        Set conn_1 = New ADODB.Connection
        strSQL = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="
        strSQL = strSQL & dbpath
        strSQL = strSQL & ";Persist Security Info=False;Jet OLEDB:database password=123"
        conn_1.Open strSQL
      

  3.   

    '加密码999
    Private Sub Command1_Click()
      Dim cnn As New ADODB.Connection
      cnn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\DBWithPW.mdb;" & "Mode=Share Deny Read|Share Deny Write;Persist Security Info=False;"
      cnn.Execute "Alter Database password 999 null"
      MsgBox "已加密码"
    End Sub
      

  4.   

    朋友很感谢您！！这个好像是access自带的加密方法！！还有没有其他的方法！！或者另外种说法：不用access自带的加密法！！用其他的的方法！！我自己想把每个数据的asc码改掉！！但不知道怎么来编 ！！！意思是在人家用access打开mdb的时候让人家看到乱码什么的 ！！！帮帮忙！！
      

  5.   

    啥意思?比如说我要将数据的asc码都加1!!!怎么样才能做到!!!我的想法就是将字符串加密阿 !!!谢谢啦!
      

  6.   

    用二进制方法，加密access库。一定行。
      

  7.   

    KasenHOo (卡森) 已经回你email了，不过你要修改一下为行
      

  8.   

    很高兴又回应!!可能您意思搞错了!!我给你回了封email，您看看!!我在线等你回应！！谢谢！！
      

  9.   

    我回email了，是第一次给你的那个函数不太清楚吧，这回又给你一个，详细在email中。