2014-02-26 77 views
0
Dim connection As OleDb.OleDbConnection = New OleDbConnection 
    connection.ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=CMP.accdb" 
    connection.Open() 
    Dim da As OleDb.OleDbDataAdapter = New OleDbDataAdapter("SELECT IDDesc FROM [ItemDesc] WHERE IDPartNo = " & PartNoTxt.Text & ";", connection) 
    Dim ds As New DataSet 
    da.Fill(ds, "FilteredDesc") 
    connection.Dispose() 
    connection = Nothing 
    DescTxt.Text = ds.Tables(0).Rows(0).Item(0) 

我把20-0015175放在PartNoTxt上,並且在我的數據庫中有相同的IDPartNo。但它不會返回我的數據集中的任何行。任何人都知道問題是什麼? 「位置0沒有排。」我認爲我的問題是在查詢中使用WHERE子句。使用MSACCESS在VB.Net中的數據集中沒有行

回答

1

解決了它。

改變了:

" & PartNoTxt.Text & "

到:

'" & PartNoTxt.Text & "'

相關問題