Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
FSEEK() problems
Message
From
21/04/2003 09:22:46
 
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Miscellaneous
Thread ID:
00779708
Message ID:
00779745
Views:
10
I will try this! thank you!

>Amanda it working !! Mi file size is 2038 MgB !
>
>//////////////////////////
>LOCAL nHan AS Integer
>LOCAL nNew AS Integer
>
> nHan = FOPEN("D:\LOLEK.TXT",12)
>
> IF nHan > 0
> nOff = FSEEK(nHan,0,2) && New pointer end file
> FOR x = nOff TO 0 STEP -2264 &&&& !!!!!!
> nNew = FSEEK(nHan,x,0) && New pointer end file
> NEXT
> FCLOSE(nHan)
> ENDIF
"In three words I can sum up everything I've learned about life : it goes on." - R. Frost

Amanda Brown
Supervisor/Programmer
Previous
Reply
Map
View

Click here to load this message in the networking platform