Discussion :

[care]

Bonjour

voila je voudrais une fois que ma stringgrid est remplit de notes (notes d'éleves pour chaque matières) mettre ces notes dans une table NOTE dans acces en fonction de chaque n°eleve!

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
 
var i : integer;
begin
for i:=1 to televe.RowCount do
begin
ADOQuery1.SQL.Clear;
ADOQuery1.SQL.Add('insert into note (Francais, Maths, Hist-geo,LV1,SVT) in "C:\Documents and Settings\care.jf\Bureau\Brevet.mdb" select Francais=:fr, Maths=:mt, Hist-geo=:hg, LV1=:lv1, SVT=:svt  where ELENOET=:num');
Adoquery1.Parameters.paramByName('fr').Value := televe.Cells[4,i];
Adoquery1.Parameters.paramByName('mt').Value := televe.Cells[5,i];
Adoquery1.Parameters.paramByName('hg').Value := televe.Cells[6,i];
Adoquery1.Parameters.paramByName('lv1').Value := televe.Cells[7,i];
Adoquery1.Parameters.paramByName('svt').Value := televe.Cells[8,i];
ADOQuery1.Parameters.ParamByName('num').Value := televe.Cells[1,i];
ADOQuery1.ExecSQL;

pour l'instant il me donne l'erreur "erreur de syntaxe dans l'instruction INSERT INTO"
merci d'avance ^^

[Cl@udius]

Salut

Je ferais plutot ceci: un classique INSERT INTO VALUES.

Code :

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

1
2
3
4
5
6
7
8
9
10
 
ADOQuery1.SQL.Clear;
ADOQuery1.SQL.Add('insert into note (Francais, Maths, Hist-geo,LV1,SVT,ELENOET) in "C:\Documents and Settings\care.jf\Bureau\Brevet.mdb" values(:fr,:mt,:hg,:lv1,:svt,:num)');
Adoquery1.Parameters.paramByName('fr').Value := televe.Cells[4,i];
Adoquery1.Parameters.paramByName('mt').Value := televe.Cells[5,i];
Adoquery1.Parameters.paramByName('hg').Value := televe.Cells[6,i];
Adoquery1.Parameters.paramByName('lv1').Value := televe.Cells[7,i];
Adoquery1.Parameters.paramByName('svt').Value := televe.Cells[8,i];
ADOQuery1.Parameters.ParamByName('num').Value := televe.Cells[1,i];
ADOQuery1.ExecSQL;

@+ Claudius

[care]

Merci beaucoup

mais j'ai drôle de probléme j'arrive a faire aucun insert dans ma table NOTE
même si je met les même champs que dans la table eleve ca ne marche pas
je ne sais vraiment pas prk car les tables sont tt les deux pareil et ca fonctionne avec eleve mais pas avec note :s

si qq1 a une idée

[Rayek]

N'aurais tu aps une clef sur un des champs qui n'autorise pas les doublons ?

[care]

non je ne pensse pas car même quand je supprime ma table ELEVE est qu'il ne reste que la table NOTE
ca ne fonctionne pas non plus .

[care]

delphi ne doit vraiment pas apprecier le mot "NOTE" car quand je change tt les nom de champs de ma table et que je met des choses totalement differentes dans ses nouveaux champs

Héééééééé la c'est le drame !!!!! XD

ca ne marche pas non plus

[Cl@udius]

Re,

En fait j'ai du mal à comprendre ce que tu souhaites faire exactement.

Tout d'abord, avec ton StringGrid tu saisis les notes pour chaque élève. Et ensuite (c'est là que j'ai du mal à comprendre) tu souhaites faire un INSERT dans la table NOTE en faisant un SELECT sur la table ELEVE.

Quand mets-tu à jour les données dans la table ELEVE ?
Quelles sont les clés primaires sur ces 2 tables ?

@+ Claudius

[care]

1) pour te repondre cl@udius en fait j'ai :
-2 fichier .mdb :
-1er F_ele qui provien d'un fichier dbase avec une 100éne de champs concernat des éleves d'un collége.
-2éme Brevet qui concier 2 tables :
*une table eleve avec 4 champs directement repris de base F_ele
*une table note pour chaque éleve posséde 1 note par matiére

-je fait un lien entre les 2 tables de la base brevet grace au numero de l'éleve ELENOET

et je voulais recopier encore une fois les numéro (déja copier dans eleve) dans la table note pour que la relation se face bien entre les 2 tables

puis ensuite en fonction de chaque numéro on recopi les notes du stringgrid dans les champs approprié.


2) encore plus bizard quand je créé une 3 éme tables cela fonction je vais finir par croire que delphi ne veut pas de ma table NOTE XD

[care]

bon voila mon insert into pour mettre mes numero d'éléves fonction bien
mais du coup maintenant il ne faut pas que je fasse une inster into mais un UPDATE pour mettre mes notes de ma stringrid da ma table MATIERE (MATIERE est le nouveau nom de la table NOTE avec ce nom la ca marche bizard mais bon...)

et on va dire que je suis entrain de tapé un carnage avec mon update jme mélange trop xD
j'ai fait ca mais ca ne fonctionne pas

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
 
var i : integer;
begin
for i:=1 to televe.RowCount do
begin
ADOQuery1.SQL.Clear;
ADOQuery1.SQL.Add('UPDATE matiere (Francais, Maths, Hist-geo, Lv1, Svt) in "C:\Documents and Settings\care.jf\Bureau\Brevet.mdb" set  Francais=:fr, Maths=:mt, Hist-geo=:hg, Lv1=:lv1, Svt=:svt WHERE elenoet=:num');
Adoquery1.Parameters.paramByName('fr').Value := televe.Cells[4,i];
Adoquery1.Parameters.paramByName('mt').Value := televe.Cells[5,i];
Adoquery1.Parameters.paramByName('hg').Value := televe.Cells[6,i];
Adoquery1.Parameters.paramByName('lv1').Value := televe.Cells[7,i];
Adoquery1.Parameters.paramByName('svt').Value := televe.Cells[8,i];
ADOQuery1.Parameters.ParamByName('num').Value := televe.Cells[0,i];
ADOQuery1.ExecSQL;

voila mon code un ptit coup de pouce me serait bien agréable ^^

[Cl@udius]

Re,

j'ai fait ca mais ca ne fonctionne pas

Tu as une erreur à l'exécution, et si oui laquelle ?

@+

[care]

Erreur de syntaxe dans l'instruction UPDATE !!

je doit pas marquer les bonnes choses dans le update('........')
je sais pas trés bien comment le faire mon UPDATE pour qu'il parcour tt mon tableau et qu'il range les notes en fonction du num de l'éleve (ELENOET)

j'ai fait le code si dessus mais je ne croit pas qu'ils soit trés bon :s

[Cl@udius]

Re,

La syntaxe d'un UPDATE est plutôt celle-ci:

Code :

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

1
2
3
4
 
UPDATE matiere in "C:\Documents and Settings\care.jf\Bureau\Brevet.mdb"
SET Francais=:fr, Maths=:mt, Hist-geo=:hg, Lv1=:lv1, Svt=:svt 
WHERE elenoet=:num

@+