2010-04-04 59 views
0

感謝您的回覆。選項值已更改 - ODBC錯誤2169

我使用Powerbasic(www.powerbasic.com)作爲我的編譯器,SQLTools作爲通過ODBC訪問ADS的第三方工具。 我必須認爲,當我採取更新,刪除,查找等其他操作時,也會出現此錯誤。但是,當我使用MS Access時,我不會 出現此錯誤。

這是我保存常規:

Local sUsername As String 
Local sPassword As String 
Local sStatus As String 
Local sSQLStatement1 As String 

sUsername = VD_GetText (nCbHndl, %ID_FRMUPDATEUSERS_TXTUSERNAME) 
If Trim$(sUsername) = "" Then 
    MsgBox "Please, enter Username", %MB_ICONINFORMATION Or %MB_TASKMODAL, VD_App.Title 
    Control Set Focus nCbHndl, %ID_FRMUPDATEUSERS_TXTUSERNAME 
    Exit Function 
End If 

sPassword = VD_GetText (nCbHndl, %ID_FRMUPDATEUSERS_TXTPASSWORD) 
If Trim$(sPassword) = "" Then 
    MsgBox "Please, enter Password", %MB_ICONINFORMATION Or %MB_TASKMODAL, VD_App.Title 
    Control Set Focus nCbHndl, %ID_FRMUPDATEUSERS_TXTPASSWORD 
    Exit Function 
End If 

sStatus = VD_GetText (nCbHndl, %ID_FRMUPDATEUSERS_CBOSTATUS) 

sSQLStatement1 = "INSERT INTO [tblUsers] (Username, Password, Status) " + _ 
       "VALUES ('" + sUsername + "','" + sPassword + "','" + sStatus +"')" 

'Submit the SQL Statement to the database 
SQL_Stmt %SQL_STMT_IMMEDIATE, sSQLStatement1 

'Check for errors 
If SQL_ErrorPending Then 
    SQL_MsgBox SQL_ErrorQuickAll, %MSGBOX_OK 
End If 

最好的問候,

回答

0

我不熟悉Powerbasic和有麻煩試圖找到一個試用版。不過,我一直在想這個。您注意到該問題與更新和刪除以及此插入語句一起發生。這使我相信,可能是一個屬性被設置爲表明語句應該返回一個遊標時,它不。然而,這更多是一種瘋狂的猜測。
ODBC跟蹤是否對已更改的選項有所瞭解?