Jump to content
Sign in to follow this  
devilman16

objcreate to get Windows Update Info on remote host

Recommended Posts

devilman16

I am trying to read the installed Windows Updates remotely, but objcreate always connects to the local PC, not the remote host.

here is my code:

$objSession = ObjCreate("Microsoft.Update.Session","REMOTEHOST")
MsgBox(0,"",@error)
$objSearcher = $objSession.CreateUpdateSearcher
$patches = $objSearcher.Search("IsInstalled=1 and Type='Software'")

$NeededCount = $patches.Updates.Count
MsgBox(0,"",$NeededCount)

I get no error, but i am not able to connect to the remote host (my account has admin privileges on the remote host)

Can anybody help me?

Edited by devilman16

Share this post


Link to post
Share on other sites
water

Search the Example Scripts forum for 'Scriptomatic'. That generates WMI queries for you.


My UDFs and Tutorials:

Spoiler

UDFs:
Active Directory (NEW 2018-12-03 - Version 1.4.11.0) - Download - General Help & Support - Example Scripts - Wiki
OutlookEX (2018-10-31 - Version 1.3.4.1) - Download - General Help & Support - Example Scripts - Wiki
ExcelChart (2017-07-21 - Version 0.4.0.1) - Download - General Help & Support - Example Scripts
PowerPoint (2017-06-06 - Version 0.0.5.0) - Download - General Help & Support
Excel - Example Scripts - Wiki
Word - Wiki
 
Tutorials:

ADO - Wiki

 

Share this post


Link to post
Share on other sites
devilman16

Thanks for the info to this nice script, but a wmi querie will not help me, cause i also want to install updates over this script, so i have to use the createobj function.

http://msdn.microsoft.com/en-us/library/windows/desktop/aa387102%28v=vs.85%29.aspx

In powershell and VB it is working like a charm, but i dont get it to work with autoit...

$objsession = [activator]::CreateInstance([type]::GetTypeFromProgID("Microsoft.Update.Session","REMOTEHOST"))
$objSearcher= $objSession.CreateUpdateSearcher()
$patches = $objSearcher.Search("IsInstalled=0 and Type='Software'")
$patches.Updates.Count
Edited by devilman16

Share this post


Link to post
Share on other sites
devilman16

anybody can help?

Share this post


Link to post
Share on other sites
Danyfirex

this work for me.

Local $updateSession = ObjCreate("Microsoft.Update.Session")
$updateSession.ClientApplicationID = "MSDN Sample Script"
Local $updateSearcher = $updateSession.CreateUpdateSearcher()
Local $searchResult =$updateSearcher.Search("IsInstalled=0 and Type='Software'")

ConsoleWrite( "!List of applicable items on the machine:" & @CRLF)

For $i = 0 To $searchResult.Updates.Count-1
    $update = $searchResult.Updates.Item($i)
   ConsoleWrite( $update.Title & @CRLF)
Next
$updateSession=0
$updateSearcher=0
$searchResult=0
$update=0

Saludos

Share this post


Link to post
Share on other sites
devilman16

Hi Danyfirex,

thanks, you are right that is working (also on my site)!

But I'm trying to list the Updates from a remote system, not the local system.

I can do this with VBS without any problem, but over AutoIt its not possible for me.

I tried a workaround (over ScriptControl) and thats working:

$strWks = "REMOTEHOST"
$objSC = ObjCreate("MSScriptControl.ScriptControl")
$objSC.Language = "VBScript"
$code = 'Set Session = CreateObject("Microsoft.Update.Session","' & $strWks & '")'
$objSC.AddCode($code)
$objSC.Run
$objSession = $objSC.codeobject.session
$objSearcher = $objSession.CreateUpdateSearcher
$colUpdates = $objSearcher.Search("IsInstalled=1 and Type='Software'")
$NeededCount = $colUpdates.Updates.Count
m($NeededCount)

I think i open a BUG Ticket for objcreate

Edited by devilman16

Share this post


Link to post
Share on other sites
Danyfirex

I think this should work.

Local $sREMOTEHOST="here your memote host"

Local $updateSession = ObjCreate("Microsoft.Update.Session",$sREMOTEHOST)
$updateSession.ClientApplicationID = "MSDN Sample Script"
Local $updateSearcher = $updateSession.CreateUpdateSearcher()
Local $searchResult =$updateSearcher.Search("IsInstalled=0 and Type='Software'")

ConsoleWrite( "!List of applicable items on the machine:" & @CRLF)

For $i = 0 To $searchResult.Updates.Count-1
    $update = $searchResult.Updates.Item($i)
   ConsoleWrite( $update.Title & @CRLF)
Next
$updateSession=0
$updateSearcher=0
$searchResult=0
$update=0

Share this post


Link to post
Share on other sites
devilman16

Just tried it, and for me it doesn't work.

I get the Updates for my local PC not the remote PC defined in $sREMOTEHOST

Share this post


Link to post
Share on other sites
Danyfirex

can you put  the VBS script?

Share this post


Link to post
Share on other sites
devilman16

For excample:

Set objSession = CreateObject("Microsoft.Update.Session", "REMOTEHOST")
Set objSearcher = objSession.CreateUpdateSearcher
Set colHistory = objSearcher.QueryHistory(0, 1)

For Each objEntry in colHistory
    Wscript.Echo "Title: " & objEntry.Title
    Wscript.Echo "Update application date: " & objEntry.Date
Next

Share this post


Link to post
Share on other sites
BrewManNH

What are you using in the "REMOTEHOST" string for the computer name?


If I posted any code, assume that code was written using the latest release version unless stated otherwise. Also, if it doesn't work on XP I can't help with that because I don't have access to XP, and I'm not going to.
Give a programmer the correct code and he can do his work for a day. Teach a programmer to debug and he can do his work for a lifetime - by Chirag Gude
How to ask questions the smart way!

I hereby grant any person the right to use any code I post, that I am the original author of, on the autoitscript.com forums, unless I've specifically stated otherwise in the code or the thread post. If you do use my code all I ask, as a courtesy, is to make note of where you got it from.

Back up and restore Windows user files _Array.au3 - Modified array functions that include support for 2D arrays.  -  ColorChooser - An add-on for SciTE that pops up a color dialog so you can select and paste a color code into a script.  -  Customizable Splashscreen GUI w/Progress Bar - Create a custom "splash screen" GUI with a progress bar and custom label.  -  _FileGetProperty - Retrieve the properties of a file  -  SciTE Toolbar - A toolbar demo for use with the SciTE editor  -  GUIRegisterMsg demo - Demo script to show how to use the Windows messages to interact with controls and your GUI.  -   Latin Square password generator

Share this post


Link to post
Share on other sites
devilman16

@BrewManNH I use the hostname of the remote PC for excampe:

Set objSession = CreateObject("Microsoft.Update.Session", "2217PC25435")

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
Sign in to follow this  

×