bbimis
asked on
script needed to see what computers have program installed
Can someone help me make either a powershell script or bat file or psexec file that will take and search all the computers on my network and see if Eset is installed. We are changing to a different antivirus software.
I was thinking something along the lines of:
but i'm wanting to make a list of all the computers that have the program still installed so i can turn around and delete it.
I would like to use this autoit script i made but to a whole list of computers.
I was thinking something along the lines of:
Func FindUninstallString($title)
Dim $regKey, $uninstallRegKey, $uninstallString, $displayName
Dim $i
$regKey = "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall"
For $i= 1 to 20000
$uninstallRegKey = RegEnumKey($regKey , $i)
$displayName = RegRead($regKey & '\' & $uninstallRegKey & '\', "DisplayName")
If StringInStr($displayName,$title) Then
$uninstallString = RegRead($regKey & '\' & $uninstallRegKey & '\', "UninstallString")
run($uninstallString)
Else
$uninstallString = " "
Endif
Next
but i'm wanting to make a list of all the computers that have the program still installed so i can turn around and delete it.
I would like to use this autoit script i made but to a whole list of computers.
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
Opt("GUIOnEventMode", 1)
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Remove Geo Codecs", 237, 132, 192, 124)
GUISetOnEvent($GUI_EVENT_CLOSE, "Form1Close")
$bRemove = GUICtrlCreateButton("Remove", 72, 48, 75, 25)
GUICtrlSetOnEvent(-1, "RemoveClicked")
$Uninstall = GUICtrlCreateLabel("Uninstall GeoVision Codecs", 48, 24, 160, 17)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
GUICtrlSetColor(-1, 0x000000)
$Label1 = GUICtrlCreateLabel("Version 1.0 -Tony Stegall", 48, 80, 125, 17)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
Sleep(100)
WEnd
Func RemoveClicked()
FindUninstallString("GeoVision")
FileDelete("c:\windows\system32\Geo*.dll")
MsgBox(4096,"Complete","GeoVision Codecs have been removed.")
Exit
EndFunc
Func Form1Close()
Exit
EndFunc
Func FindUninstallString($title)
Dim $regKey, $uninstallRegKey, $uninstallString, $displayName
Dim $i
$regKey = "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall"
For $i= 1 to 20000
$uninstallRegKey = RegEnumKey($regKey , $i)
$displayName = RegRead($regKey & '\' & $uninstallRegKey & '\', "DisplayName")
If StringInStr($displayName,$title) Then
$uninstallString = RegRead($regKey & '\' & $uninstallRegKey & '\', "UninstallString")
run($uninstallString)
Else
$uninstallString = " "
Endif
Next
Return $uninstallString
EndFunc
ASKER CERTIFIED SOLUTION
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
ASKER
So something like this would remove eset from all the computers in the list?
or just display if it is installed?
or just display if it is installed?
foreach ($computer in Get-Content C:\computers.txt) {
$removeme = Get-WmiObject -ComputerName $computer -Credential $creds -class Win32_Product -Filter "Name ='ESET NOD32 Antivirus'"
$removeme.uninstall()
}
won't be back on my windows system until tomorrow, but that looks good. Provided the name matches. Let me know though. I can do more debugging tomorrow.
-Naut
-Naut
ASKER
okay see the thing is that will remove it but i would like to compile a list of the computers that still have it running so i can verify i have successfully removed it.
i wrote a program earlier that was suppose to remove it using the registry uninstall so it woudln't force a reboot
Thanks!
i wrote a program earlier that was suppose to remove it using the registry uninstall so it woudln't force a reboot
@echo off
set code={C10D6AB8-05BB-422D-AAE3-36D6E0381487}
for /f "usebackq" %%a in ("clist.txt") do (
echo " ">> newinstalllog.txt
echo "Computer information for " %%a >> newinstalllog.txt
REM CODE TO INSTALL PATCH IF WINDOWS XP SP2
cmd.exe /c psexec \\%%a -u "domain\administrator" -p password c:\tony\patch.exe /quiet /norestart >> newinstalllog.txt
REM REMOVE ESET
echo key is %code%
cmd.exe /c psexec \\%%a -u "domain\someone" -p password "c:\Program Files\ESET\ESET NOD32 Antivirus\callmsi.exe" /x %code% /qn /norestart Password=eset
REM CODE TO INSTALL NEW VIRUS SOFTWARE
cmd.exe /c psexec \\%%a -u "domain\admin" -p password c:\tony\scepinstall1.exe /s /q
and it worked to the most part but a lot of them got missed even though the code appeared to be correct. Thanks!
ASKER