Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Working with Text Files
Message
 
 
À
07/09/2001 12:45:54
Raven Ferrer
Software Solutions
Manila, Philippines
Information générale
Forum:
Visual FoxPro
Catégorie:
Autre
Divers
Thread ID:
00553872
Message ID:
00553922
Vues:
16
>If such codes would deal only with smaller files, how do i get along with big files? lets say joining 2 text files of 300Mbytes in size each? Coz ill be working with such big files. TIA
* Open first file
lnFH1 = FOPEN("file1.txt", 12)
* Move pointer to the end of the file
= FSEEK(lnFH1, 0, 2)
* Open second file
lnFH2 = FOPEN("file2.txt")

DO WHILE NOT FEOF(lnFH2)
   lcBuffer = FREAD(lnFH2, 2^16-1)
   = FWRITE(lnFH1, lcBuffer)
ENDDO
* Close files
= FCLOSE(lnFH1)
= FCLOSE(lnFH2)
--sb--
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform