home *** CD-ROM | disk | FTP | other *** search
/ Chip 1998 February / CHIP_2_98.iso / software / pelne / optionp / iis4_07.cab / metabackdel.js < prev    next >
Text File  |  1997-10-25  |  2KB  |  105 lines
  1. /*********************************************
  2. *
  3. *  Metabase Backup Deletion Utility   
  4. *
  5. **********************************************
  6. *
  7. *  Description:
  8. *  ------------
  9. *  This sample admin script allows you to delete a Metabase backup.
  10. *
  11. *  To Run:  
  12. *  -------
  13. *  This is the format for this script:
  14. *  
  15. *      cscript metabackdel.js 
  16. *  
  17. *  NOTE:  If you want to execute this script directly from Windows, use 
  18. *  'wscript' instead of 'cscript'. 
  19. *
  20. *********************************************/
  21.  
  22.  
  23. // Initialize variables
  24. var ArgCount, BuName, BuVersion, CompObj, VersionMsg;
  25. var Args;
  26.  
  27. // Default values
  28. ArgCount = 0;
  29. BuName = "";       // Default backup, but will not be allowed
  30. BuVersion = -2;    // Designates highest existing version
  31.  
  32.  
  33.  
  34.   // ** Parse Command Line
  35.  
  36.     // Loop through arguments
  37.  
  38.     WScript.echo("VAlue of args: " + WScript.Arguments.length);
  39.  
  40.     while (ArgCount < WScript.Arguments.length)   {
  41.  
  42.       // Determine switches used
  43.       switch (WScript.arguments.item(ArgCount))   {
  44.     
  45.          case "-v":   // Designate backup version to be deleted
  46.             // Move to next arg, which should be parameter
  47.             ArgCount =  ArgCount + 1  ;
  48.             if (ArgCount >= WScript.arguments.length) 
  49.                   UsageMsg();
  50.             else
  51.                BuVersion = WScript.arguments.item(ArgCount);
  52.             break;
  53.  
  54.          case "-h", "/?", "-?":
  55.             UsageMsg();
  56.             break;
  57.  
  58.          default:
  59.             if (BuName != "")   // Only one name allowed
  60.                 UsageMsg();
  61.             else
  62.             BuName = WScript.arguments.item(ArgCount);
  63.        }
  64.  
  65.       // Move pointer to next argument
  66.       ++ArgCount;
  67.  
  68.     }
  69.  
  70.   
  71.  
  72.   // If no location name was selected, generate usage message 
  73.   if (BuName == "")   {  
  74.     UsageMsg();
  75.   }
  76.  
  77.   // Get instance of computer object
  78.   CompObj = GetObject("IIS://Localhost");
  79.  
  80.   // Try to delete backup
  81.   CompObj.DeleteBackup(BuName, BuVersion);
  82.  
  83.   // Make version string pretty
  84.   if (BuVersion == -2)   
  85.         VersionMsg = "highest version";
  86.   else
  87.         VersionMsg = "version " + BuVersion;
  88.   
  89.  
  90.  
  91.   WScript.echo("Backup deleted: '" + BuName + "' (" + VersionMsg + ").");
  92.  
  93.  
  94. // Displays usage message, then QUITS
  95. function UsageMsg()  {
  96.   WScript.echo("Usage:  cscript metabackdel.js <backupname> [-v <versionnum>]");
  97.   WScript.Quit();
  98. }
  99.  
  100.  
  101.  
  102.  
  103.  
  104.  
  105.