как закрытьдоступ на исполнение активикс скрипта на ИНЕТ ЭКСПЛОРЕРЕ [Версия для КПК]

dosim

21-02-2007, 13:39

Народ всем привет !
как можно закрыть лоступ на исполнение этого скрипта
я через интернет браузер закрыл,(групповая политика ), но при этом мне нужные сайты не работает ! что предлагаете уважаемые эксперты. домен 2003, клиенты хп

<html>
<head>
<script language="javascript">

function baby() {
var run=new ActiveXObject("WScript.Shell")

run.SendKeys("%{TAB}");
for(i=1; i<25; i++){
run.SendKeys("%");
run.SendKeys("{RIGHT}");
run.SendKeys("{DOWN}");
run.SendKeys("{ENTER}");
run.SendKeys("767");
run.SendKeys("{TAB}");
run.SendKeys("{TAB}");
run.SendKeys("{TAB}");
run.SendKeys("30");
run.SendKeys("{TAB}");
run.SendKeys("58979,1");
run.SendKeys("{TAB}");
run.SendKeys("{TAB}");
run.SendKeys("{TAB}");
run.SendKeys("{DOWN}");
run.SendKeys("{DOWN}");
run.SendKeys("{DOWN}");
run.SendKeys("{ENTER}");
run.SendKeys("{ENTER}");
run.SendKeys("%");
run.SendKeys("{RIGHT}");
run.SendKeys("{DOWN}");
run.SendKeys("{ENTER}");
run.SendKeys("1216");
run.SendKeys("{TAB}");
run.SendKeys("{TAB}");
run.SendKeys("{TAB}");
run.SendKeys("30");
run.SendKeys("{TAB}");
run.SendKeys("75075");
run.SendKeys("{TAB}");
run.SendKeys("{TAB}");
run.SendKeys("{TAB}");
run.SendKeys("{DOWN}");
run.SendKeys("{DOWN}");
run.SendKeys("{DOWN}");
run.SendKeys("{ENTER}");
run.SendKeys("{ENTER}");

}

};

</script>
</head>

<baby>
<input tyre="button" onclick="baby()" value="Go">
</baby>