Re: Scanning tool for KB870669?

From: Torgeir Bakken \(MVP\) (Torgeir.Bakken-spam_at_hydro.com)
Date: 07/14/04 

Date: Wed, 14 Jul 2004 03:37:46 +0200

docnz wrote:

> Hi there, I am just wondering if anyone knows if Microsoft has
> released a scanning tool to confirm if kb870669 has been installed
> successfully yet on all network pc's? I am aware you can check
> add/remove programs but this is to be done remotely.
Hi

No, Microsoft have not released a scanning tool for this, I doubt
that they ever will...

Anyway, to verify if the ADODB.Stream object is disabled for IE or not,
it is a simple registry read that you can do remotely.

Below is a vbscript as well as a batch file solution you can use as
a starting point:

VBScript:

'--------------------8<----------------------
Const HKLM = &H80000002

sComputer = "." ' use "." for local computer
Set oReg = GetObject("winmgmts:{impersonationLevel=impersonate}!\\" _
     & sComputer & "\root\default:StdRegProv")

sRegKey = "SOFTWARE\Microsoft\Internet Explorer\" _
         & "ActiveX Compatibility\{00000566-0000-0010-8000-00AA006D2EA4}"

sRegValue = "Compatibility Flags"

oReg.GetDWORDValue HKLM, sRegKey, sRegValue, iValueData

If iValueData = 1024 Then
   WScript.Echo "KB870669 is installed"
Else
   WScript.Echo "KB870669 is not installed"
End If
'--------------------8<----------------------

Batch file:

@echo off
set regvaluedata=
:: split regkey in two to avoid line wrap in newsreader
set regkey_part1=HKLM\SOFTWARE\Microsoft\Internet Explorer\
set regkey_part2=ActiveX Compatibility\{00000566-0000-0010-8000-00AA006D2EA4}
set regpath="\\%COMPUTERNAME%\%regkey_part1%%regkey_part2%"
set regvalue="Compatibility Flags"
:: line above for command (line might wrap)
for /f "Skip=4 Tokens=4" %%a in ('REG.EXE QUERY %regpath% /v %regvalue%') do
set regvaluedata=%%a
:: line under for command
If "%regvaluedata%"=="0x400" Goto KB870669Inst
Echo KB870669 is not installed on %COMPUTERNAME%
Goto End
:KB870669Inst
Echo KB870669 is installed on %COMPUTERNAME%
Goto End
:End
pause 

-- 
torgeir, Microsoft MVP Scripting and WMI, Porsgrunn Norway
Administration scripting examples and an ONLINE version of
the 1328 page Scripting Guide:
http://www.microsoft.com/technet/community/scriptcenter/default.mspx

Relevant Pages

  • Re: Convert from bat to vbs
    ... > if not exist alttiff.ocx goto bad ... > echo Error: Cannot find alttiff.ocx. ... Set oShell = CreateObject ... -- torgeir, Microsoft MVP Scripting and WMI, Porsgrunn Norway Administration scripting examples and an ONLINE version of the 1328 page Scripting Guide: ...
    (microsoft.public.scripting.vbscript)
  • Re: Heres how easy it is
    ... Closing the web browser is an event that can be detected in Javascript ... it is a version of Windows and one that includes taskkill.exe then you ... I normally want scripting enabled in the web browser because far too ... @echo off ...
    (alt.comp.anti-virus)
  • Re: PC Pitstop tests?
    ... I don't know about an add-on to IE that lets the user quickly and easily ... Whether scripting is enabled or not for IE is a registry setting (but having ... @echo off ... So I don't have an add-on for disabling/enabling scripting in IE but a ...
    (alt.comp.hardware.pc-homebuilt)
  • Re: How to block these Facebook and Twitter widgets?
    ... You'll have to disable scripting to make them go ... variable) and the batch file is called noscriptIE.bat, ... @echo off ... so prevalent in web pages that carte blanch disabling of scripting in ...
    (microsoft.public.windowsxp.general)
  • Re: COmmand Line for finding File Version Information
    ... To obtain the version including build number, the following VBScript ... echo WSH version is: %WSHver% ... Filever.exe is in the Win2k Support Tools found on the Win2k CD, ... torgeir, Microsoft MVP Scripting, Porsgrunn Norway ...
    (microsoft.public.windows.server.general)