on error resume next
Set WshShell = CreateObject("WScript.Shell")
MsgBox "Please close down all you web browsers before clicking OK."
MsgBox "The uninstall process may take several minutes to complete. A message box will popup when the uninstall if finished."
' 1.4.2
WshShell.Run "MsiExec.exe /x {7148F0A8-6813-11D6-A77B-00B0D0142000} /q",1,true
' 1.4.2_1
WshShell.Run "MsiExec.exe /x {7148F0A8-6813-11D6-A77B-00B0D0142010} /q",1,true
' 1.4.2_2
WshShell.Run "MsiExec.exe /x {7148F0A8-6813-11D6-A77B-00B0D0142020} /q",1,true
' 1.4.2_3
WshShell.Run "MsiExec.exe /x {7148F0A8-6813-11D6-A77B-00B0D0142030} /q",1,true
' 1.4.2_4
WshShell.Run "MsiExec.exe /x {7148F0A8-6813-11D6-A77B-00B0D0142040} /q",1,true
' 1.4.2_5
WshShell.Run "MsiExec.exe /x {7148F0A8-6813-11D6-A77B-00B0D0142050} /q",1,true
' 1.4.2_6
WshShell.Run "MsiExec.exe /x {7148F0A8-6813-11D6-A77B-00B0D0142060} /q",1,true
' 1.4.2_7
WshShell.Run "MsiExec.exe /x {7148F0A8-6813-11D6-A77B-00B0D0142070} /q",1,true
' 1.4.2_8
WshShell.Run "MsiExec.exe /x {7148F0A8-6813-11D6-A77B-00B0D0142080} /q",1,true
' 1.4.2_9
WshShell.Run "MsiExec.exe /x {7148F0A8-6813-11D6-A77B-00B0D0142090} /q",1,true
' 1.4.2_10
WshShell.Run "MsiExec.exe /x {7148F0A8-6813-11D6-A77B-00B0D0142100} /q",1,true
' 1.4.2_11
WshShell.Run "MsiExec.exe /x {7148F0A8-6813-11D6-A77B-00B0D0142110} /q",1,true
' 1.4.2_12
WshShell.Run "MsiExec.exe /x {7148F0A8-6813-11D6-A77B-00B0D0142120} /q",1,true
' 1.4.2_13
WshShell.Run "MsiExec.exe /x {7148F0A8-6813-11D6-A77B-00B0D0142130} /q",1,true
' 1.4.2_14
WshShell.Run "MsiExec.exe /x {7148F0A8-6813-11D6-A77B-00B0D0142140} /q",1,true
' 1.4.2_15
WshShell.Run "MsiExec.exe /x {7148F0A8-6813-11D6-A77B-00B0D0142150} /q",1,true
' 1.4.2_16
WshShell.Run "MsiExec.exe /x {7148F0A8-6813-11D6-A77B-00B0D0142160} /q",1,true
' 1.4.2_17
WshShell.Run "MsiExec.exe /x {7148F0A8-6813-11D6-A77B-00B0D0142170} /q",1,true
' 1.4.2_18
WshShell.Run "MsiExec.exe /x {7148F0A8-6813-11D6-A77B-00B0D0142180} /q",1,true
' 1.4.2_19
WshShell.Run "MsiExec.exe /x {7148F0A8-6813-11D6-A77B-00B0D0142190} /q",1,true
' 1.5.0
WshShell.Run "MsiExec.exe /x {3248F0A8-6813-11D6-A77B-00B0D0150000} /q",1,true
' 1.5.0_1
WshShell.Run "MsiExec.exe /x {3248F0A8-6813-11D6-A77B-00B0D0150010} /q",1,true
' 1.5.0_2
WshShell.Run "MsiExec.exe /x {3248F0A8-6813-11D6-A77B-00B0D0150020} /q",1,true
' 1.5.0_3
WshShell.Run "MsiExec.exe /x {3248F0A8-6813-11D6-A77B-00B0D0150030} /q",1,true
' 1.5.0_4
WshShell.Run "MsiExec.exe /x {3248F0A8-6813-11D6-A77B-00B0D0150040} /q",1,true
' 1.5.0_5
WshShell.Run "MsiExec.exe /x {3248F0A8-6813-11D6-A77B-00B0D0150050} /q",1,true
' 1.5.0_6
WshShell.Run "MsiExec.exe /x {3248F0A8-6813-11D6-A77B-00B0D0150060} /q",1,true
' 1.5.0_7
WshShell.Run "MsiExec.exe /x {3248F0A8-6813-11D6-A77B-00B0D0150070} /q",1,true
' 1.5.0_8
WshShell.Run "MsiExec.exe /x {3248F0A8-6813-11D6-A77B-00B0D0150080} /q",1,true
' 1.5.0_9
WshShell.Run "MsiExec.exe /x {3248F0A8-6813-11D6-A77B-00B0D0150090} /q",1,true
' 1.5.0_10
WshShell.Run "MsiExec.exe /x {3248F0A8-6813-11D6-A77B-00B0D0150100} /q",1,true
' 1.5.0_11
WshShell.Run "MsiExec.exe /x {3248F0A8-6813-11D6-A77B-00B0D0150110} /q",1,true
' 1.6.0_01
WshShell.Run "MsiExec.exe /x {3248F0A8-6813-11D6-A77B-00B0D0160010} /q",1,true
' 1.6.0_02
WshShell.Run "MsiExec.exe /x {3248F0A8-6813-11D6-A77B-00B0D0160020} /q",1,true
' 1.6.0_03
WshShell.Run "MsiExec.exe /x {3248F0A8-6813-11D6-A77B-00B0D0160030} /q",1,true
' 1.6.0_04
WshShell.Run "MsiExec.exe /x {3248F0A8-6813-11D6-A77B-00B0D0160040} /q",1,true
' 1.6.0_05
WshShell.Run "MsiExec.exe /x {3248F0A8-6813-11D6-A77B-00B0D0160050} /q",1,true
' 1.6.0_06
WshShell.Run "MsiExec.exe /x {3248F0A8-6813-11D6-A77B-00B0D0160060} /q",1,true
' 1.6.0_07
WshShell.Run "MsiExec.exe /x {3248F0A8-6813-11D6-A77B-00B0D0160070} /q",1,true
' 1.6.0_08
WshShell.Run "MsiExec.exe /x {3248F0A8-6813-11D6-A77B-00B0D0160080} /q",1,true
' 1.6.0_09
WshShell.Run "MsiExec.exe /x {3248F0A8-6813-11D6-A77B-00B0D0160090} /q",1,true
' 1.6.0_10
WshShell.Run "MsiExec.exe /x {3248F0A8-6813-11D6-A77B-00B0D0160100} /q",1,true
MsgBox "All old versions of Java have been uninstalled.  You may continue working as normal."