Table of Content
HAL Forum
LONG CountFilesInDir (
string pathname)
Description:
Counts number of files in the specified directory
Parameters:
pathname name of the directory
global
updating procedure CUST_ImportINVc(string importpath,string importedpath,string failedpath)
begin
  integer c,i;
  string 255 fn;

  c = CountFilesInDir(importpath);
  for (i=c-1;i>=0;i=i-1) begin
     fn = GetFileNameInDir(importpath,i);
     if (CUST_ImportINVc_SingleFile(importpath & fn)) then begin
     end;
  end;
  return;
end;




Related topics:
««