2011-04-15 96 views
0
Dim con As New OleDb.OleDbConnection 
Sub connecttodatabase(ByVal fileselected As String) 
    Dim databasepassword 
    con.ConnectionString = "PROVIDER=Microsoft.Jet.OLEDB.4.0; Data Source = " &  fileselected 
    Try 
     con.Open() 
    Catch e As OleDb.OleDbException 
     If e.Message = "Not a valid password." Then 
      Console.WriteLine("Database has a password. Please enter password to continue.") 
      databasepassword = Console.ReadLine() 
      con.ConnectionString = "PROVIDER=Microsoft.Jet.OLEDB.4.0; Data Source = " & fileselected & ";JetOLEDB:Database Password=" & databasepassword & ";" 
      con.Open() 
     End If 
     errorid = 1 
    Finally 
    End Try 
End Sub 

我遇到的錯誤發生在第二個con.Open()當我嘗試連接到一個.mdb數據庫文件時,該函數正確地告訴我我有一個密碼,但是一旦我輸入密碼,就會得到標題中定義的錯誤,我不知道爲什麼。任何幫助將不勝感激。OleDB異常:找不到可安裝的ISAM

回答

1

試試這個: Provider = Microsoft.Jet.OLEDB.4.0; Data Source = C:\ mydatabase.mdb; User Id = admin; Password = YOURPASS;


還等什麼異常,您在第一次調用得到打開分貝?也許這是同樣的問題:ISAM不存在。請嘗試重新安裝MDAC:

http://www.microsoft.com/downloads/en/details.aspx?FamilyID=78cac895-efc2-4f8e-a9e0-3a1afbd5922e

+0

我第一次調用獲得唯一的例外是,密碼是無效的,所以後來我提示用戶輸入密碼。當我將連接字符串更改爲一個你建議我得到以下異常,而不是「無法啓動您的應用程序。工作組信息文件丟失或由其他用戶專門打開」。編輯:安裝MDAC沒有區別。 – 2011-04-15 15:32:07

相關問題