Valeur de l'option modifiée - Erreur ODBC 2169

Question

Nous vous remercions de votre réponse. J'utilise Powerbasic (www.powerbasic.com) en tant que mon compilateur et SQLTools en tant qu'outil tiers pour accéder à ADS via ODBC. Je dois stat que cette erreur apparaît également lorsque je prends d'autres actions comme Update, Delete, Find, etc. Mais je ne sais pas lorsque j'utilise MS Access.

Voici ma routine de sauvegarde:

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 

Meilleures salutations,

Answer 1

Je ne suis pas familier avec PowerBASIC et ont eu du mal à essayer de trouver une version d'essai. Cependant, j'ai réfléchi à cela. Vous avez noté que le problème se produit avec mise à jour et supprimer ainsi que cette instruction d'insertion. Cela m'amène à croire que peut-être un attribut est défini pour indiquer que l'instruction doit renvoyer un curseur quand ce n'est pas le cas. Cependant, c'est plus une supposition sauvage.
Est-ce qu'un suivi ODBC fait la lumière sur les options qui ont été modifiées?