bonjour,

Dans mon application Delphi, Je veux executer une commande SQL via un Dataset :

Var ChaineStr : AnsiString;

AdoDataSet1.Active:=false;
AdoDataSet1.CommandText:=(ChaineSQL);
ChaineStr:='IF EXISTS (SELECT AR_Ref FROM F_Article where Ar_Ref = ''VIN25DWH100X99.6'') UPDATE F_ARTICLE SET AR_PrixAch=143.41, AR_PrixVen=115.29 WHERE (AR_Ref =''VIN25DWH100X99.6'')';


AdoDataSet1.Active:=true;

Lorsque j'execute cette dernière ligne (AdoDataSet1.Active:=true,

j'obtiens le message :
Le Projet Test.exe a provoque une classe d'exception EDataBaseError avec le message 'AdoDataSet1: commandText ne renvoie pas un ensemble de résultats'

Que puis je faire pour résoudre ce problème ?

Merci d'avance pour votre aide.