Discussion :

[Benjamin GAGNEUX]

bonjour,

j'utilise une une base de données ACCESS 2000 sous MSJET via ADO.

Mon projet fait appel à un grand nombre de requête allant de la plus simple à des requêtes relativement complexes.

Alors que tout fonctionne bien au niveau des requêtes complexes, deux requêtes (update et insert) on ne peut plus simple refusent de fonctionner.

Delphi renvoie : 'EOleException : erreur de syntaxe dans l'instruction UPDATE'
JET renvoie comme erreur : '3000 erreur de syntaxe dans l'instruction UPDATE'
En regardant dans le fichier d'aide JETERR40.CHM, le descriptif de l'erreur est : Erreur réservée <élément> ; aucun message n'est assigné à cette erreur. (Erreur 3000)

J'ai une table Utilisateur qui comprend les champs:
UtilisateurID incrémentAuto
Pseudo Text 20
Password Text 20
OnLine Octet


et ce code (modification du mot de passe):

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
 
  sSql := 'UPDATE Utilisateur SET Password='''+EditNewPass1.Text+
          ''' WHERE UtilisateurID='+IntToStr(fidUtil);
 
  try
    with DM.Query1 do
    begin
      SQL.Clear;
 
      SQL.Add(sSql);
 
      ExecSQL;
 
      Close;
    end;
  except
    on E:Exception do begin
      if (DM.CheckLevelJETErreur(E.Message)) then BtokClick(Sender);
      Exit;
    end;
  end;

Le code me semble normal et devrait fonctionner.
et pourtant ...
(la requete fonctionne lorsqu'elle est lancée via ACCESS)

Quelqu'un a-t-il eu le même problème ?

Comment solutionner ce problème ?

merci

[cyril]

Bonjour,

Peut-tu essayer ?

Code :

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

sSql := 'UPDATE Utilisateur SET Password='+ QuotedStr(EditNewPass1.Text)+ ' WHERE UtilisateurID=' + (fidUtil);

A+
Cyril

[cyril]

J'ai été trop vite il faut enlever les parenthéses de ta variable fidUtil.
Ton UtilisateurID est de type numéric et tu essais de le comparer avec
fidUtil que tu transforme en String.

A+
Cyril

[Benjamin GAGNEUX]

Ton UtilisateurID est de type numéric et tu essais de le comparer avec
fidUtil que tu transforme en String

Je me trompe peut être mais cela ne peu pas marcher :
sSql est de type string, il faut donc que ma requete soit une chaine de caractères.
Dans ma requète, il faut que les chaines de caractère soient entre simples cotes (ce qui nous oblige à en mettre deux pour delphi), les chiffres sont afficher à l'état brut.

par exemple, sous ACCESS :
UPDATE Utilisateur SET Password='MotDePasse' WHERE UtilisateurID=1
cela fonctionne.

sous delphi pour obtenir cette chaine de caractères qui constitue ma requete, en statique :
sSql := 'UPDATE Utilisateur SET Password=''MotDePasse'' WHERE UtilisateurID=1';
Là ça ne fonctionne pas ... erreur 3000...

PS : les '' sont deux quotes simples (et non une double).

Le plus curieux, c'est que des requetes beaucoup plus complexes avec sous-requetes et liaisons (meme avec UPDATE) fonctionnent très bien...

Je ne suis pas sur d'avoir bien compris ce que tu voulais dire.

[Benjamin GAGNEUX]

Après plusieurs vérification, j'ai constaté que seul la table Utilisateur pose des problèmes en modification.
Cependant elle ne semble pas avoir de différence au niveau des options vis a vis des autres (sauf le fait de ne posséder aucune liaison avec d'autre table).

D'ou peut venir ce problème ?

J'approche à grands pas de la date de fin du projet et malheureusement je préfèrerais éviter de supprimer le système de loggin (pour une application multi-poste, ca ne ferait pas très sérieux...).

merci

[Benjamin GAGNEUX]

Ca y est le problème est résolu...

J'ai changé le champs 'password' par 'pass' et comme par hasard tout fonctionne ...

Password est peut etre mal interprété par le moteur JET (sait-on jamais).

J'espère que cela pourra servir à d'autres...
a bientot,

PS : A force de , je vais me chercher un aspirine (sacré microsoft)