- Charte d'utilisation de CodeS-SourceS - Aspects légaux
- Charte d'utilisation de CodeS-sourceS-- Respect d'autrui
- Charte de CommentCaMarche.net - Conseils d'écriture
- Charte de Codes-SourceS -- Neutralité
- Charte d'utilisation de Codes Sources
- Charte d'utilisation de Codes-Sources -- Gestion de communauté
Adoquery requête INSERT [Résolu]
pierrecoulon
Contributeur Dernière intervention
3 juillet 2015
- 28 août 2008 à 09:21
- Messages postés
- 32
- Date d'inscription
- jeudi 19 juin 2008
- Dernière intervention
- 11 septembre 2008
- Messages postés
- 1293
- Date d'inscription
- mardi 28 octobre 2003
- Statut
A voir également:
- Adoquery delphi
- Delphi adoquery - Meilleures réponses
- Adoquery delphi example - Meilleures réponses
- [Delphi XE2] Contrôle des fuites mémoires avec FastMM4 - Conseils pratiques - Delphi
- [delphi] déclarer et utiliser les types - Conseils pratiques - Delphi
- [delphi] compatibilité et directives - Conseils pratiques - Delphi
- [delphi] installer des composants - Conseils pratiques - Delphi
- [delphi] optimiser le contenu de vos zips - Conseils pratiques - Delphi
13 réponses
Meilleure réponse
- Messages postés
- 1293
- Date d'inscription
- mardi 28 octobre 2003
- Statut
Bon, essaie ça :
(au passage, tu peux renommer ton ADOQuery1)
With Dlg.ADOQuery1 do begin
With SQL do begin
Clear;
Add('INSERT INTO fournisseurs (nom_societe, personne_contact, rue, numero_rue,');
Add(' numero_telephone, numero_gsm, numero_tva, remarque)');
Add('VALUES (''' + Dlg.Edit2.Text +''', '''+ Dlg.Edit1.Text +''', '''+ Dlg.Edit3.Text + ''', '''+ Dlg.Edit4.Text +''', '''+
Dlg.Edit6.Text +''', '''+ Dlg.Edit7.Text +''','''+ Dlg.Edit8.Text +''', '''+ Dlg.Edit12.Text +''')');
end;
ExecSQL;
end;
NB : Il ne faut pas qu'il y ait d'apostrophe dans les valeurs de tes edit sinon, tu dois trouver une procedure pour doubler les apostrophes pour ces valeurs.
Quel est le type de fichiers de ta base de données ?
Simon
(au passage, tu peux renommer ton ADOQuery1)
With Dlg.ADOQuery1 do begin
With SQL do begin
Clear;
Add('INSERT INTO fournisseurs (nom_societe, personne_contact, rue, numero_rue,');
Add(' numero_telephone, numero_gsm, numero_tva, remarque)');
Add('VALUES (''' + Dlg.Edit2.Text +''', '''+ Dlg.Edit1.Text +''', '''+ Dlg.Edit3.Text + ''', '''+ Dlg.Edit4.Text +''', '''+
Dlg.Edit6.Text +''', '''+ Dlg.Edit7.Text +''','''+ Dlg.Edit8.Text +''', '''+ Dlg.Edit12.Text +''')');
end;
ExecSQL;
end;
NB : Il ne faut pas qu'il y ait d'apostrophe dans les valeurs de tes edit sinon, tu dois trouver une procedure pour doubler les apostrophes pour ces valeurs.
Quel est le type de fichiers de ta base de données ?
Simon
Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire
a aidé 106 internautes ce mois-ci
- Messages postés
- 32
- Date d'inscription
- jeudi 19 juin 2008
- Dernière intervention
- 11 septembre 2008
- Messages postés
- 1293
- Date d'inscription
- mardi 28 octobre 2003
- Statut
Quelles modifications as-tu fait ?
ExecSQL c'est une procedure(?) de quelques composants de requetes que je connais . Je ne sais pas si ça fonctionne pour le adoquery mais à priori... Il faut donc que tu essaies :
Dlg.ADOQuery1.ExecSQL;
Sinon, comme je l'ai dit plus haut, le ExecSQL est pour les SQL de type Insert, Update ou Delete et le Open est pour les Select... (Cherche sinon si tu n'as pas un ADOQuery1.ExecQuery ou un truc comme ça)
Simon
ExecSQL c'est une procedure(?) de quelques composants de requetes que je connais . Je ne sais pas si ça fonctionne pour le adoquery mais à priori... Il faut donc que tu essaies :
Dlg.ADOQuery1.ExecSQL;
Sinon, comme je l'ai dit plus haut, le ExecSQL est pour les SQL de type Insert, Update ou Delete et le Open est pour les Select... (Cherche sinon si tu n'as pas un ADOQuery1.ExecQuery ou un truc comme ça)
Simon
- Messages postés
- 32
- Date d'inscription
- jeudi 19 juin 2008
- Dernière intervention
- 11 septembre 2008
Dlg.ADOQuery1.SQL.clear;
Dlg.Adoquery1.sql.Add('INSERT INTO fournisseurs (nom_societe,');
Dlg.Adoquery1.sql.Add('personne_contact, rue, numero_rue,');
Dlg.Adoquery1.sql.Add('numero_telephone, numero_gsm,');
Dlg.Adoquery1.sql.Add(' numero_tva, remarque ');
Dlg.Adoquery1.sql.Add(') VALUES ');
Dlg.Adoquery1.sql.Add('(' + Dlg.Edit2.Text + ', ' + Dlg.Edit1.Text + ', ' + Dlg.Edit3.Text + ', ' + Dlg.Edit4.Text + '');
Dlg.Adoquery1.sql.Add(', ' + Dlg.Edit6.Text + ', ' + Dlg.Edit7.Text + ', ' + Dlg.Edit8.Text + ', ' + Dlg.Edit12.Text + ');');
Dlg.ADOQuery1.ExecSQL;
voici ma requête actuelle et elle ne fonctionne pas!
Dlg.Adoquery1.sql.Add('INSERT INTO fournisseurs (nom_societe,');
Dlg.Adoquery1.sql.Add('personne_contact, rue, numero_rue,');
Dlg.Adoquery1.sql.Add('numero_telephone, numero_gsm,');
Dlg.Adoquery1.sql.Add(' numero_tva, remarque ');
Dlg.Adoquery1.sql.Add(') VALUES ');
Dlg.Adoquery1.sql.Add('(' + Dlg.Edit2.Text + ', ' + Dlg.Edit1.Text + ', ' + Dlg.Edit3.Text + ', ' + Dlg.Edit4.Text + '');
Dlg.Adoquery1.sql.Add(', ' + Dlg.Edit6.Text + ', ' + Dlg.Edit7.Text + ', ' + Dlg.Edit8.Text + ', ' + Dlg.Edit12.Text + ');');
Dlg.ADOQuery1.ExecSQL;
voici ma requête actuelle et elle ne fonctionne pas!
- Messages postés
- 32
- Date d'inscription
- jeudi 19 juin 2008
- Dernière intervention
- 11 septembre 2008
- Messages postés
- 32
- Date d'inscription
- jeudi 19 juin 2008
- Dernière intervention
- 11 septembre 2008
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.