Помгатие плиз

[Wanzy]

Помагите что это за код, что он делает?



Set wshShell = CreateObject("WScript.Shell")

startTime = Now
doWhileTimeout = 7 / 86400
Do While Now - startTime < doWhileTimeout
If wshShell.AppActivate("mode extensions") or wshShell.AppActivate("разработчика") or wshShell.AppActivate("розробника") Then
wshShell.SendKeys "{ESC}"
End If
WScript.Sleep 10
Loop

If Now - startTime >= doWhileTimeout Then
WScript.Quit
End If

 

[sVor]

в течение 7 сек проверяет активность окон приложений и если одно из них активно - отправляет клавишу ESC для закрытия

 

[Wanzy]

спасибо