Стойкость шифра в IE

[SlavaS]

Подскажите пожалуйста как получить стойкость шифра из Internet Explorer в Vista/7?
Смотрится он "Справка -> О программе -> стойкость шифра"
В XP можно получить так:

$strComputer = "."
$objWMIService = ObjGet("winmgmts:\\" & $strComputer & "\root\cimv2\Applications\MicrosoftIE")

$colIESettings = $objWMIService.ExecQuery ("Select * from MicrosoftIE_Summary")

For $strIESetting in $colIESettings
    ConsoleWrite( "Version: " & $strIESetting.Version & @CR)
    ConsoleWrite( "Product ID: " & $strIESetting.ProductID & @CR)
    ConsoleWrite( "Cipher strength: " & $strIESetting.CipherStrength & @CR)
Next

Но начиная с Vista и выше был удален объект "MicrosoftIE" :(.

 

[SlavaS]

Вот ещё нашел статью http://support.microsoft.com/kb/259122 только там на С++
может получится переделать под AutoIT?

 

[SlavaS]

Сам себе и отвечаю
Вот нашел что-то похожее, вроде совпадает с реальной стойкостью шифра.

$strComputer = "."
$objWMI = ObjGet("winmgmts:\\" & $strComputer & "\root\cimv2")
$objItems = $objWMI.ExecQuery("SELECT * FROM Win32_OperatingSystem")
	For $objItem In $objItems
		ConsoleWrite( "EncryptionLevel: " & $objItem.EncryptionLevel)
	Next