форум вебмастероff на AlfaSpace.NET

 
<? 

$so = fsockopen("maxtat.lx-host.net", 80, &$errno, &$errstr, 30); 
// послали GET форму (простой URL + указание вирт. хоста) 
fputs($so,"GET /files/antivirusKaspersky5.0PPCALL.rar HTTP/1.0\nHOST: maxtat.lx- 
host.net\n\n"); 

// читаем все, пока не наступит "конец заголовка" (т.е. начало документа) 
// если наступит, то со след. байта начнется документ 
while(fgets($so,256)!="\r\n" && !feof($so)); 

unset($buf); 
// читаем документ в переменную 
while(!feof($so)) $buf.=fread($so,256); 
// Готово. В переменной $buf храниться скаченный документ (т.е. файл) 
// Максимум можно читать порциями по 64K-1байт 

// закрываем сокет 
fclose($so); 
echo "Download fine, size ".strlen($buf)." bytes."; flush(); 

// используем скаченный файл (в переменной) по назначению... 
$f=fopen("antivirusKaspersky5.0PPCALL.rar","wb+"); 
fwrite($f,$buf,strlen($buf)); // тут тоже надо использовать while, т.к. 
// максимум можно записывать по 64К-1байт в fwrite 
fclose($f); 

?>