Script for an Unattended WinZip Uninstall

September 26, 2003

Email Print Digg This Add to del.icio.us

Here's a small batch file from Steve Shockley that will allow you to perform an unattended uninstall of the WinZip application (in other words, no user prompts during the uninstall). The VBScript deploys an undocumented WinZip command via SMS to uninstall the application. Feedback is welcomed from the author.

Download the wzkill.vbs file.

<< Back to SMS Scripts list.

The contents of the batch file are as follows:

' Uninstall WinZip
'
' This script uninstalls WinZip 8.0 cleanly with no user prompting
'
' Steve Shockley, 08Nov2001
On Error Resume Next
Dim fso
Set fso = CreateObject("Scripting.FileSystemObject")
main()
sub main()
    'Let's find out where WinZip is installed
WZPath=regget("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\
App Paths\winzip32.exe\")
    Set WshShell = WScript.CreateObject("WScript.Shell")
    WshShell.Run WZPath & " /uninstallx",0,TRUE
    FullWZPath = replace(WZPath, "PROGRA~1", "Program Files")
    DeleteAFolder(left(FullWZPath,(len(FullWZPath)-13)))
end sub
function regget(value)
  on error resume next
  Set regedit = CreateObject("WScript.Shell")
  regget=regedit.RegRead(value)
end function
function DeleteAFolder(filespec)
   Dim fso
   on error resume next
   Set fso = CreateObject("Scripting.FileSystemObject")
   fso.DeleteFolder(filespec)
end function

Disclaimer: We hope that the information in these pages is valuable to you. Your use of the information contained in these pages, however, is at your sole risk. All information on these pages is provided "as -is", without any warranty, whether express or implied, of its accuracy, completeness, fitness for a particular purpose, title or non-infringement, and none of the third-party products or information mentioned in the work are authored, recommended, supported or guaranteed by me. We shall not be liable for any damages you may sustain by using this information, whether direct, indirect, special, incidental or consequential, even if it has been advised of the possibility of such damages.

Whitepapers and eBooks

Webcasts

Downloads and eKits

Tutorials and Demos