Приглашаем принять участие в новом рейтинге сайтов

[Addtime]

Ребята, выручайте!
Рейтинг есть, а ресурсов "дельтиков" нет...
Я сам летаю, но на параплане, и очень хочется увидеть Ваши ресурсы на этом рейтинге. А то перекос получается, типа, летают одни парапланерюги.
С уважением, Сергей

[Van]

http://www.hangglider.kiev.ua/links/index.html тут есть некоторые ссылки на дельтапланерные клубы. Ну и наш, разумеется, hangglider.kiev.ua

[root]

http://yaca.yandex.ru/yca/time/cat/Sports/Extreme/

Code: Select all

set_time_limit(0);  
$cat = 'Sports/Extreme/';

$np_pat = '/<a target="_self" href="(.*)"><font color="#333333">УМЕД.<\/font><\/a>/U';  
$yc_pat = '/<li>\n<font><a.*href="(.*)".*>.*<\/li>/isU';  
$delay = '3';  
$a=1;  
$url = 'http://pda.yaca.yandex.ru/yca/tungrp/cat/'.$cat;  
$data = file_get_contents($url);  
$col=preg_match_all("!<h3>(.*?)</h3>!si",$data,$ok);  
$col=substr($ok[0][0],strpos($ok[0][0],":")+1);  
$col=trim($col);  
$col_pages=$col/20;  
  
for($i=0;$i<$col_pages;$i++)  
{  
    $page=$i.".html";  
    $url = 'http://pda.yaca.yandex.ru/yca/tungrp/cat/'.$cat.$page;  
  
    while ($data = file_get_contents($url)) {  
        #$data = iconv('utf-8', 'cp1251', $data);  
        preg_match_all($yc_pat, $data, $o1, PREG_SET_ORDER);  
        foreach ($o1 as $o) echo $a++.".".$o[1]."<br>"; flush();  
        preg_match($np_pat, $data, $o2);  
        $url = ($o2 ? $o2[1]:FALSE);  
  
        sleep($delay);  
    }  
}  

Прога не моя, консультаций не даю!

в цикле while переменная $o[1] - хост сайта.
Дописываешь парсер для вылавливания тайтлов главных страниц.
Заполняешь каталог. Все!

UPD: потом покупаешь блондинко в количестве 1 шт, которое за 5$ в час раскидает сайты по рубрикам. :D

[root]

Итого: 563 сайта

1.http:
///////////////
563.http:

[Серж]

Зашол по ссылке:
Дельтапланеризм (0)
Клубы (0) ,Личные страницы (0) ,Магазины (0) ,Производители (0) ,Форумы (0)

Лень-матушка или какой то развод?