Pergunta : Uma ajuda do certificado dos vbs

Eu tenho o ambiente de SMS e eu estou procurando alguma ajuda para remover os pacotes velhos dos computadores. o

I gostaria de um VBScript que procurasse estes software nos usuários registy e para remover o encontrasse. o

I am do
AND
3) MsiExec.exe /X do
AND
2) MsiExec.exe /X do

1) MsiExec.exe /X {5783F2D7-5001-0409-0002-0060B0CE6BBA} /QN /NORESTART {5783F2D7-0301-0409-0002-0060B0CE6BBA} /QN /NORESTART {BA3B0FA5-1EAD-476B-8E8D-6569CBC3E154} /QN /NORESTART que vai verific se há mais aplicações que eu preciso de remover mas para ver se há agora estes fará.

Regards, class= do

Resposta : Uma ajuda do certificado dos vbs

Olá!, é realmente worth procurar os pacotes primeiramente?  Que se você apenas tenta funcionar desinstalar? Falharia somente se o pacote não existiu.

Considerações,

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

arrCommands = disposição (_
	“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} _ de /QN /X MsiExec.exe /NORESTART”
	)

Ajustar o objShell = o CreateObject (“WScript.Shell”)
o strResult = “software desinstalou: ” & VbCrLf & corda (21, “=")
Para cada strCommand nos arrCommands
	intReturn = objShell.Run (strCommand, 0, verdadeiros)
	Se intReturn = 0 então
		strResult = strResult & VbCrLf & “SUCESSO: ” & strCommand
	Mais
		strResult = strResult & VbCrLf & “FALHA: ” & strCommand
	Terminar se
Em seguida

strResult de MsgBox
Outras soluções  
 
programming4us programming4us