Manipulation base de donnée SQL server 2000 composant Tquery

Résolu
naimolphe
Messages postés
3
Date d'inscription
dimanche 20 janvier 2008
Statut
Membre
Dernière intervention
24 mars 2008
- 24 mars 2008 à 18:46
cs_deutsch
Messages postés
58
Date d'inscription
lundi 6 mars 2006
Statut
Membre
Dernière intervention
1 avril 2010
- 30 mars 2008 à 17:04
bonjour
voila ce que j'ai fait mais lemessage d'erreur s'affiche masi l'ajout ce fait

le program:
procedure TForm1.Button2Click(Sender: TObject);
var requete : string;
begin

requete := 'insert into tableclient (code_client,nom_client,prenom_client,adresse_client,mail_client,tel_client,portable_client) values(:x1,:x2,:x3,:x4,:x5,:x6,:x7)';
form2.query1.close;
form2.Query1.SQL.Clear;
form2.query1.sql.add(requete);
form2.query1.parambyname('x1').asinteger := strtoint(edit1.text);
form2.query1.parambyname('x2').asstring := edit2.text;
form2.query1.parambyname('x3').asstring := edit3.text;
form2.query1.parambyname('x4').asstring := edit4.text;
form2.query1.parambyname('x5').asstring := edit5.text;
form2.query1.parambyname('x6').asinteger := strtoint(edit6.text);
form2.query1.parambyname('x7').asinteger := strtoint(edit7.text);
form2.query1.execsql;
form2.Query1.Free;
form2.Query1.Open;
end;

message derreur:
project.prpjet.exe raised exeption class EAacessviolation with message'acess violation at adress0047d2A6 in module 'project.exe'read of adress '00000000' process stoped use step or run to continu



merci

2 réponses

f0xi
Messages postés
4205
Date d'inscription
samedi 16 octobre 2004
Statut
Modérateur
Dernière intervention
12 mars 2022
37
24 mars 2008 à 19:08
on pose la question dans le sujet pas dans le titre!







<hr size="2" width="100%" />


http://deefaze.gnomz.com
3
cs_deutsch
Messages postés
58
Date d'inscription
lundi 6 mars 2006
Statut
Membre
Dernière intervention
1 avril 2010

30 mars 2008 à 17:04
Slt

Kand tu fait un insert via un query tu doit le suivre par un select pour ne pas avoir de message d'erreur

exemple

insert into tab values(1,2,3)
select * from tab where champs=222

bon courage
0