home *** CD-ROM | disk | FTP | other *** search
/ Chip 2000 January / CHIP_1_2000.ISO / exe / cdwiz5.exe / data1.cab / Wizard_SDK_Samples / wizard.js
Encoding:
JavaScript  |  1999-09-06  |  1.1 KB  |  45 lines
  1. // Windows Script Host Script for Testing of CDWizard SDK
  2. //
  3. // ------------------------------------------------------------------------
  4. //               Copyright (C) 1998-99 VOB Computersysteme GmbH
  5. //                    
  6. // ------------------------------------------------------------------------
  7.  
  8. var vbOK = 0;
  9. var vbOKCancel = 1;
  10. var vbInformation = 64;
  11. var vbCancel = 2;
  12.  
  13. var WSHShell = WScript.CreateObject("WScript.Shell");
  14. var Application;
  15.  
  16.  
  17. // ------------------------------------------------------------------------
  18. // function NewProjectTest()
  19. //
  20. //  creates a new VCD and open the write dialog
  21. // ------------------------------------------------------------------------
  22.  
  23. function NewProjectTest()
  24. {
  25.   var Projects = Application.Projects;
  26.   var VCD;
  27.   var Track;
  28.   var Folder;
  29.   
  30.   VCD = Projects.Add("C:\\My Test.VCD");
  31.   Track = VCD.AddTrack(1);
  32.   Folder = Track.RootFolder;
  33.   Folder = Folder.SubFolders.New("SubFolder");
  34.   Folder.Files.Add("C:\\Autoexec.bat");
  35.   Folder.SubFolders.Add("C:\\");
  36.   VCD.CreateCDDialog();
  37. }
  38.  
  39.  
  40. Application = new ActiveXObject("CDWizard.App");
  41.  
  42. NewProjectTest();
  43.  
  44. Application = "";
  45.