從數據庫查詢數據庫與vb6和ms訪問與adodb

我想選擇和查看我的數據庫中的數據，但它被證明是一個挑戰。任何意見，我可以錯過它嗎？如果我即使在滿足選擇條件時也運行此代碼，它總是返回搜索失敗。任何幫助？從數據庫查詢數據庫與vb6和ms訪問與adodb

If txtSun.Text = "SUN" Then 
    Set rst = New ADODB.Recordset 
    Dim sSql As String 
    sSql = "SELECT * FROM SundryProduct WHERE ProdCont='" & txt_con_code.Text & "'" 
    rst.Open sSql, Cnn, adOpenForwardOnly, , adCmdText 
    'rst.Open "SELECT * FROM SundryProduct WHERE ProdCont='" & txt_con_code.Text & "' ", Cnn, adOpenForwardOnly, , adCmdText 
    If rst.EOF Then 
    MsgBox ("SEARCH FAILED") 
    Else 
    MsgBox ("QUANTITY ORDERED " & rst!QuantityOrdered & vbCrLf & " My Load Number is " & rst!LoadNumber) 
    End If 
End If

我試圖找出是否有與在數據庫中進行匹配ProdCont值的記錄，但因爲我仍在努力使此代碼工作擺在首位，我只把消息框代碼。我甚至嘗試過放入一個我知道存在於數據庫中的實際值，但它仍然返回搜索失敗的消息箱，即使我知道數據庫中存在該值。

來源

2013-05-02 tendai mare

這是一個SQL Server後端，或MS訪問？無論哪種方式，你能讓你的查詢在源數據庫中成功運行嗎？ – 2013-05-02 14:38:21

你可以發佈簡短但完整的（儘可能使用VB6）程序嗎？ http://www.yoda.arachsys.com/csharp/complete.html – 2013-05-03 09:36:18

If rst.EOF = True Then '----> here 
    MsgBox ("SEARCH FAILED") 
Else 
    MsgBox ("QUANTITY ORDERED " & rst!QuantityOrdered & vbCrLf & " My Load Number is " & rst!LoadNumber) 
End If

來源

2013-09-26 10:48:22

會發生什麼是你試圖運行一個簡單的查詢，即選擇*從SundryProduct？我將開始與和建立在其上消除編碼/語法possibilty導致該錯誤消息

來源

2013-05-02 14:39:59 Fosterocalypse

從數據庫查詢數據庫與vb6和ms訪問與adodb

回答

相關問題