Set WSHShell = WScript.CreateObject("WScript.Shell")

WshShell.Run("RunDll32 advpack.dll,LaunchINFSection java.inf,UnInstall")

Set WshShell = Nothing