ms-access - Access 错误 3443 : Unrecognized database format 'databasename.mdb'

Question

尝试从 VB 应用程序使用 MDB 文件时，可能是什么原因导致上述错误？

MDB文件 Access 版本为6.68。

我感觉这可能是由于有人试图从较新版本的 Access 打开 .mdb 文件造成的，它可能已损坏 MDB。

如何解决这个问题？

Answer 1

这是一些 VBScript，希望能为您提供一个版本。将其保存在扩展名为 vbs 的普通文本文件中，然后将 mdb 拖放到其中。这是一个非常快速的草图，并且只进行了粗略的测试。

Set fs = CreateObject("Scripting.FileSystemObject")

If WScript.Arguments.Count > 0 Then
    sPath = WScript.Arguments.Item(0)
Else
    sPathTemp = Left(WScript.ScriptFullname, _
        InStrRev(WScript.ScriptFullname, "\"))

    sPath = InputBox("Enter Path and Name of .mdb", "Get Ver", sPathTemp)
End If

If sPath = "" Or fs.FileExists(sPath) = False _
    Or Right(sPath, 4) <> ".mdb" Then

    MsgBox "Not a valid file: " & vbCrLf & sPath, 64, "Get Ver" 
Else

    Set cnnDB = CreateObject("ADODB.Connection")
    cnnDB.Provider = "Microsoft.Jet.OLEDB.4.0"
    cnnDB.Mode = 1 ''adModeRead

    On Error Resume Next
    cnnDB.Open sPath

    If Err.Number <> 0 Then
         MsgBox "Error"
    Else
        MsgBox "4 = Access 97, 5 = Access 2000 (2002?)" & vbcrlf & _
        "Value for " & sPath & " is: " & _
        cnnDB.Properties.Item("Jet OLEDB:Engine Type").Value
        cnnDB.Close
    End If
End If