Salut tous le monde
J'ai connecté 2 adoquery à une adoconnection et ce dernier connecté à une base mysql.
//Le but et de remplire le contenu de chaque colonne d'adoquery1 dans l'adoquery2
Le problème c'est lorsqu'il arrive à l'enregistrement 139 il affiche cette erreure
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35 SQL1 :='Select * from gest_horaire';colonne coneant le code à remplire dans la calendrier. SQL2 :='select * from calendr2006';//table contenant une colonne id et 365 colonne pour les jours de l'anné ADOQuery1.SQL.Delete(0) ;//contenant 1 et 7 colonne nommé lundi .... Dimanche ADOQuery1.SQL.Add(sql1) ; ADOQuery1.Active := false; ADOQuery1.Active := true ; ADOQuery1.first; ADOQuery2.SQL.Delete(0) ; ADOQuery2.SQL.Add(sql2) ; ADOQuery2.Active := false; ADOQuery2.Active := true ; ADOQuery2.first; ADOQuery1.MoveBy(1); //parcoure du 2ème ligne for j:= 1 to ADOQuery1.FieldCount-1 do begin // parcour table gest_horaire for i:= 1 to ADOQuery2.FieldCount-2 do begin //parcour table calendr2006 code := adoquery1.Fields[j].Value ;// code à mettre dans chaque jour de l'anné Date1 := EncodeDateDay(2006, i); JourSem := DayOfTheweek(Date1);//connaitre le jour de la semaine if (adoquery2.Fields[i].Value <> code) then begin if j = JourSem then begin ADOquery2.edit; ADOquery2.Fields[i].value := code ; ADOquery2.post; code := ''; end; end; end;
Est'elle problème de limite du nombre d'enregistrement que peut supporter un adoquery ou qoui?
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8 --------------------------- Debugger Exception Notification --------------------------- Project MDIAPP.exe raised exception class EDatabaseError with message '[MySQL][ODBC 3.51 Driver][mysqld-5.0.19-nt]Got error 139 from storage engine'. Process stopped. Use Step or Run to continue. --------------------------- OK Help ---------------------------
J'éspère sue c'est claire le code et merci d'avance
Partager