应用VBA打开带密码的ACCESS2007数据库

彭海涛　发表于：2012-08-13 19:44:51 　

在新的ACCESS2007文件中，应用VBA打开带密码的ACCESS2007数据库文件。（不是求连接字符串）

叶海峰发表于：2012-08-13 20:07:25

Sub OpenDatabase(FileName As String, password As String, IsVisible As Boolean)
    Dim app As Object

    Set app = CreateObject("Access.application")

    app.Visible = IsVisible '设置新打开的MDB是否可见
    app.OpenCurrentDatabase FileName, False, password '新打开一个mdb文件

End Sub

Sub test()
Call OpenDatabase(CurrentProject.Path & "\db1.mdb", "123", True)
End Sub

Top

彭海涛发表于：2012-08-13 20:10:09

哥哥，這個我試過了，只能打開MDB的文件，是不能打開ACCDB文件的，您再幫助看一下，有沒有解啊？

Top

心态哥发表于：2012-08-13 22:00:32

飘过。。。

Top

总记录：3篇页次：1/1 9 1 :

Access交流中心

[5分]应用VBA打开带密码的ACCESS2007数据库