home *** CD-ROM | disk | FTP | other *** search
/ io Programmo 27 / IOPROG_27.ISO / SOFT / COMPOUND.ZIP / scr / stg / open.js < prev   
Encoding:
JavaScript  |  1998-11-12  |  724 b   |  38 lines
  1. //
  2. //    Open.js
  3. //+
  4. //    Open a structured storage file
  5. //-
  6. //    rev 11/01/98 gls
  7. //
  8.  
  9.  
  10. // //////////////////////////////////////////////////
  11. function Show( pszText )
  12. {
  13.     WScript.Echo( pszText );
  14. }
  15.  
  16. // //////////////////////////////////////////////////
  17. function Open( sFile )
  18. {
  19. var objStg = WScript.CreateObject( "gstg.core" )
  20.  
  21. objStg.Open( sFile );
  22.  
  23. objStg.MkDir( "\\000tmp" );
  24. objStg.MkDir( "\\000tmp2" );
  25. objStg.MkDir( "\\000tmp3" );
  26.  
  27.  
  28. objStg.Close();
  29.  
  30. }
  31. // //////////////////////////////////////////////////
  32.  
  33. Open( "tmp.stg" );
  34.  
  35. // //////////////////////////////////////////////////
  36. // //////////////////////////////////////////////////
  37. // //////////////////////////////////////////////////
  38.