Doing software inventory on W2K domain

  • Thread starter Thread starter Matt
  • Start date Start date
M

Matt

Greetings,
Is there anyway to do a software inventory and/or see the contents of
"Add/Remove programs" on a network? What I'd like to be able to do is
view the installed programs on client machines on our network without
having to walk around to each one and see what all is installed.

IDEALY it would be nice to be able to un-install/install applications to
the machines remotely.. but I don't think this is possible... what are
the general thoughts on all this?
 
You assign the follow script as a startup script with Group Policy.

Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objTextFile = objFSO.CreateTextFile("\\server\inventory\software.tsv",
True)
strComputer = "."
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set colSoftware = objWMIService.ExecQuery _
("Select * from Win32_Product")
objTextFile.WriteLine "Caption" & vbtab & _
"Description" & vbtab & "Identifying Number" & vbtab & _
"Install Date" & vbtab & "Install Location" & vbtab & _
"Install State" & vbtab & "Name" & vbtab & _
"Package Cache" & vbtab & "SKU Number" & vbtab & "Vendor" & vbtab _
& "Version"
For Each objSoftware in colSoftware
objTextFile.WriteLine objSoftware.Caption & vbtab & _
objSoftware.Description & vbtab & _
objSoftware.IdentifyingNumber & vbtab & _
objSoftware.InstallDate2 & vbtab & _
objSoftware.InstallLocation & vbtab & _
objSoftware.InstallState & vbtab & _
objSoftware.Name & vbtab & _
objSoftware.PackageCache & vbtab & _
objSoftware.SKUNumber & vbtab & _
objSoftware.Vendor & vbtab & _
objSoftware.Version
Next
objTextFile.Close

How ever this script only catch Softwares installed by Windows Installer
Services. I will recommend Microsoft Systems Magnament Server 2003 if you
have a large network. www.microsoft.com/sms

--
Regards,

Christoffer Andersson
No email replies please - reply in the newsgroup
If the information was help full, you can let me know at:
http://www.itsystem.se/employers.asp?ID=1
 
Back
Top