Welcome to ServerForumz.com!
FAQFAQ      ProfileProfile    Private MessagesPrivate Messages   Log inLog in

Hotfixe list on XP

  
   Windows Server (Home) -> Windows Server Scripting RSS
Next:  2003 R2, Services For Unix, NFS Server  
Author Message
joseph

External


Since: Jul 12, 2006
Posts: 2



(Msg. 1) Posted: Wed Jul 12, 2006 1:11 pm
Post subject: Hotfixe list on XP
Archived from groups: microsoft>public>windows>server>scripting (more info?)
howdy list,

strComputer = "."
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set colQuickFixes = objWMIService.ExecQuery _
("SELECT * FROM Win32_QuickFixEngineering")
For Each objQuickFix in colQuickFixes
Wscript.Echo "Computer: " & objQuickFix.CSName
Wscript.Echo "Description: " & objQuickFix.Description
Wscript.Echo "Hot Fix ID: " & objQuickFix.HotFixID
Wscript.Echo "Installation Date: " & objQuickFix.InstallDate
Wscript.Echo "Installed By: " & objQuickFix.InstalledBy
Next


Don't enumerate the hotfixes installed on my XP machine, was the a new
class to Query aside from Win32_QuickFixEngineering?

TIA./jbt

 >> Stay informed about: Hotfixe list on XP 
Back to top
Login to vote
joseomjr

External


Since: Jul 11, 2006
Posts: 14



(Msg. 2) Posted: Wed Jul 12, 2006 1:11 pm
Post subject: Re: Hotfixe list on XP [Login to view extended thread Info.]
Archived from groups: per prev. post (more info?)
If Win32_QuickFixEngineering does not work for you, maybe you can
retrieve the information from the registry.
HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall

joseph wrote:
> howdy list,
>
> strComputer = "."
> Set objWMIService = GetObject("winmgmts:" _
> & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
> Set colQuickFixes = objWMIService.ExecQuery _
> ("SELECT * FROM Win32_QuickFixEngineering")
> For Each objQuickFix in colQuickFixes
> Wscript.Echo "Computer: " & objQuickFix.CSName
> Wscript.Echo "Description: " & objQuickFix.Description
> Wscript.Echo "Hot Fix ID: " & objQuickFix.HotFixID
> Wscript.Echo "Installation Date: " & objQuickFix.InstallDate
> Wscript.Echo "Installed By: " & objQuickFix.InstalledBy
> Next
>
>
> Don't enumerate the hotfixes installed on my XP machine, was the a new
> class to Query aside from Win32_QuickFixEngineering?
>
> TIA./jbt

 >> Stay informed about: Hotfixe list on XP 
Back to top
Login to vote
joseph

External


Since: Jul 12, 2006
Posts: 2



(Msg. 3) Posted: Wed Jul 12, 2006 2:23 pm
Post subject: Re: Hotfixe list on XP [Login to view extended thread Info.]
Archived from groups: per prev. post (more info?)
Seems to bloody to do can you show example how to do it?
<joseomjr.DeleteThis@gmail.com> wrote in message
news:1152682502.869202.250760@p79g2000cwp.googlegroups.com...
> If Win32_QuickFixEngineering does not work for you, maybe you can
> retrieve the information from the registry.
> HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall
>
> joseph wrote:
>> howdy list,
>>
>> strComputer = "."
>> Set objWMIService = GetObject("winmgmts:" _
>> & "{impersonationLevel=impersonate}!\\" & strComputer &
>> "\root\cimv2")
>> Set colQuickFixes = objWMIService.ExecQuery _
>> ("SELECT * FROM Win32_QuickFixEngineering")
>> For Each objQuickFix in colQuickFixes
>> Wscript.Echo "Computer: " & objQuickFix.CSName
>> Wscript.Echo "Description: " & objQuickFix.Description
>> Wscript.Echo "Hot Fix ID: " & objQuickFix.HotFixID
>> Wscript.Echo "Installation Date: " & objQuickFix.InstallDate
>> Wscript.Echo "Installed By: " & objQuickFix.InstalledBy
>> Next
>>
>>
>> Don't enumerate the hotfixes installed on my XP machine, was the a new
>> class to Query aside from Win32_QuickFixEngineering?
>>
>> TIA./jbt
>
 >> Stay informed about: Hotfixe list on XP 
Back to top
Login to vote
J Ford

External


Since: Jan 12, 2005
Posts: 54



(Msg. 4) Posted: Wed Jul 12, 2006 2:24 pm
Post subject: Re: Hotfixe list on XP [Login to view extended thread Info.]
Archived from groups: per prev. post (more info?)
This was taken directly from scriptomatic version 2 and works on all my WinXP
SP1 & SP2 machines

If that doesn't work pull up a command window and type :/>systeminfo
<enter> and see if hotfix entries list for you there.

<script>
On Error Resume Next

Const wbemFlagReturnImmediately = &h10
Const wbemFlagForwardOnly = &h20

arrComputers = Array("DRVFV71")
For Each strComputer In arrComputers
WScript.Echo
WScript.Echo "=========================================="
WScript.Echo "Computer: " & strComputer
WScript.Echo "=========================================="

Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\CIMV2")
Set colItems = objWMIService.ExecQuery("SELECT * FROM
Win32_QuickFixEngineering", "WQL", _
wbemFlagReturnImmediately +
wbemFlagForwardOnly)

For Each objItem In colItems
WScript.Echo "Caption: " & objItem.Caption
WScript.Echo "CSName: " & objItem.CSName
WScript.Echo "Description: " & objItem.Description
WScript.Echo "FixComments: " & objItem.FixComments
WScript.Echo "HotFixID: " & objItem.HotFixID
WScript.Echo "InstallDate: " & WMIDateStringToDate(objItem.InstallDate)
WScript.Echo "InstalledBy: " & objItem.InstalledBy
WScript.Echo "InstalledOn: " & objItem.InstalledOn
WScript.Echo "Name: " & objItem.Name
WScript.Echo "ServicePackInEffect: " & objItem.ServicePackInEffect
WScript.Echo "Status: " & objItem.Status
WScript.Echo
Next
Next


Function WMIDateStringToDate(dtmDate)
WScript.Echo dtm:
WMIDateStringToDate = CDate(Mid(dtmDate, 5, 2) & "/" & _
Mid(dtmDate, 7, 2) & "/" & Left(dtmDate, 4) _
& " " & Mid (dtmDate, 9, 2) & ":" & Mid(dtmDate, 11, 2) & ":" &
Mid(dtmDate,13, 2))
End Function
</script>

"joseph" wrote:

> Seems to bloody to do can you show example how to do it?
> <joseomjr.TakeThisOut@gmail.com> wrote in message
> news:1152682502.869202.250760@p79g2000cwp.googlegroups.com...
> > If Win32_QuickFixEngineering does not work for you, maybe you can
> > retrieve the information from the registry.
> > HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall
> >
> > joseph wrote:
> >> howdy list,
> >>
> >> strComputer = "."
> >> Set objWMIService = GetObject("winmgmts:" _
> >> & "{impersonationLevel=impersonate}!\\" & strComputer &
> >> "\root\cimv2")
> >> Set colQuickFixes = objWMIService.ExecQuery _
> >> ("SELECT * FROM Win32_QuickFixEngineering")
> >> For Each objQuickFix in colQuickFixes
> >> Wscript.Echo "Computer: " & objQuickFix.CSName
> >> Wscript.Echo "Description: " & objQuickFix.Description
> >> Wscript.Echo "Hot Fix ID: " & objQuickFix.HotFixID
> >> Wscript.Echo "Installation Date: " & objQuickFix.InstallDate
> >> Wscript.Echo "Installed By: " & objQuickFix.InstalledBy
> >> Next
> >>
> >>
> >> Don't enumerate the hotfixes installed on my XP machine, was the a new
> >> class to Query aside from Win32_QuickFixEngineering?
> >>
> >> TIA./jbt
> >
>
>
>
 >> Stay informed about: Hotfixe list on XP 
Back to top
Login to vote
AnthonyJ

External


Since: Sep 12, 2006
Posts: 1



(Msg. 5) Posted: Tue Sep 12, 2006 11:32 am
Post subject: Re: Hotfixe list on XP [Login to view extended thread Info.]
Archived from groups: per prev. post (more info?)
This script will work on my local computer, but I have to access my remote
computer by the IP address (\\10.10.10.10\c$). How can you implement that
into the script instead of the machine name?

"J Ford" wrote:

> This was taken directly from scriptomatic version 2 and works on all my WinXP
> SP1 & SP2 machines
>
> If that doesn't work pull up a command window and type :/>systeminfo
> <enter> and see if hotfix entries list for you there.
>
> <script>
> On Error Resume Next
>
> Const wbemFlagReturnImmediately = &h10
> Const wbemFlagForwardOnly = &h20
>
> arrComputers = Array("DRVFV71")
> For Each strComputer In arrComputers
> WScript.Echo
> WScript.Echo "=========================================="
> WScript.Echo "Computer: " & strComputer
> WScript.Echo "=========================================="
>
> Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\CIMV2")
> Set colItems = objWMIService.ExecQuery("SELECT * FROM
> Win32_QuickFixEngineering", "WQL", _
> wbemFlagReturnImmediately +
> wbemFlagForwardOnly)
>
> For Each objItem In colItems
> WScript.Echo "Caption: " & objItem.Caption
> WScript.Echo "CSName: " & objItem.CSName
> WScript.Echo "Description: " & objItem.Description
> WScript.Echo "FixComments: " & objItem.FixComments
> WScript.Echo "HotFixID: " & objItem.HotFixID
> WScript.Echo "InstallDate: " & WMIDateStringToDate(objItem.InstallDate)
> WScript.Echo "InstalledBy: " & objItem.InstalledBy
> WScript.Echo "InstalledOn: " & objItem.InstalledOn
> WScript.Echo "Name: " & objItem.Name
> WScript.Echo "ServicePackInEffect: " & objItem.ServicePackInEffect
> WScript.Echo "Status: " & objItem.Status
> WScript.Echo
> Next
> Next
>
>
> Function WMIDateStringToDate(dtmDate)
> WScript.Echo dtm:
> WMIDateStringToDate = CDate(Mid(dtmDate, 5, 2) & "/" & _
> Mid(dtmDate, 7, 2) & "/" & Left(dtmDate, 4) _
> & " " & Mid (dtmDate, 9, 2) & ":" & Mid(dtmDate, 11, 2) & ":" &
> Mid(dtmDate,13, 2))
> End Function
> </script>
>
> "joseph" wrote:
>
> > Seems to bloody to do can you show example how to do it?
> > <joseomjr.RemoveThis@gmail.com> wrote in message
> > news:1152682502.869202.250760@p79g2000cwp.googlegroups.com...
> > > If Win32_QuickFixEngineering does not work for you, maybe you can
> > > retrieve the information from the registry.
> > > HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall
> > >
> > > joseph wrote:
> > >> howdy list,
> > >>
> > >> strComputer = "."
> > >> Set objWMIService = GetObject("winmgmts:" _
> > >> & "{impersonationLevel=impersonate}!\\" & strComputer &
> > >> "\root\cimv2")
> > >> Set colQuickFixes = objWMIService.ExecQuery _
> > >> ("SELECT * FROM Win32_QuickFixEngineering")
> > >> For Each objQuickFix in colQuickFixes
> > >> Wscript.Echo "Computer: " & objQuickFix.CSName
> > >> Wscript.Echo "Description: " & objQuickFix.Description
> > >> Wscript.Echo "Hot Fix ID: " & objQuickFix.HotFixID
> > >> Wscript.Echo "Installation Date: " & objQuickFix.InstallDate
> > >> Wscript.Echo "Installed By: " & objQuickFix.InstalledBy
> > >> Next
> > >>
> > >>
> > >> Don't enumerate the hotfixes installed on my XP machine, was the a new
> > >> class to Query aside from Win32_QuickFixEngineering?
> > >>
> > >> TIA./jbt
> > >
> >
> >
> >
 >> Stay informed about: Hotfixe list on XP 
Back to top
Login to vote
Display posts from previous:   
Related Topics:
List of Local/Domain grp members - Hi Experts, appr if you are able to help. I am in need of a tool that can help me to list all members in a grp. My servers are NT 4 & WIn2k. TQ

Generate a list of folders with sizes - Does anyone know of a script/tool for generating a list of folders on an NT 4.0 server with the size of each folder? I would like to get an idea of which folders are taking up the most space on the server. Many thanks for any help. Brian

List of groups - Hello! I'm having trouble to display list of groups from dictionary object for this script: Logon3.vbs by Richard L. Mueller. Can anybody help me? Grega ' Logon3.vbs ' VBScript logon script program. ' '..

how to list all computers in active directory - I need to write a script that will connect to ADSI and list all the computers in our branch. Basically, our AD tree looks like the following: domain.com | [+]- builtin |--- Computers [+]- Domain Controllers [+]- ForeignSecurityPrincipals [-]- Branches...

Deleting a list of machine accounts from AD - Hello all & thanks in advance for the help, I would like to delete a list of machine accounts from AD. The list is contained in textfile. I saw the script on technet for deleting a single machine account from AD: strComputer = "atl-pro-040...
   Windows Server (Home) -> Windows Server Scripting All times are: Pacific Time (US & Canada) (change)
Page 1 of 1

 
 You can post new topics in this forum
You can reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum



[ Contact us | Terms of Service/Privacy Policy ]