Сокеты и ASP

Привет

Возникла необходимость сделать аналог приведенного ниже кода на asp. Но с сокетами нет опыта работы, и возможно ли это вообще.
Конкретно интересует реализация этой строки:
@$fp = fsockopen("domain.ru", 80, $errno, $errstr, 3);

Вот весь код:



<?php
$site_id = 1003; // ID Сайта
$REFERER = 'http://'.getenv("SERVER_NAME").getenv("REQUEST_ URI");
$USERAGENT = getenv("HTTP_USER_AGENT");
$XFORWARDERFOR = getIP();
$FORWARDERFOR = getenv("HTTP_FORWARDED_FOR");
$REMOTEADDR = getIP();

@$fp = fsockopen("domain.ru", 80, $errno, $errstr, 3);
if($fp)
{
fputs($fp,
"GET /?s=$site_id&r=".get_rand_num()." HTTP/1.0
".
"HOST: domain.ru
".
"REFERER: $REFERER
".
"User-Agent: $USERAGENT
".
"X_FORWARDED_FOR: $XFORWARDERFOR
".
"FORWARDED_FOR: $FORWARDERFOR
".
"REMOTE_ADDR: $REMOTEADDR

");
while(!feof($fp) && $s=fgets($fp,512))
if ($s=="
") break;
$banner="";
while(!feof($fp)) {
$banner .= fgets($fp,512);
}
fclose($fp);
echo $banner;
}
else echo "";

function getIP() {
if (getenv("HTTP_CLIENT_IP")) $ip = getenv("HTTP_CLIENT_IP");
else if(getenv("HTTP_X_FORWARDED_FOR")) $ip = getenv("HTTP_X_FORWARDED_FOR");
else if(getenv("REMOTE_ADDR")) $ip = getenv("REMOTE_ADDR");
else $ip = "UNKNOWN";
return $ip;
}

function get_rand_num() {
list($usec, $sec) = explode(' ', microtime());
srand( (float) $sec + ((float) $usec * 12345));
return rand();
}
?>


Заранее благодарю

Тебе надо пользоваться объектом ServerXmlHttp (по ссылке есть примеры)
http://msdn.microsoft.com/libr... 98b8f3.asp

0

А по русски описаний и примеров нету?

http://yandex.ru/yandsearch?st... verXmlHttp

0