Hey Gang...

Any quick way to Count the number of Lines in a Text File?

I have some data coming in a delimited textfile. Each line represents a normal record.

What I did was to open the file, and loop through each line of data and keep track of how many times this was done until I reach the end of the file.... like this...

*Count the number of records in the file...
     lnNumOfRecords = 0
     DO WHILE !FEOF(lnHandle)
          lcText = ALLTRIM(FGETS(lnHandle))
          lnNumOfRecords = lnNumOfRecords + 1
     ENDDO
     filetop  = FSEEK(lnHandle, 0)				&& Move pointer to BOF

Kinda slow with a LARGE file....

I needed to know how many lines, because with this known, I can then use this info in a Thermometer when I REALLY process the text file.

Thanks!