/build/static/layout/Breadcrumb_cap_w.png

Google Chrome v48.0 Completely Silent Uninstall

Hello, 

Has anyone found a way to suppress or by pass the "are you really sure you want to uninstall chrome" pop up when running the uninstaller ? 
Ironically Google has no answer and even in the master list there does not seem to be a switch. Need to uninstall for about 500+ users and cannot seem to find an answer. I need a hero and not the sandwich thanks in advance.

1 Comment   [ + ] Show comment
  • OK got it "AppData\Local\Google\Chrome\Application\48.0.2564.109\Installer\setup.exe" --uninstall --multi-install --chrome --verbose-logging -force-uninstall - Lotus8 8 years ago

Answers (2)

Posted by: Pressanykey 8 years ago
Red Belt
0

Comments:
  • Thanks, but all of these still prompt for the uninstall - Lotus8 8 years ago
Posted by: Tempril 8 years ago
Purple Belt
0

Hi Lotus8

I was looking for this solution a few months ago.  I wrote this script which is an adapted version of the msiworld script Phil posted a link to.  Apologies to anybody who reads this script and double face palms, but VBS is not my strong point, but it should not prompt for uninstall.  You could add a wait for process ends or kill process before attempting the uninstall, all up to you -

on error resume next
Const HKEY_LOCAL_MACHINE = &H80000002
 Set wshShell = WScript.CreateObject( "WScript.Shell" )
Set locator = CreateObject("WbemScripting.SWbemLocator")
Set service = locator.ConnectServer()
Set props = service.ExecQuery _
   ("select name, description from Win32_Process where name = 'chrome.exe'")
num = props.Count

If num > 0 Then

WScript.quit
Else

 strComputerName = wshShell.ExpandEnvironmentStrings( "%COMPUTERNAME%" )
 dim folder, MyProperties, arrMyProperties, Exe, Param, oReg, strKeyPath, strValueName


wshShell.RegDelete "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\App Paths\chrome.exe\installed"

'==============================================================
 'To check whether the OS is 32 bit or 64 bit of Windows 7
'==============================================================
'Lines to detect whether the OS is 32 bit or 64 bit of Windows 7
 Set oReg=GetObject("winmgmts:{impersonationLevel=impersonate}!\\" & strComputerName & "\root\default:StdRegProv")
   strKeyPath = "HARDWARE\DESCRIPTION\System\CentralProcessor\0"
   strValueName = "Identifier"

 oReg.GetStringValue HKEY_LOCAL_MACHINE,strKeyPath,strValueName,strValue
'==============================================================
'Checking Condition whether the build is 64bit or 32 bit
   if (instr(strValue,"64")) then
 folder = "C:\Program Files (x86)\Google\Chrome"
 RegVal = ReadReg ("HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node\Microsoft\Windows\CurrentVersion\Uninstall\Google Chrome\UninstallString")
 End If
if (instr(strValue,"x86")) then
 folder = "C:\Program Files\Google\Chrome"
 RegVal = ReadReg ("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\Google Chrome\UninstallString")
End If
'==============================================================

MyProperties = RegVal
arrMyProperties = Split(MyProperties, "-")
Exe = arrMyProperties(0)
Param = "--uninstall --multi-install --chrome --system-level --force-uninstall"
'Uninstall Previous version Chrome
'==============================================================
wshShell.run Exe & Param, 1, True
'Delete leftover folder and files from Previous version Chrome
'==============================================================
dim filesys
Set filesys = CreateObject("Scripting.FileSystemObject")
If filesys.FolderExists(folder & "\") Then
   filesys.DeleteFolder folder
End If
Function ReadReg(RegPath)
      Dim objRegistry, Key
      Set objRegistry = CreateObject("Wscript.shell")
      Key = objRegistry.RegRead(RegPath)
      ReadReg = Key
 End Function
wshShell.RegWrite "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\App Paths\chrome.exe\",""
wshShell.RegWrite "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\App Paths\chrome.exe\installed","0", "REG_SZ"

End If
Set WSHShell = Nothing


- Lee

Don't be a Stranger!

Sign up today to participate, stay informed, earn points and establish a reputation for yourself!

Sign up! or login

View more:

Share

 
This website uses cookies. By continuing to use this site and/or clicking the "Accept" button you are providing consent Quest Software and its affiliates do NOT sell the Personal Data you provide to us either when you register on our websites or when you do business with us. For more information about our Privacy Policy and our data protection efforts, please visit GDPR-HQ