Import fichier ASCII dans une base
avec Delphi 7 et Oracle 8.1.7
import d'un fichier ASCII fixe de 40car.(en comptant CRLF) de long et comportant 34000 lignes
"10008CR00301100OOOOOO 00000000000000"
avec un batchmove et un fichier de structure (.sch) , l'import dans la base prend 1 mn
sans le BDE
avec un blockread et (ADO) insertrecord (reconstitution des champs)
Code:
1
2
3
4
5
6
7
8
9
10
11
12
|
While not EOF(fic_atraiter) do
begin
BlockRead(fic_atraiter,data,sizeof(data),lu);
Ma_TAbleADO.InsertRecord([data[2]+data[3]+data[4]+data[5]+data[6],
StrToDatetime(DateEdit1.Text),
data[7]+data[8]+data[9]+data[10]+data[11]+data[12]+data[13]+data[14]+data[15]+
data[16],
data[17]+data[18]+data[19]+data[20]+data[21]+data[22],
data[24]+data[25]+data[26]+data[27]+data[28]+data[29]+data[30]+data[31]+data[32]
+data[33]+data[34]+data[35]+data[36]+data[37]]);
end |
il faut 15mn :evil:
quelle solution pour améliorer le temps autre qu'un retour à Batchmove ?
