parser

Написать ответ на текущее сообщение

 

 
   команды управления поиском

Пож.

-=OHRANA=- 21.08.2003 13:20 / 21.08.2003 13:30

@main[]
$ip[$env:REMOTE_ADDR]
$parts[^ip.split[.;h]] 
$net[${parts.0}.${parts.1}.${parts.2}]
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<html>
<head>
   <meta http-equiv="Content-Type" content="text/html; charset=win-1251">
   <title>test</title>
</head>
<body text="#000000" bgcolor="#FFFFFF" link="#0000FF" vlink="#000080" alink="#FF0000">
<center>
<h3>Извините, сайт в стадии разработки.</h3>
^if($net eq 172.22.1){
<a href="http://172.22.1.1:8000/listen.pls">Радио 128 Кбит</a>
}{
<a href="http://172.22.55.1:8000/listen.pls">Радио 128 Кбит</a>
}
<body>
</html>