訪問Access數據庫時發生異常

Question

我需要在Access表中插入一行。我已經越來越

對象引用不設置到對象的實例

我的代碼是：

Private Sub Button2_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button2.Click 

    Dim strconstring As String = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Documents and Settings\Daisy\My Documents\Downloads\MusicSales.mdb" 
    Dim objcon As OleDb.OleDbConnection 
    objcon = New OleDb.OleDbConnection(strconstring) 
    Dim objcommand As OleDb.OleDbCommand 
    Dim da As New OleDb.OleDbDataAdapter 
    Try 
     objcon.Open() 
     Dim command As String 
     command = "insert into Artists(Artist, Company, Sales)" _ 
      & " values('" & ArtistBox.Text & "', '" _ 
      & TextBox2.Text & "', " & TextBox3.Text & ")" 
     objcommand = New OleDb.OleDbCommand(command, objcon) 
     da.InsertCommand.CommandText = command 
     da.InsertCommand.ExecuteNonQuery() 
    Catch exceptionobject As Exception 
     MessageBox.Show(exceptionobject.Message) 
    Finally 
     objcon.Close() 
    End Try 
End Sub 

Answer 1

連接字符串是有點亂，所以可能造成問題。請使用......

Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\Documents and Settings\Daisy\My Documents\Downloads\MusicSales.mdb; 

......或者......

Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Documents and Settings\Daisy\My Documents\Downloads\MusicSales.mdb;