要调用dao,里面有解决这些问题的方法。

解决方案 »

  1.   

    提供一个修改密码的代码供参考!不难的!
    修改密码
    Private Sub Command1_Click()
      Dim cnn As New ADODB.Connection
      cnn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\aa.mdb;" & "Mode=Share Deny Read|Share Deny Write;Persist Security Info=False;Jet OLEDB:Database Password=man"
      cnn.Execute "Alter Database password 999 man"
      MsgBox "修改完毕"
    End Sub
      

  2.   

    利用inSert和update对数据库表进行操作!就可以了啊!!删除用delete来实现