Problème ADO - INSERT INTO

Version imprimable

Bonsoir,

Me voilà confronté depuis 4 heures à un problème assez bizarre.

J'utilise Delphi 2005, une base de données ACCESS et des composants ADO pour effectuer mes requêtes et accéder à ma base access.

Voila la structure de ma table USERS :
- iduser : incrauto
- LOGIN : varchar(25)
- PASSWORD : varchar(25)

Lorsque j'insère par SQL et ADO ceci :
DM.Q_New_User.SQL.Add('INSERT INTO USERS (LOGIN) VALUES ('+ QuotedStr(form12.login_edit.Text) +')');
Ca marche.

Si maintenant je fais :
DM.Q_New_User.SQL.Add('INSERT INTO USERS (LOGIN, PASSWORD) VALUES ('+ QuotedStr(form12.login_edit.Text) +','+QuotedStr(form12.password_edit.Text)+')');
J'ai une erreur type : Erreur de syntaxe dans l'instruction INSERT INTO

Dans son contexte :
Code:

1 2 3 4 5 6 7 8 9 10 11 12 //On insère /////////// // Fermeture de la requete Q_New_User DM.Q_New_User.Close; // Effacement de la requete DM.Q_New_User.SQL.Clear; // Modification de la requete DM.Q_New_User.SQL.Add('INSERT INTO USERS (LOGIN, PASSWORD) VALUES ('+ QuotedStr(form12.login_edit.Text) +','+QuotedStr(form12.password_edit.Text)+')'); showmessage(DM.Q_New_User.SQL.Text); // Ouverture de la requete DM.Q_New_User.ExecSQL;
Remarque : De même, je retrouve le même type d'erreur en faisant un UPDATE.

J'ai bô cherché, je ne trouve pas de solution.

Merci d'avance pour votre aide...

12/12/2005, 17h38
layouni

Mot de passe vide

Bonjour

vérifier si le mot de passe est vide ,elle pose des pbs

A+
12/12/2005, 17h47
unionriton

Re: Mot de passe vide

Citation:

Envoyé par layouni

Bonjour

vérifier si le mot de passe est vide ,elle pose des pbs

A+

Lors des tests, les champs Login et Password sont vérifiés et ne doivent pas être nuls. Donc cela ne vient pas de là.

Merci quand même pour ta réponse.
12/12/2005, 18h05
cmen76

Réponse idiote peut-être, mais tu fais bien un

Code:

DM.Q_New_User.SQL.Clear

avant ton Add ?

Citation:

Envoyé par cmen76

Réponse idiote peut-être, mais tu fais bien un

Code:

DM.Q_New_User.SQL.Clear

avant ton Add ?

Oui tout à fait.

Voici ce que j'ai :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
    //On insère
    ///////////
    // Fermeture de la requete Q_New_User
  DM.Q_New_User.Close;
  // Effacement de la requete
  DM.Q_New_User.SQL.Clear;
  // Modification de la requete
  DM.Q_New_User.SQL.Add('INSERT INTO USERS (LOGIN, PASSWORD) VALUES ('+ QuotedStr(form12.login_edit.Text) +','+QuotedStr(form12.password_edit.Text)+')');
 
  showmessage(DM.Q_New_User.SQL.Text);
   // Ouverture de la requete
  DM.Q_New_User.ExecSQL;

Essai ca, si il y a un problème, c'est qu'il y a un soucis avec ta base de données.

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
 
With DM.Q_New_User do
begin
  Close;
  SQL.Clear;
  SQL.Add('Select * from Users');
  Open;
  Append;
  FieldByName('Login').asString := form12.login_edit.Text;
  FieldByName('Password').Asstring := form12.password_edit.Text;
  try
    Post;
  Except on E:Exception do
    Showmessage('Erreur : ' + E.Message);
  End;
end;

13/12/2005, 08h44
SkYsO

Il peut aussi y avoir un problème avec des champs qui sont utilisés par le système ?

Je sais que j'avais eu des soucis avec des champs qui s'appelait Min ou Max (Et oui pas terrible ce genre de nom mais bon c'est une reprise d'existant)
En mettant entre [ ] ça passait.

Enfin je me souviens pas que PASSWORD soit un mot réservé.

++
13/12/2005, 10h13
Rayek

Pour les mots réservés y a >>> ici <<<

Aucun des noms qu'il utilise n'est dans cette liste.

Sinon est ce un composant AdoqQuery ou un AdoDataset utilisé comme un adoQuery ?
13/12/2005, 21h02
baba
Salut,
pour ajouter un enregistrement :
Code:

1 2 3 DM.Q_New_User.SQL.Add( ' INSERT INTO USERS(Login, password) ' ); DM.Q_New_User.SQL.Add( ' VALUES(:Login, :password) ' );
// Ici on définit le type de chaque paramètre (longin et password) comme suit :
Code:

1 2 3 DM.Q_New_User.Parameters[0].AsString; DM.Q_New_User.Parameters[1].AsString;
// puis on associe les valeurs de chaque edit.text avec son type correspondant comme suit :
Code:

1 2 3 DM.Q_New_User.ParamByname('Longin').AsString := form12.login_edit.Text; DM.Q_New_User.ParamByname('Password').AsString := form12.Password_edit.Text;
Après chaque Insertion(INSERT INTO), mise à jour (UPDATE) on utilise toujours ExecSQL au lieu de OPEN, parce que la requete ne renvoie pas de résultat.
Donc, on execute la requete par :
Code:

1 2 DM.Q_New_User.ExecSQL;
j'espère que j'étais claire.
bonne chance.
14/12/2005, 09h22
Rayek
Citation:
Envoyé par baba

// Ici on définit le type de chaque paramètre (longin et password) comme suit :

Code:

1 2 3 DM.Q_New_User.Parameters[0].AsString; DM.Q_New_User.Parameters[1].AsString;
Inutile et ca n'existe pas en ADO.

De plus il n'y a aucune utilité à définir le type des paramètres, puisque que cela se fait automatiquement quand tu transmets les paramètres via ParamByName.

ParamByName('UnChamp').AsString = Paramètre de type chaine
ParamByName('UnChamp').AsInteger = Paramètre de type entier
ParamByName('UnChamp').AsDataTime = Paramètre de type date heure.
etc ...
14/12/2005, 13h13
isachat666

La syntaxe de la requête semble bonne a priori mais que te renvoie DM.Q_New_User.SQL.Text ??
S'il y a des quote ou double quote dans login_edit.text ou dans password_edit.text cela peut provoquer effectivement des erreurs de syntaxe.

Isa
14/12/2005, 14h28
cmen76

Puisqu'on a un doute sur le fait que Password soit un mot réservé, il faudrait essayer ce SQL

Code:

DM.Q_New_User.SQL.Add('INSERT INTO USERS (LOGIN, "PASSWORD") VALUES ('+ QuotedStr(form12.login_edit.Text) +','+QuotedStr(form12.password_edit.Text)+')');
14/12/2005, 14h36
Rayek

Citation:

Envoyé par cmen76

Puisqu'on a un doute sur le fait que Password soit un mot réservé, il faudrait essayer ce SQL

Code:

DM.Q_New_User.SQL.Add('INSERT INTO USERS (LOGIN, "PASSWORD") VALUES ('+ QuotedStr(form12.login_edit.Text) +','+QuotedStr(form12.password_edit.Text)+')');

Faudrait surtout que le créateur de ce post, nous dise où il en est ^^