Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Append text to already existing text file
Message
De
20/02/2001 20:07:06
 
 
À
20/02/2001 18:18:53
Information générale
Forum:
Visual FoxPro
Catégorie:
FoxPro 2.x
Divers
Thread ID:
00477842
Message ID:
00477867
Vues:
25
>Is there a way to append text from a .dbf file to an already existing text file using the "COPY TO" command (or any other command)?
>
>Thanks,
>
>Steve Baum
>MicroSystems

This might require a little bit of tweaking but it should get you pretty close
nHandle1=FOPEN("origfile",12)
=FSEEK(nHandle1,0,2)
USE myDbf
COPY TO newfile SDF
nHandle2=FOPEN("newfile.txt")
DO WHILE NOT FEOF(nHandle2)
  cTmpStr=FGETS(nHandle2)
  =FPUTS(nHandle1,cTmpStr)
ENDDO
=FCLOSE(nHandle1)
=FCLOSE(nHandle2)
USE IN myDbf
.........Rich
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform