Discussion :

[heart100]

Salut mes amis , j'ai un petit souci sur Access+Delphi2010+Ado
j'ai la requette suivante:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
dm.cmd.SQL.text:='SELECT fournisseur FROM articles  INNER JOIN lignes_achats   ON articles.code = lignes_achats.code   where lignes_achats.n_achats='+dbtext1.Caption;

qui m'a donnée un tableau sans erreur , mon problème c'est que j'arrive pas à passer une "UPDATE" sur set resultat pour modifier la colonne 'Fournisseur'
je veut dire , effectuer un Update sur un Select
ceci n'a marche plus:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
dm.cmd.SQL.text:='Update T set fournisseur ='blabla' from(SELECT fournisseur FROM articles  AS T INNER JOIN lignes_achats   ON articles.code = lignes_achats.code   where lignes_achats.n_achats='+dbtext1.Caption);

Aidez-moi s'il vous plait.

[Jean-Philippe André]

Salut,

ca prendrait un doublage de quote pour déterminer le texte en delphi ?

[tee_grandbois]

bonsoir,
en SQL standard, exécuter une requête Update à partir d'une requête Select se fait plutôt comme cela (le WHERE sur la table (T) à mettre à jour en moins, sinon c'est mise à jour de toute la table):

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

 dm.cmd.SQL.text:='Update T set fournisseur = (SELECT fournisseur FROM articles  AS T INNER JOIN lignes_achats  ON articles.code = lignes_achats.code  where lignes_achats.n_achats='+dbtext1.Caption);

pour autant que la requête Select ne ramène qu'un seul enregistrement sinon c'est l'erreur classique (single-row subquery returns more than one row ...) et que la syntaxe Delphi soit correcte