RFFILE.RFFileCount

short RFFileCount()

Function RFFileCount() As Integer

The number of files in the filename array (reduced or extended).

Return value
The number of files.

Parameters

Remarks
Make an RFListFiles() or RFListFilesEx() before, to get the names from the terminal.

Example
Public wsRfFile As New RFFILE
Dim iIdx As Integer
...
If wsRfFile.RFListFiles("*.*") < 0 Then
    GoTo EndProgram ' RF error ...
End If

' Get the name of each file
For iIdx = 0 To wsRfFile.RFFileCount - 1
    sBuff = wsRfFile.RFFileName(iIdx)
    ' Process data
    ...
Next iIdx

See also    RFFILE, RFListFiles