SCCM 2012 - .vbs to uninstall SCCM 2012 Client

If you are interested to uninstall the SCCM 2012 client you can use the above script:

strComputer = InputBox("Enter Machine Name")
strApplicationName = "Configuration Manager Client"
Set wshShell = WScript.CreateObject("WScr
ipt.Shell")
Set objWMIService = GetObject("winmgmts:" & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set colSoftware = objWMIService.ExecQuery ("Select * From Win32_Product where Name = '" & strApplicationName & "'")

For Each objSoftware in colSoftware
If objSoftware.Name = strApplicationName Then
ApplicationFound = True
MsgBox "Removing The " & strApplicationName & " From " & UCase(strComputer)
objSoftware.Uninstall()
MsgBox "Done"
End If
Next

If ApplicationFound <> True Then
MsgBox strApplicationName & " Is Not Installed On "  & UCase(strComputer)
End If