HOME FORUMS MEMBERS RECENT POSTS LOG IN  
× Авторизация
Имя пользователя:
Пароль:
Нет аккаунта? Регистрация
Баннер 1   Баннер 2
НОВЫЕ ТОРГОВАЯ НОВОСТИ ЧАТ
loading...
Скрыть
Вернуться   ANTICHAT > ПРОГРАММИРОВАНИЕ > PHP
   
Ответ
 
Опции темы Поиск в этой теме Опции просмотра

Перестал работать скрипт
  #1  
Старый 28.11.2008, 00:08
still12
Познающий
Регистрация: 18.11.2007
Сообщений: 81
С нами: 9725873

Репутация: 6
По умолчанию Перестал работать скрипт

Везде где используется этот скрипт на сегоднишний день значения тиц = 0. Что в нем не так ? Исправте плз))Раньше все норм было
PHP код:
<?php

function cy($url)
{


$url=str_replace("http://","",$url);

 
$fp fsockopen("bar-navig.yandex.ru"80$errno$errstr30); 
  if (!
$fp) { return FALSE;  } 
     else { 
     
$out "GET /u?ver=2&url=http://$url/&show=1 HTTP/1.1\r\n" 
     
$out .= "Host: bar-navig.yandex.ru\r\n" 
     
$out .= "Connection: Close\r\n\r\n" ;  
     
fwrite($fp$out); 
     
     
$data="";
     while (!
feof($fp)) { 
       
$data .= fgets($fp128); 
          } 
           
fclose($fp);  
          
         
$pos=strpos($data,"value")+7;
         
$itog=substr($data$pos5);
         
         
$itog=substr($itog0strpos($itog,'"'));
        
        return 
$itog;
         
     } 
     
    

}



?>

Последний раз редактировалось still12; 28.11.2008 в 00:27..
 
Ответить с цитированием

  #2  
Старый 28.11.2008, 00:18
Solker
Участник форума
Регистрация: 04.05.2006
Сообщений: 161
С нами: 10537558

Репутация: 158
По умолчанию

PHP код:
$url=str_replace("http://","",$url); 

Последний раз редактировалось Solker; 28.11.2008 в 00:22..
 
Ответить с цитированием

  #3  
Старый 28.11.2008, 00:27
still12
Познающий
Регистрация: 18.11.2007
Сообщений: 81
С нами: 9725873

Репутация: 6
По умолчанию

Цитата:
Сообщение от Solker  
PHP код:
$url=str_replace("http://","",$url); 
Опечаточка вышла ....исправил в верхнем посте ....не работает именно так
 
Ответить с цитированием

  #4  
Старый 28.11.2008, 00:32
mr.The
Познавший АНТИЧАТ
Регистрация: 30.04.2007
Сообщений: 1,205
С нами: 10016425

Репутация: 1257


По умолчанию

а может яндекс забанил? я в полезных скриптах выкладывал функцию для работы с сокетами. найди и попробуй её.
 
Ответить с цитированием

  #5  
Старый 28.11.2008, 00:45
Solker
Участник форума
Регистрация: 04.05.2006
Сообщений: 161
С нами: 10537558

Репутация: 158
По умолчанию

У меня все работает.
PHP код:
<?php

echo cy("www.google.ru");

function 
cy($url)
{

$url str_replace("http://","",$url);

$fp fsockopen("bar-navig.yandex.ru"80$errno$errstr30); 
if (!
$fp) return FALSE;  
else { 
  
$out "GET /u?ver=2&url=http://$url/&show=1 HTTP/1.1\r\n" 
  
$out .= "Host: bar-navig.yandex.ru\r\n" 
  
$out .= "Connection: Close\r\n\r\n" ;  
  
  
fwrite($fp$out);   
  while (!
feof($fp)) {
      
$date fgets($fp128); 
      if(
strpos($date,"rang")) break;
  }
  
fclose($fp);  
          
  
preg_match('#rang="(.*?)" value="(.*?)"#'$date$matches);
  
  return 
"Rang = {$matches[1]}, Value = {$matches[2]}";
  
//return $matches[2];
 

}

?>

Последний раз редактировалось Solker; 28.11.2008 в 00:49..
 
Ответить с цитированием

Почти полностью
  #6  
Старый 28.11.2008, 02:05
still12
Познающий
Регистрация: 18.11.2007
Сообщений: 81
С нами: 9725873

Репутация: 6
По умолчанию Почти полностью

Чтоб было яснее выложу почти весь скрипт. Pr определяет на ура а вот с тиц проблемы...(всегда 0)

Файл index.php

PHP код:
<html><head><title>Проверка</title></head>
<body>
<br>
<?php
//error_reporting(0);

include("./goo.php");
include(
"./cy.php");

if (isset(
$_POST['ok']))
{
$arr=explode("\n",$_POST['area']);
echo 
"<ul>";
foreach (
$arr as $k=>$url)
{
$url=trim($url);
if (
$url=='') continue;
echo 
$k.") ".$url." ";

$xx=intval(cy($url));
$prr=getPageRank($url);
echo 
"Pr: <b>$prr</b>";
echo 
"тИЦ: $xx<br>";

flush();
}
//end foreach





}
?>
<b><br>Проверить список имен на PR & ТИЦ</b>
<form action="<?=$_SERVER['PHP_SELF']?>" method="post">
<textarea name="area" rows=7 cols=35></textarea>

<br>
<input type="submit" name="ok" value="Проверить!">
</form>
<br>
<br>
<a href="http://kreved.name">йА Кревед</a>
</body></html>

Файл cy.php
PHP код:
<?php

function cy($url)
{


$url=str_replace("http://","",$url);

 
$fp fsockopen("bar-navig.yandex.ru"80$errno$errstr30); 
  if (!
$fp) { return FALSE;  } 
     else { 
     
$out "GET /u?ver=2&url=http://$url/&show=1 HTTP/1.1\r\n" 
     
$out .= "Host: bar-navig.yandex.ru\r\n" 
     
$out .= "Connection: Close\r\n\r\n" ;  
     
fwrite($fp$out); 
     
     
$data="";
     while (!
feof($fp)) { 
       
$data .= fgets($fp128); 
          } 
           
fclose($fp);  
          
         
$pos=strpos($data,"value")+7;
         
$itog=substr($data$pos5);
         
         
$itog=substr($itog0strpos($itog,'"'));
        
        return 
$itog;
         
     } 
     
    

}



?>
ну думаю goo.php нет нужды выкладывать ибо пр определяется всегда верно

Помогите востановить работу скрипта
Нужна именно массовая проверка
 
Ответить с цитированием

  #7  
Старый 28.11.2008, 02:15
Solker
Участник форума
Регистрация: 04.05.2006
Сообщений: 161
С нами: 10537558

Репутация: 158
По умолчанию

Чего тупим? Я тебе переписал функцию на более рабочий вариант с регулярками, там всегда int будет.
PHP код:
$xx=intval(cy($url)); 
PHP код:
$xx=cy($url); 
У меня заменишь:
PHP код:
return "Rang = {$matches}, Value = {$matches}"
на
PHP код:
return $matches

Последний раз редактировалось Solker; 28.11.2008 в 02:18..
 
Ответить с цитированием

  #8  
Старый 28.11.2008, 02:39
still12
Познающий
Регистрация: 18.11.2007
Сообщений: 81
С нами: 9725873

Репутация: 6
По умолчанию

Solker, огромное спс )))Ток теперь при тиц = 0 скрипт выдает пустое место а не ноль
тоесть
0) getcms.ru Pr: 1 тИЦ:
 
Ответить с цитированием

  #9  
Старый 28.11.2008, 03:09
Solker
Участник форума
Регистрация: 04.05.2006
Сообщений: 161
С нами: 10537558

Репутация: 158
По умолчанию

Ой, извиняюсь. Верни intval().
$xx=intval(cy($url));
 
Ответить с цитированием
Ответ



Предыдущая тема Следующая тема
Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Обновление на серверах Icq - перестал работать Qip -=lebed=- Мировые новости. Обсуждения. 14 25.10.2006 09:32
* Apple *выпустила программный пакет, позволяющий Macintosh работать под Windows Zek Мировые новости. Обсуждения. 1 07.04.2006 14:39
Скрипт для брута... Allen PHP 4 07.03.2006 01:28
Php скрипт для отправки писем... Allen PHP 6 21.02.2006 22:30



Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
 


Быстрый переход




ANTICHAT ™ © 2001- Antichat Kft.