Wanna cRY - [3] :: В помощь системному администратору

Скрипт vb для проверки установленных обновлений от WannaCrypt.

==================================================
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_QuickFixEngineering",,48)

patchFound = 0

For Each objItem in colItems
If objItem.HotfixID = "KB3205409" then
patchFound = 1
     wscript.echo "Установлен патч KB3205409"

End If
If objItem.HotfixID = "KB3210720" then
patchFound = 1
    wscript.echo "Установлен патч KB3210720"

End If
If objItem.HotfixID = "KB3210721" then
patchFound = "KB3210721"
    wscript.echo "Установлен патч KB3210721"

End If
If objItem.HotfixID = "KB3212646" then
patchFound =1
    wscript.echo "Установлен патч KB3212646"

End If
If objItem.HotfixID = "KB3213986" then
patchFound = 1
    wscript.echo "Установлен патч KB3213986"

End If
If objItem.HotfixID = "KB4012212" then
patchFound = "KB4012212"
    wscript.echo "Установлен патч KB4012212"

End If
If objItem.HotfixID = "KB4012212" then
patchFound = 1
    wscript.echo "Установлен патч KB4012212"

End If
If objItem.HotfixID = "KB4012213" then
patchFound = 1
    wscript.echo "Установлен патч KB4012213"

End If
If objItem.HotfixID = "KB4012214" then
patchFound = 1
    wscript.echo "Установлен патч KB4012214"

End If
If objItem.HotfixID = "KB4012215" then
patchFound = "KB4012215"
    wscript.echo "Установлен патч KB4012215"

End If
If objItem.HotfixID = "KB4012216" then
patchFound = 1
    wscript.echo "Установлен патч KB4012216"

End If

If objItem.HotfixID = "KB4012217" then
patchFound = "KB4012217"
    wscript.echo "Установлен патч KB4012217"

End If

If objItem.HotfixID = "KB4012218" then
patchFound = 1
    wscript.echo "Установлен патч KB4012218"

End If

If objItem.HotfixID = "KB4012220" then
patchFound = 1
    wscript.echo "Установлен патч KB4012220"

End If

If objItem.HotfixID = "KB4012598" then
patchFound = "KB4012598"
    wscript.echo "Установлен патч KB4012598"

End If

If objItem.HotfixID = "KB4012606" then
patchFound = 1
    wscript.echo "Установлен патч KB4012606"

End If

If objItem.HotfixID = "KB4013198" then
patchFound = 1
    wscript.echo "Установлен патч KB4013198"
exit For
End If

If objItem.HotfixID = "KB4013389" then
patchFound = 1
    wscript.echo "Установлен патч KB4013389"
exit For
End If
If objItem.HotfixID = "KB4013429" then
patchFound = 1
    wscript.echo "Установлен патч KB4013429"
exit For
End If

If objItem.HotfixID = "KB4015217" then
patchFound = 1
    wscript.echo "Установлен патч KB4015217"
exit For
End If
If objItem.HotfixID = "KB4015438" then
patchFound = 1
    wscript.echo "Установлен патч KB4015438"
exit For
End If
If objItem.HotfixID = "KB4015546" then
patchFound = 1
    wscript.echo "Установлен патч KB4015546"
exit For
End If
If objItem.HotfixID = "KB4015547" then
patchFound = 1
    wscript.echo "Установлен патч KB4015547"
exit For
End If
If objItem.HotfixID = "KB4015548" then
patchFound = 1
    wscript.echo "Установлен патч KB4015548"
exit For
End If
If objItem.HotfixID = "KB4015549" then
patchFound = 1
    wscript.echo "Установлен патч KB4015549"
exit For
End If
If objItem.HotfixID = "KB4015550" then
patchFound = 1
    wscript.echo "Установлен патч KB4015550"
exit For
End If
If objItem.HotfixID = "KB4015551" then
patchFound = 1
    wscript.echo "Установлен патч KB4015551"
exit For
End If
If objItem.HotfixID = "KB4015552" then
patchFound = 1
    wscript.echo "Установлен патч KB4015552"
exit For
End If
If objItem.HotfixID = "KB4015553" then
patchFound = 1
    wscript.echo "Установлен патч KB4015553"
exit For
End If
If objItem.HotfixID = "KB4015554" then
patchFound = 1
    wscript.echo "Установлен патч KB4015554"
exit For
End If
If objItem.HotfixID = "KB4016635" then
patchFound = 1
    wscript.echo "Установлен патч KB4016635"
exit For
End If
If objItem.HotfixID = "KB4019213" then
patchFound = 1
    wscript.echo "Установлен патч KB4019213"
exit For
End If
If objItem.HotfixID = "KB4019213" then
patchFound = 1
    wscript.echo "Установлен патч KB4019213"
exit For
End If
If objItem.HotfixID = "KB4019214" then
patchFound = 1
    wscript.echo "Установлен патч KB4019214"
exit For
End If
If objItem.HotfixID = "KB4019215" then
patchFound = 1
    wscript.echo "Установлен патч KB4019215"
exit For
End If
If objItem.HotfixID = "KB4019216" then
patchFound = 1
    wscript.echo "Установлен патч KB4019216"
exit For
End If
If objItem.HotfixID = "KB4019263" then
patchFound = 1
    wscript.echo "Установлен патч KB4019263"
exit For
End If
If objItem.HotfixID = "KB4019264" then
patchFound = 1
    wscript.echo "Установлен патч KB4019264"
exit For
End If
If objItem.HotfixID = "KB4019472" then
patchFound = 1
    wscript.echo "Установлен патч KB4019472"
exit For
End If
If objItem.HotfixID = "KB4015221" then
patchFound = 1
    wscript.echo "Установлен патч KB4015221"
exit For
End If
If objItem.HotfixID = "KB4019474" then
patchFound = 1
    wscript.echo "Установлен патч KB4019474"
exit For
End If
If objItem.HotfixID = "KB4015219" then
patchFound = 1
    wscript.echo "Установлен патч KB4015219"
exit For
End If
If objItem.HotfixID = "KB4019473" then
patchFound = 1
    wscript.echo "Установлен патч KB4019473"
exit For
End If

Next

If patchFound = 0 then
wscript.echo "Патч не установлен! Обратитесь к Администратору"
End If

=======================================

Модерирует : lynx, Crash_Master, dg, emx, ShriEkeR
Версия для печати • Подписаться • Добавить в закладки
Страницы: 1 2 3 4 5