Frage : Eine vbs Indexhilfe

Ich habe SMS Umwelt und ich suche nach etwas Hilfe, um alte Pakete von den Computern zu entfernen.

I möchte ein VBScript, das nach diesen Software auf den registy Benutzern sucht und zu entfernen es findet.

1) MsiExec.exe /X {5783F2D7-5001-0409-0002-0060B0CE6BBA} /QN /NORESTART
AND
2) MsiExec.exe /X {5783F2D7-0301-0409-0002-0060B0CE6BBA} /QN /NORESTART
AND
3) MsiExec.exe /X {BA3B0FA5-1EAD-476B-8E8D-6569CBC3E154} /QN /NORESTART das

I morgens gehend, zu überprüfen, ob es mehr Anwendungen gibt, die ich entfernen muss, aber fürs Erste diese tut.

Regards,

Antwort : Eine vbs Indexhilfe

Hallo, ist es wirklich wert nach den Paketen zuerst suchen?  Was, wenn Sie gerade versuchen, deinstallieren laufen zu lassen? Es ausfallen nur ur, wenn das Paket nicht existierte.

Respekt,

Rob.
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:

arrCommands = Reihe (_
	„MsiExec.exe /X {5783F2D7-5001-0409-0002-0060B0CE6BBA} /QN /NORESTART“, _
	„MsiExec.exe /X {5783F2D7-0301-0409-0002-0060B0CE6BBA} /QN /NORESTART“, _
	„{BA3B0FA5-1EAD-476B-8E8D-6569CBC3E154} /QN /X MsiExec.exe /NORESTART“ _
	)

objShell = CreateObject („WScript.Shell“) einstellen
strResult = „Software deinstallierte: “ U. VbCrLf u. Schnur (21, „=")
Für jedes strCommand in den arrCommands
	intReturn = objShell.Run (strCommand, 0, zutreffendes)
	Wenn intReturn = 0 dann
		strResult = strResult u. VbCrLf u. „ERFOLG: “ u. strCommand
	Sonst
		strResult = strResult u. VbCrLf u. „AUSFALL: “ u. strCommand
	Beenden wenn
Zunächst

MsgBox strResult
Weitere Lösungen  
 
programming4us programming4us