Вернуться   Дизайнерский форум » ВЕБ-ПРОГРАММИРОВАНИЕ » ASP, Perl, PHP и MySQL

Скрипт ПР и ТИЦ

Обсуждение темы Скрипт ПР и ТИЦ в разделе ASP, Perl, PHP и MySQL, часть категории ВЕБ-ПРОГРАММИРОВАНИЕ; И нафиг мне туда мой УРЛ ставить???? урл должен вписывать в форму посетитель сайта. И каждый раз он будет разным!...


Закрытая тема
 
Опции темы
Старый 16.04.2008, 14:44   #11
И нафиг мне туда мой УРЛ ставить???? урл должен вписывать в форму посетитель сайта. И каждый раз он будет разным!

Последний раз редактировалось deMone; 16.04.2008 в 16:27.. Причина: Добавлено сообщение
 
Старый 16.04.2008, 14:44
Ссылки
Старый 16.04.2008, 15:11   #12
Приношу свои извинения. Неправ.

Создайте обыкновенную форму, в которой сделайте поле ввода, например, <input type="text" name="domain" />. Дальше используйте переменную $_GET['domain'], которую поместите в вызов функций тИЦ и PR:

Код:
echo 'тИЦ: ' . getBarCY($_GET['domain']);
echo '<br />';
echo 'PR: ' . getPageRank($_GET['domain']);

Последний раз редактировалось deMone; 16.04.2008 в 15:19..
 
Этот пользователь сказал спасибо deMone за это полезное сообщение:
Мерлин (16.04.2008)
Старый 16.04.2008, 17:13   #13
Большое спасибо! Всё доходчиво и просто, как оказалось!

Добавлено через 1 час 49 минут

вот.. создал форму..

Код:
<form action="zhilinsky.php" method="post">
<input type="text" name="domain" /><input type="submit">
</form>
и файл со скриптом

Код:
<?php define('GMAG', 0xE6359A60); 
function nooverflow($a) 
{ 
while ($a<-2147483648) 
$a+=2147483648+2147483648; 
while ($a>2147483647) 
$a-=2147483648+2147483648; 
return $a; 
} 
function zeroFill ($x, $bits) 
{ 
   if ($bits==0) return $x; 
   if ($bits==32) return 0; 
   $y = ($x & 0x7FFFFFFF) >> $bits; 
   if (0x80000000 & $x) { 
       $y |= (1<<(31-$bits)); 
   } 
   return $y; 
} 
function mix($a,$b,$c) { 
$a=(int)$a; $b=(int)$b; $c=(int)$c; 
$a -= $b; $a -= $c; $a=nooverflow($a); $a ^= (zeroFill($c,13)); 
$b -= $c; $b -= $a; $b=nooverflow($b); $b ^= ($a<<8); 
$c -= $a; $c -= $b; $c=nooverflow($c); $c ^= (zeroFill($b,13)); 
$a -= $b; $a -= $c; $a=nooverflow($a); $a ^= (zeroFill($c,12)); 
$b -= $c; $b -= $a; $b=nooverflow($b); $b ^= ($a<<16); 
$c -= $a; $c -= $b; $c=nooverflow($c); $c ^= (zeroFill($b,5)); 
$a -= $b; $a -= $c; $a=nooverflow($a); $a ^= (zeroFill($c,3)); 
$b -= $c; $b -= $a; $b=nooverflow($b); $b ^= ($a<<10); 
$c -= $a; $c -= $b; $c=nooverflow($c); $c ^= (zeroFill($b,15)); 
return array($a,$b,$c); 
} 
function GCH($url, $length=null, $init=GMAG) { 
    if(is_null($length)) 
    { 
        $length = sizeof($url); 
    } 
    $a = $b = 0x9E3779B9; 
    $c = $init; 
    $k = 0; 
    $len = $length; 
    while($len >= 12) 
    { 
        $a += ($url[$k+0] +($url[$k+1]<<8) +($url[$k+2]<<16) +($url[$k+3]<<24)); 
        $b += ($url[$k+4] +($url[$k+5]<<8) +($url[$k+6]<<16) +($url[$k+7]<<24)); 
        $c += ($url[$k+8] +($url[$k+9]<<8) +($url[$k+10]<<16)+($url[$k+11]<<24)); 
        $mix = mix($a,$b,$c); 
        $a = $mix[0]; $b = $mix[1]; $c = $mix[2]; 
        $k += 12; 
        $len -= 12; 
    } 
    $c += $length; 
    switch($len) 
    { 
        case 11: $c+=($url[$k+10]<<24); 
        case 10: $c+=($url[$k+9]<<16); 
        case 9 : $c+=($url[$k+8]<<8); 
        case 8 : $b+=($url[$k+7]<<24); 
        case 7 : $b+=($url[$k+6]<<16); 
        case 6 : $b+=($url[$k+5]<<8); 
        case 5 : $b+=($url[$k+4]); 
        case 4 : $a+=($url[$k+3]<<24); 
        case 3 : $a+=($url[$k+2]<<16); 
        case 2 : $a+=($url[$k+1]<<8); 
        case 1 : $a+=($url[$k+0]); 
    } 
    $mix = mix($a,$b,$c); 
    return $mix[2]; 
} 
function strord($string) 
{ 
    for($i=0;$i<strlen($string);$i++) 
    { 
        $result[$i] = ord($string{$i}); 
    } 
    return $result; 
} 


function getPageRank($aUrl) 
{ 
    $url = 'info:'.$aUrl; 
    $ch = GCH(strord($url)); 
    $url='info:'.urlencode($aUrl); 
    $pr = @file("http://www.google.com/search?client=navclient-auto&ch=6$ch&ie=UTF-8&oe=UTF-8&features=Rank&q=$url"); 
     $pr_str = @implode("", $pr); 
    return substr($pr_str,strrpos($pr_str, ":")+1); 
}

echo 'тИЦ: ' . getBarCY($_GET['domain']);
echo '<br />';
echo 'PR: ' . getPageRank($_GET['domain']);
?>

ввожу сайт - нажмаю кнопку - белый экран...

Последний раз редактировалось Мерлин; 16.04.2008 в 17:13.. Причина: Добавлено сообщение
 
Старый 16.04.2008, 17:57   #14
Подключите файл, в котором расположены функции для тИЦ (через include).
 
Старый 16.04.2008, 22:29   #15
на всякий: 2-я строка (перед function будет)
include "имя файла";
 
Старый 17.04.2008, 16:40   #16
эмм.. не совсем понял.. что нужно сделать?

Добавлено через 1 минуту

ага.. понял.. сейчас попробую...

Добавлено через 10 минут

вот блин.. всё сделал как вы говорили... ввоожу ссылку на Яндекс:

ТИЦ: 0
PR: пусто

может у кого-то есть минутка, что бы мне это всё собрать помочь?
оч. нужно..

Добавлено через 16 часов 54 минуты

=(
редиски вы все)))
пришлось заказывать за деньньги...

Последний раз редактировалось Мерлин; 17.04.2008 в 16:40.. Причина: Добавлено сообщение
 
Старый 18.04.2008, 10:05   #17
Цитата:
Сообщение от Мерлин Посмотреть сообщение
пришлось заказывать за деньньги...
Ну а как ты хотел?
 
Старый 18.04.2008, 10:34   #18
Надо было у меня и заказывать...
 
Старый 18.04.2008, 10:34
Закрытая тема




Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
скрипт FAQ barashek ASP, Perl, PHP и MySQL 2 26.09.2008 05:48
Скрипт с ИЕ BleSSeD HTML, CSS, JavaScript 12 30.08.2008 13:05
Скрипт Мерлин ASP, Perl, PHP и MySQL 7 27.09.2007 01:13
Что это за скрипт? Vladimiroff ASP, Perl, PHP и MySQL 6 12.12.2006 01:28
Ищу скрипт GLUK ASP, Perl, PHP и MySQL 17 17.02.2006 01:17


Текущее время: 03:01. Часовой пояс GMT +4.

Реклама на форуме Условия размещения рекламы
Биржа ссылок Заработай на сайте!
Дизайнерский форум