Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
How get the Number of Lines from a text file
Message
From
11/12/2000 21:59:23
 
 
To
11/12/2000 21:41:29
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Miscellaneous
Thread ID:
00451983
Message ID:
00452004
Views:
42
>>>HI all!!
>>>
>>>I wonder if someone has an specific technique to get the number of lines from a text file...
>>>
>>>thanks
>>
>>create cursor Dummy (TxtFld C (250))
>>append from TextFile SDF
>>nLines = Reccount()
>>
>
>Thanks !!
>Very clever!
>
Low level file reads might be faster:

LOCAL lnHandle, lnCount

*-----------------------------------------
*-- Get a file handle
*-----------------------------------------
lnhandle = FOPEN("myFile.txt")

*-----------------------------------------
*-- Move to the first line
*-----------------------------------------
=FSEEK(lnhandle, 0, 0)

*-----------------------------------------
*-- Loop through each line and count
*-----------------------------------------
lnCount = 0

DO WHILE !FEOF()
lnCount = lnCount + 1
=FREAD(lnHandle)
ENDDO

RETURN lnCount
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform