Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
FSEEK() problems
Message
 
To
21/04/2003 08:05:48
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Miscellaneous
Thread ID:
00779708
Message ID:
00779742
Views:
9
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
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform