Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Reading in an ascii file with FOPEN()
Message
From
05/03/1999 12:07:21
 
 
General information
Forum:
Visual FoxPro
Category:
Other
Miscellaneous
Thread ID:
00194312
Message ID:
00194567
Views:
21
>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
>
---------
Hi Iain...thanks for the code... :)
Robert Keith
Independent Developer
San Antonio, Texas
E-mail address:
rebelrob1@yahoo.com
Previous
Reply
Map
View

Click here to load this message in the networking platform