Iterating a directory

rickyl76

When iterating a directory using a background client is it possible to ignore files that are empty? I'm using the getserverdirectorylist function but i want to exclude files that have zero size

Regards,

edoderoo

Googled, and found a solution from 12 years ago:

PROCEDURE GetFileSize@1000000000(FileName@1000000000 : Text[1024]) FileSize : Integer;
VAR
InFile@1000000001 : File;
BEGIN
InFile.OPEN(FileName) ;
FileSize := InFile.LEN ;
InFile.CLOSE ;
END;

RockWithNAV

Agree with what @edoderoo mentioned, If Length is giving you 0 that means its an empty file.