Script um Software zu deinstallieren
Hallo miteinander,
ich hab mir hier ein kleines Script gebastelt welches eine bestimmte Software auf einem Remote-Client deinstallieren soll.
Hier ist das Script:
Soweit so gut, Computernamen und Domain eingetragen, script gestartet. Username und PW eingegeben.... es läd kurz und ist dann fertig. Keine Fehlermeldung, nix... die Software ist nun leider immernoch nicht von meinem Rechner verschwunden.... Die WMI-Abfrage funktioniert zu 100 % (habs ausprobiert!). Könnt ihr mir helfen?
wscript.StdOut.Write "uninstall sucess"
Next
ich hab mir hier ein kleines Script gebastelt welches eine bestimmte Software auf einem Remote-Client deinstallieren soll.
Hier ist das Script:
strComputer = "**Systemname**"
strDomain = "**DOMAIN**"
Wscript.StdOut.Write "Please enter your user name:"
strUser = Wscript.StdIn.ReadLine
Set objPassword = CreateObject("ScriptPW.Password")
Wscript.StdOut.Write "Please enter your password:"
strPassword = objPassword.GetPassword()
Set objSWbemLocator = CreateObject("WbemScripting.SWbemLocator")
Set objSWbemServices = objSWbemLocator.ConnectServer(strComputer, _
"root\cimv2", _
strUser, _
strPassword, _
"MS_409", _
"ntlmdomain:" + strDomain)
Set colSwbemObjectSet = _
objSWbemServices.ExecQuery("Select * from Win32_Product " _
& "Where Name = 'SW-Displayname'")
For Each objSoftware in colSWbemObjectSet
objSoftware.Uninstall()
next
..........
wscript.StdOut.Write "uninstall sucess"
Next
Please also mark the comments that contributed to the solution of the article
Content-Key: 73688
Url: https://administrator.de/contentid/73688
Printed on: April 26, 2024 at 14:04 o'clock