Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Reading in an ascii file with FOPEN()
Message
From
05/03/1999 11:19:28
 
 
To
04/03/1999 23:08:28
General information
Forum:
Visual FoxPro
Category:
Other
Miscellaneous
Thread ID:
00194312
Message ID:
00194515
Views:
20
Why append to another ascii file, why not to a memo field in a table, then export that memo field to an ascii file, then Append FROM to your Table.
gnFileHandle = FOPEN("DataIn.TXT")
DO WHILE NOT feof(gnFileHandle)
 gcString = FGETS(gnFileHandle, 1060) && or LF+CR, which ever is first
 if NOT USED('MOVEtable')
  use movetable in 0 
 endif
 select movetable
 replace line1 with gcstring
ENDDO
=FCLOSE(gnFileHandle)
copy MEMO LINE1 to newfile.txt
if not USED('NewData')
 Use NewData in 0 
endif
select NewData
Append from Newfile.txt sdf
Iain Brodie
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform