home *** CD-ROM | disk | FTP | other *** search
/ io Programmo 27 / IOPROG_27.ISO / SOFT / COMPOUND.ZIP / scr / dir / scan.js
Encoding:
JavaScript  |  1998-11-09  |  1.1 KB  |  61 lines
  1. //
  2. //    Scan.js
  3. //+
  4. //    Scan the specified directory
  5. //-
  6. //    rev 11/09/98 gls
  7. //
  8.  
  9.  
  10. // //////////////////////////////////////////////////
  11. function Show( pszText )
  12. {
  13.     WScript.Echo( pszText );
  14. }
  15.  
  16. // //////////////////////////////////////////////////
  17. function DoIt( sFileSpec )
  18. {
  19. var objScan = WScript.CreateObject( "gstg.dir" )
  20.  
  21.  
  22. objScan.Scan( sFileSpec );
  23.  
  24.  
  25. var cFile = objScan.getFileCount();
  26.  
  27. Show( "file[s] scanned = " + cFile );
  28.  
  29. for(iF=0; iF<cFile; iF++)
  30.     {
  31.     var sFile = objScan.getFile( iF );
  32.     var sFileRoot = objScan.getFileRoot( sFile );
  33.  
  34.     Show( "\t[" + (iF+1) + "/" + cFile + "] "+ sFile + ", " + sFileRoot );
  35.     }
  36.  
  37.  
  38.  
  39. var cDir = objScan.getDirCount();
  40.  
  41. Show( "dirs[s] scanned = " + cDir );
  42.  
  43. for(iD=0; iD<cDir; iD++)
  44.     {
  45.     var sDir = objScan.getDir( iD );
  46.  
  47.     Show( "\t[" + (iD+1) + "/" + cDir + "] "+ sDir );
  48.     }
  49.  
  50.  
  51. }
  52. // //////////////////////////////////////////////////
  53.  
  54. DoIt( "*.*" );
  55. ///DoIt( "..\\..\\*.*" );
  56. ///DoIt( "c:\\tmp\\*.*" );
  57.  
  58. // //////////////////////////////////////////////////
  59. // //////////////////////////////////////////////////
  60. // //////////////////////////////////////////////////
  61.