Solved

I need a VB script that will uninstall configuration manager agent......will be deploying through logon

Posted on 2008-10-16
11
552 Views
Last Modified: 2010-04-21
I need a VB script that will uninstall Microsoft configuration manager 2007 agent......will be deploying through logon using GPO.   Please help!!!
0
Comment
Question by:ln733
  • 6
  • 4
11 Comments
 
LVL 21

Expert Comment

by:AmazingTech
ID: 22734696
You need to find out the GUID for the application and run a MSIEXEC /X {GUID} /qb to uninstall.

Look in the registry

HKLM\Software\Microsoft\Windows\CurrentVersion\Uninstall

When you find it locate the UninstallString

Add the /qb to make it a silent uninstall.
0
 

Author Comment

by:ln733
ID: 22736115
Any other suggestions?
0
 
LVL 21

Expert Comment

by:AmazingTech
ID: 22736135
Did you locate the Uninstall String?

Create a .bat and apply with the GPO. Logon if your users are administrators of their workstation otherwise use Machine Startup GPO.
0
 

Author Comment

by:ln733
ID: 22736160
The problem with the bat file is that the command prompt is visible to the user when they logon to the machine.   It doesnt close to it has finished unistalling which could take 5 minutes.
0
 
LVL 21

Expert Comment

by:AmazingTech
ID: 22736220
Once you find the uninstall string you can use it in VBS.

Set objShell = CreateObject("Wscript.Shell")
 

ret = objShell.run("MSIEXEC.exe /QB /X " + chr(34) + "{GUID}" + chr(34))

Open in new window

0
Shouldn't all users have the same email signature?

You wouldn't let your users design their own business cards, would you? So, why do you let them design their own email signatures? Think of the damage they could be doing to your brand reputation! Choose the easy way to manage set up and add email signatures for all users.

 
LVL 65

Expert Comment

by:RobSampson
ID: 22736242
In733, welcome to EE.

AT's suggestion to find the Uninstall string is valid.....and would help us know what command we need to run to have it uninstalled....

However, as an alternative, you could try this script, which may return a result if the Configuration Manager can be found in the Win32_Product class.

If it can (that is, if you do get some information from this script), then you would be able to invoke the Uninstall method for that product.

Regards,

Rob.
If LCase(Right(Wscript.FullName, 11)) = "wscript.exe" Then

    strPath = Wscript.ScriptFullName

    strCommand = "%comspec% /c cscript  """ & strPath & """"

    Set objShell = CreateObject("Wscript.Shell")

    objShell.Run(strCommand), 1, True

    Wscript.Quit

End If
 

On Error Resume Next
 

Const wbemFlagReturnImmediately = &h10

Const wbemFlagForwardOnly = &h20
 

strComputer = "."
 

Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\CIMV2")

Set colItems = objWMIService.ExecQuery("SELECT * FROM Win32_Product Where Name LIKE 'Microsoft Configuration%'", "WQL", _

                                       wbemFlagReturnImmediately + wbemFlagForwardOnly)
 

For Each objItem In colItems

   WScript.Echo "Caption: " & objItem.Caption

   WScript.Echo "Description: " & objItem.Description

   WScript.Echo "IdentifyingNumber: " & objItem.IdentifyingNumber

   WScript.Echo "InstallDate: " & objItem.InstallDate

   WScript.Echo "InstallLocation: " & objItem.InstallLocation

   WScript.Echo "InstallState: " & objItem.InstallState

   WScript.Echo "Name: " & objItem.Name

   WScript.Echo "PackageCache: " & objItem.PackageCache

   WScript.Echo "SKUNumber: " & objItem.SKUNumber

   WScript.Echo "Vendor: " & objItem.Vendor

   WScript.Echo "Version: " & objItem.Version

   WScript.Echo

Next

Open in new window

0
 
LVL 21

Expert Comment

by:AmazingTech
ID: 22736247
Oh you probably want /qn.
0
 

Author Comment

by:ln733
ID: 22745532
Sorry guys....this is way over my head.   To put it simple, I need to run this command "Ccmsetup.exe /uninstall" either in a bat file or vb script.  The problem with the bat is that it leaves the command line box open for the user to see when the logon.  
0
 
LVL 21

Accepted Solution

by:
AmazingTech earned 500 total points
ID: 22745662
You might need to put the full path to where ccmsetup.exe is residing.
Set objShell = CreateObject("Wscript.Shell")

 

ret = objShell.run("Ccmsetup.exe /uninstall")

 

Open in new window

0
 

Author Closing Comment

by:ln733
ID: 31506868
Thanks!
0
 
LVL 21

Expert Comment

by:AmazingTech
ID: 22746085
Thanks. Glad it worked out. A more generic uninstall for MSI apps is what I was leaning towards. So keep it in mind for other uninstalls.
0

Featured Post

Comprehensive Backup Solutions for Microsoft

Acronis protects the complete Microsoft technology stack: Windows Server, Windows PC, laptop and Surface data; Microsoft business applications; Microsoft Hyper-V; Azure VMs; Microsoft Windows Server 2016; Microsoft Exchange 2016 and SQL Server 2016.

Join & Write a Comment

If you get continual lockouts after changing your Active Directory password, there are several possible reasons.  Two of the most common are using other devices to access your email and stored passwords in the credential manager of windows.
In this article, I will show you HOW TO: Install VMware Tools for Windows on a VMware Windows virtual machine on a VMware vSphere Hypervisor 6.5 (ESXi 6.5) Host Server, using the VMware Host Client. The virtual machine has Windows Server 2016 instal…
Windows 8 comes with a dramatically different user interface known as Metro. Notably missing from the new interface is a Start button and Start Menu. Many users do not like it, much preferring the interface of earlier versions — Windows 7, Windows X…
This Micro Tutorial will give you a basic overview of Windows DVD Burner through its features and interface. This will be demonstrated using Windows 7 operating system.

762 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

20 Experts available now in Live!

Get 1:1 Help Now