erreur SQL : EOleException

Version imprimable

03/07/2006, 10h31
kj_83

erreur SQL : EOleException

Bonjour ,

J'ai un problème concernant une requête SQL , une des fonctions de mon programme de gestion de stock est la mise à jour du table (tblConsommation) qui sert lorsque l'utilisateur souhaite retirer un produit du stock , on lui demande un certain nombre de renseignement : son nom, prénom, service auquel il appartient , le nom du produit qu'il veut retirer, sa quantité et la date du retrait .En claire il y a 6 champs dans cette table (tblConsommation) le code est donc :

ADOQuerySortieStock->SQL->Add("INSERT INTO tblConsommation (Nom,Prenom,Service,Produit,Quantite,Date) ");
ADOQuerySortieStock->SQL->Add("VALUES (:ParamNom,: ParamPrenom,: ParamService,:ParamNomProduit,:ParamStockMin,:ParamDate)");

ADOQuerySortieStock->Parameters->ParamByName("ParamNom")->Value = DBLookupComboBoxProdSorti->Text ;
ADOQuerySortieStock->Parameters->ParamByName("ParamPrenom")->Value = DBLookupComboBoxPourQuiNom->Text ;
ADOQuerySortieStock->Parameters->ParamByName("ParamService")->Value = DBLookupComboBoxPrenom->Text ;
ADOQuerySortieStock->Parameters->ParamByName("ParamNomProduit")->Value = DBLookupComboBoxService->Text ;
ADOQuerySortieStock->Parameters->ParamByName("ParamStockMin")->Value = ComboBoxQuantiteSortie->Text ;
ADOQuerySortieStock->Parameters->ParamByName("ParamDate")->Value = EdtDateSortieStock->Text ;

Explication :

": ParamNom..."représentent les paramètres entrés par l'utilisateur
(":" indique qu'il s'agit de paramètre).
Et les lignes suivantes indiquent au programme que les paramètres se trouvent dans des listes déroulantes contenants les données d'un champ d'une des tables (DBLookupComboBoxProdSorti->Text ) .

J'obtiens l'erreur suivante :
Le projet ... à provoqué une classe d'exception EOleException avec le
messsage "Erreur de syntaxe dans l'instruction INSERT INTO"...

Je ne comprends pas l'erreur alors svp un petit coups de main serait sympa.
A+
03/07/2006, 10h42
pottiez

Essaye en mettant les lignes enregistrant les parametres avant ta requete INSET INTO, sinon je ne voit pas trop.
03/07/2006, 11h06
kj_83

Salut

Merci pour ta réponse.
En faisant ce que tu m'a dis j'obtiens l'erreur suivante :
"Le projet ... a provoqué une classe d'exception EOleException avec le message 'Objet Parameter défini de manière incorrecte . Des informations incohérentes ou incomplètes ont été fournies.' ...
03/07/2006, 11h17
pottiez

T'es paramètre sont ils déjà créé dans la base, si il ne le sont pas il faut le faire.

Sinon, essaye de passer par la fonction SetData pour attribuer les valeurs à tes paramètres
03/07/2006, 11h56
kj_83

Ma table contenant les champs qui vont être remplis suite à l'execution de la requête SQL est déjà crée.

J'ai remplacé le TADOQuery par un TADODataSet mais j'obtiens la même erreur :
Objet Parameters défini de manière incorrecte . Des informations incohérentes ou incomplètes ont été fournies.
03/07/2006, 12h41
pottiez

Oui mais a part ta Table, et ce que tes parametres sont créé dans ta base ?
03/07/2006, 13h55
kj_83

Je ne comprends pas ce que tu dis : créer des paramètres dans une base ?

Il ne suffit pas de les déclarer dans le TQuery ou TDataSet ?
03/07/2006, 15h39
pottiez

Bin il me semblait qu'il fallait les créer dans la base, mais je peut peut etre me tromper, moi je ne passe pas par des parametre sous SQL pour eviter ce genre de probleme.
04/07/2006, 09h29
kj_83

Salut

Le DataSource normalement lié à mon ADOQuery n'accepte pas dans sa propriété DataSet ce ADOQuery , lorsque je le mets il me dit :
Liaisons de données circulaires non autorisées

Voilà c'est peut-être de là que vient le problème mais je ne sais pas comment le résoudre.
04/07/2006, 09h36
BOUBOU81

Dans ton ADOQuery il faut que tu enleves ce que tu as mis dans la propiété
DataSource et que tu la laisse vide, si tu lié ton DataSource à ton ADOQuery
ce que je te conseille de faire;)
04/07/2006, 09h56
kj_83

Merci s'était ça le problème.

Mais j'ai toujours le même problème de INSERT INTO comme je le dis dans mon 1er message .
Voilà j'espère que tu pourras m'aidé car pottiez comme tu pourras le voir m'a donné plusieurs info mais sans résultat.

(pour plus d'info sur mon problème réfaire toi au 1er message de la discussions).
04/07/2006, 10h00
BOUBOU81

tu veux obligatoirement passer par des parameters
car sinon tu le passe comme ca

AnsiString requete="INSERT INTO tblConsommation (Nom,Prenom,Service,Produit,Quantite,Date) ";
requete+=" VALUES ('"+DBLookupComboBoxProdSorti->Text+"','"+DBLookupComboBoxPourQuiNom->Text+"','"+DBLookupComboBoxPrenom->Text+"','"+DBLookupComboBoxService->Text+"',"+ComboBoxQuantiteSortie->Text+","+EdtDateSortieStock->Text+") ";
ADOQuerySortieStock->Close();
ADOQuerySortieStock->Clear();
ADOQuerySortieStock->SQL->Add(requete);
ADOQuerySortieStock->ExecSQL();

Essaye juste pour voir et dis moi après on veras pour les parmeters, mais teste ca juste pour voir ce que ca donne;)

Pense a mettre résolu sur ton premier message
04/07/2006, 10h10
kj_83

A priori je pense pas qu'il y ait d'autre solutions pour récupérer les données entrées par un utilisateur mais si tu a une autre idée je suis preneur.
04/07/2006, 10h18
kj_83

J'ai essayé mais il y a toujours la même erreur de syntaxe avec le INSERT INTO
04/07/2006, 10h20
BOUBOU81

il ne te met rien de plus dans le message d'erreur qui pourrai peut-etre nous aidé?

Est-ce que tu peux nous donner la structure de ta table :
nom des champs et le type de chaque champ
04/07/2006, 10h35
kj_83

L'erreur est :" Le projet ... a provoqué une classe d'exception EOleException avec le message ' Erreur de syntaxe dans l'instruction INSERT INTO ' ... "

Structure de ma table Access (tblConsommation) :
6 champs : Nom de type texte (indexé - avec doublons)
Prénom de type texte (indexé - avec doublons)
Service de type texte (indexé - avec doublons)
Produit de type texte (indexé - avec doublons)
Quantite de type numérique (non indexé)
Date de type date/heure (indexé - avec doublons)

+ une clé primaire de type numéroAuto (indexé - sans doublons)

Met plutot ce code ci :

Code:

1
2
3
4
5
6
7
8
AnsiString requete="INSERT INTO tblConsommation (Nom,Prenom,Service,Produit,Quantite,Date) ";
requete+=" VALUES ('"+DBLookupComboBoxProdSorti->Text+"','"+DBLookupComboBoxPourQuiNom->Text ;
requete+="','"+DBLookupComboBoxPrenom->Text+"','"+DBLookupComboBoxService->Text ;
requete+="',"+ComboBoxQuantiteSortie->Text+",'"+EdtDateSortieStock->Text+"') ";
ADOQuerySortieStock->Close();
ADOQuerySortieStock->Clear();
ADOQuerySortieStock->SQL->Add(requete);
ADOQuerySortieStock->ExecSQL();

En fait il manque les ' pour la date, il suffit juste de les rajouter.

04/07/2006, 10h52
kj_83

Désolé ça ne fonctionne pas même en ajoutant les ' au niveau de la quantité , j'obtiens toujours la même erreur.

Il ne faut pas ajouter les ' au niveau de la quantité, vu que c'est un type numérique, par contre il faut bien les ajouter pour la date.

Sinon essaye comme ceci :

Code:

1
2
3
4
5
6
7
8
9
10
AnsiString requete="INSERT INTO tblConsommation (Nom,Prenom,Service,Produit,Quantite,Date) ";
ADOQuerySortieStock->Close();
ADOQuerySortieStock->Clear();
ADOQuerySortieStock->SQL->Add(requete);
requete=" VALUES ('"+DBLookupComboBoxProdSorti->Text+"','"+DBLookupComboBoxPourQuiNom->Text ;
requete+="','"+DBLookupComboBoxPrenom->Text+"','"+DBLookupComboBoxService->Text ;
requete+="',"+ComboBoxQuantiteSortie->Text+",'"+EdtDateSortieStock->Text+"') ";
ADOQuerySortieStock->SQL->Add(requete);
ADOQuerySortieStock->ExecSQL();

04/07/2006, 11h04
kj_83

Désolé mais toujours la même erreur.
04/07/2006, 11h07
pottiez

Je sais pourquoi, c'est parce que tu as une colone qui s'appelle Date, comme c'est aussi le nom d'un type de donnée il provoque une erreur, il faut que tu remplace Date par [Date] a chaque fois que Date fait réference à ta colone.
04/07/2006, 11h12
kj_83

C'est ça merci à vous deux pour le coups main .
Ce genre d'erreur montre bien à quel point je ne suis pas très expérimenté
04/07/2006, 11h13
pottiez

T'inquiéte pas, l'experience arrive avec le temps, je connait cette erreur car j'ai déjà eu le probleme et au fur et à mesure ou tu resoud tes erreurs tu apprend en même temps à ne plus les faire.