2011-11-18 61 views
1

進出口新的Visual Basic中「找不到可安裝的ISAM」的錯誤。我想問一下關於如何解決了這一問題「找不到可安裝ISAM。」我用Visual Basic作爲編程語言。我使用MS訪問作爲數據庫。我的程序是從訪問中獲取數據。這將是我的代碼。在VB.NET

Imports System.Data.OleDb 

Module Main 
Dim mDataPath As String 

Sub Main() 
    GetPupils() 
    Console.ReadLine() 

End Sub 
Private Function GetConnection() As OleDb.OleDbConnection 
    'return a new connection to the database5 

    Return New OleDb.OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;" _ 
    & "Database Password=oNer00FooR3n0 " & "Data Source=" & "C:\Users\ERICO YAN\Desktop\MSaccessDB\MSaccessDB\oneroofccp.mdb") 
End Function 


Public Function GetPupils() As DataSet 
    Dim conn As OleDb.OleDbConnection = GetConnection() 
    Try 
     Dim ds As New DataSet 'temporary storage 
     Dim sql As String = "select * from SESSIONS" 'query 
     Dim da As OleDb.OleDbDataAdapter = New OleDb.OleDbDataAdapter(sql, conn) 'connection 

     Try 
      da.Fill(ds, "SESSIONS") 'fetch data from db 
     Finally 
      da.Dispose() 'in case something goes wrong 
     End Try 

     Dim startVal = 0 'first record 
     Dim endVal = ds.Tables(0).Rows.Count 'total number records 

     For var = startVal To endVal - 1 'display records 
      Console.WriteLine(ds.Tables(0).Rows(var).Item(0).ToString() + " " + ds.Tables(0).Rows(var).Item(1).ToString() + " " + ds.Tables(0).Rows(var).Item(3).ToString() + " " + ds.Tables(0).Rows(var).Item(3).ToString()) 'code for display id and name 
     Next 


     Return ds 

    Finally 
     conn.Close() 
     conn.Dispose() 
    End Try 

End Function 
End Module 

我想知道什麼是錯誤的原因,這樣我可以繼續我的節目..謝謝你這麼多的反饋..

回答

0

缺少;分隔符的位置:

...Password=oNer00FooR3n0 " & "Data Sourc... 

需要是

...Password=oNer00FooR3n0 " & ";Data Sourc... 

也只是Password我而不是Database Password

+0

太感謝你了.. @Alex K. –

1

你似乎缺少密碼屬性之後的分隔符。

我想你也需要使用Jet OLEDB:Database Password=...代替(如果你確實有一個密碼保護的Access數據庫):

"Provider=Microsoft.Jet.OLEDB.4.0;" _ 
& "Data Source=" & "C:\Users\ERICO YAN\Desktop\MSaccessDB\MSaccessDB\oneroofccp.mdb;" _ 
& "Jet OLEDB:Database Password=oNer00FooR3n0;" 
+0

這是準確@Edwin德科寧..因爲我用以前的建議後存在的另一個問題。這段代碼解決了我的問題。非常感謝! –

+0

@Erico Timbang:如果您認爲它解決了您的問題,請接受答案。 –

+0

非常感謝你@Edwin de Koning。我已經使用你的代碼了..先生,我想詢問有關查詢..我前一段時間發佈了我的新問題。請幫助我先生。 –

0

起初,我也有這種錯誤,但是當我寫的連接串中的一行(我的意思是不使用[& _]或在2線斷裂,則這個工作正常

「提供者= Microsoft.Jet.OLEDB.4.0;數據源= C:\用戶\ USER1 \桌面\ MSaccessDB \ MSaccessDB \ my_database_file.mdb;數據庫密碼= MyPassword輸入」

希望這有助於。

穆克什L.

+0

歡迎來到SO,Mukesh!雖然我希望你在這裏列出之前至少修改了真正的密碼,但我已經編輯了你的答案,使得明確的連接字符串更通用。它可能是一個只能由一個用戶訪問的Access文件,但是你仍然不應該將它告訴給那些需要知道它是什麼的人以外的人。 – Derek