home *** CD-ROM | disk | FTP | other *** search
/ business-86-101-185-173.business.broadband.hu / business-86-101-185-173.business.broadband.hu.zip / business-86-101-185-173.business.broadband.hu / ZipIt.cmd < prev    next >
OS/2 REXX Batch file  |  2014-05-12  |  949b  |  35 lines

  1. @echo off
  2.  
  3. @echo off
  4.  
  5. :: BatchGotAdmin
  6. :-------------------------------------
  7. REM  --> Check for permissions
  8. >nul 2>&1 "%SYSTEMROOT%\system32\cacls.exe" "%SYSTEMROOT%\system32\config\system"
  9.  
  10. REM --> If error flag set, we do not have admin.
  11. if '%errorlevel%' NEQ '0' (
  12.     echo Requesting administrative privileges...
  13.     goto UACPrompt
  14. ) else ( goto gotAdmin )
  15.  
  16. :UACPrompt
  17.     echo Set UAC = CreateObject^("Shell.Application"^) > "%temp%\getadmin.vbs"
  18.     echo UAC.ShellExecute "%~s0", "", "", "runas", 1 >> "%temp%\getadmin.vbs"
  19.  
  20.     "%temp%\getadmin.vbs"
  21.     exit /B
  22.  
  23. :gotAdmin
  24.     if exist "%temp%\getadmin.vbs" ( del "%temp%\getadmin.vbs" )
  25.     pushd "%CD%"
  26.     CD /D "%~dp0"
  27. :--------------------------------------
  28.  
  29.  
  30. del "J:\Disaster Recovery\Regens\CurrentVersion.zip"
  31. regsvr32 /s /u D:\UPSDATA\regens\cgziplibrary.dll
  32. regsvr32 /s D:\UPSDATA\regens\cgziplibrary.dll
  33. cscript D:\UPSDATA\regens\ZipIt.vbs
  34. pause
  35.