Help for this page

Select Code to Download


  1. or download this
    Win32::OLE->Option(CP => Win32::OLE::CP_UTF8);
    $obj = Win32::OLE->new('Scripting.FileSystemObject');
    
  2. or download this
    $folder = $obj->GetFolder(".");
    $collection= $folder->{Files};