| Новости | FAQ | Авторы | Документация | В действии | Библиотека |
| Инструменты | Полезные ссылки | Хостинги | Скачать | Примеры | Форум |
Denis 23.05.2002 22:35
это написал Sumo (под вин 2000 работал- я поменял ping.exe нп ping, сбросил пинг в папку - (по другому никак));$ping[^file::exec[/ping;;$env:REMOTE_ADDR]]
$speed[^ping.text.match[Average =(.+)ms]]
^if($speed.1 <= 150){
<h2>У вас быстрое соединение!</h2>
$response:refresh[
$.value[0]
$.url[/test2.html]]
}{
<h2>У вас медленное соединение!</h2>
$response:refresh[
$.value[0]
$.url[/test1.html]]
}=======================================