Likes Likes:  0
Resultaten 1 tot 6 van de 6
Geen
  1. #1
    PR (pagerank) script gezocht
    geregistreerd gebruiker
    229 Berichten
    Ingeschreven
    04/07/06

    Locatie
    Keerbergen - België

    Post Thanks / Like
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    0 Berichten zijn liked


    Registrar SIDN: nee
    KvK nummer: nvt
    Ondernemingsnummer: 475423130

    Thread Starter

    PR (pagerank) script gezocht

    Ik ben opzoek naar een Page Rank script zoals je bijvoorbeeld op www.prcheck.nl kan (in werking) zien.

    Ik heb al ge-googled, maar zie dan vooral grafisch dingen (button achtige) die de PR geven van de pagina waarop je het script zet, en dat is nu net niet mijn bedoeling :-)

  2. #2
    PR (pagerank) script gezocht
    geregistreerd gebruiker
    512 Berichten
    Ingeschreven
    30/05/04

    Locatie
    [BE] Sint-Niklaas

    Post Thanks / Like
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    0 Berichten zijn liked


    Registrar SIDN: nee
    KvK nummer: nvt
    Ondernemingsnummer: nvt

    PHP Code:
    class PageRank {
        var 
    $hosts = array( 'www.google.com' );
        function 
    strord($str, $c, $m) { // {{{
            
    $i32 = 4294967296;  // 232

            
    $length = strlen($str);
            for (
    $i = 0; $i < $length; $i++) {
                
    $c = (float)( ((float)$c) * ((float)$m) );
                if (
    $c >= $i32) {
                    
    $c = (float)($c - $i32 * (int) ($c / $i32));
                    
    $c = (float)(($c < -2147483648) ? ($c + $i32) : $c);
                }
                
    $c = (float)($c + ord($str{$i}));
            }
            return 
    $c;
        } 
    // }}}
        
    function getCH( $str ) { // {{{
            
    $c1 = $this->strord( $str, 0x1505, 0x21 );
            
    $c2 = $this->strord( $str, 0, 0x1003F );

            
    $c1 >>= 2;        
            
    $c1 = (($c1 >> 4) & 0x3FFFFC0 ) | ($c1 & 0x3F);
            
    $c1 = (($c1 >> 4) & 0x3FFC00 ) | ($c1 & 0x3FF);
            
    $c1 = (($c1 >> 4) & 0x3C000 ) | ($c1 & 0x3FFF);          
            
    $T1 = (((($c1 & 0x3C0) << 4) | ($c1 & 0x3C)) <<2 ) | ($c2 & 0xF0F );
            
    $T2 = (((($c1 & 0xFFFFC000) << 4) | ($c1 & 0x3C00)) << 0xA) | ($c2 & 0xF0F0000 );
            
    $hn = ($T1 | $T2);
            
            
    $cb = $fl = 0;

            
    $hs = sprintf('%u', $hn);
            
    $length = strlen($hs);
            for (
    $i = $length - 1;  $i >= 0;  $i --) {
                
    $re = $hs{$i};
                if (
    1 === ($fl % 2)) {
                    
    $re += $re; 
                    
    $re = (int)($re / 10) + ($re % 10);
                }
                
    $cb += $re;
                
    $fl ++;       
            }

            
    $cb %= 10;
            if (
    0 !== $cb) {
                
    $cb = 10 - $cb;
                if (
    1 === ($fl % 2) ) {
                    if (
    1 === ($cb % 2)) {
                        
    $cb += 9;
                    }
                    
    $cb >>= 1;
                }
            }

            return 
    '7'.$cb.$hs;
            

        } 
    // }}}
        
    function getRank( $url ) { /// {{{
            
    $pagerank = -1;

            
    $cookie = $this->getCH( $url );        

            
    $host = $this->hosts[ mt_rand( 0, sizeof( $this->hosts ) - 1 ) ];
            
    $fp = fsockopen( $host, 80, $errno, $error, 2 );
            if ( 
    $fp ) {
                
    $header = '';
                
    $header .= "GET /search?client=navclient-auto&ch=" . $cookie .  "&features=Rank&q=info:" . $url . " HTTP/1.1\r\n" ;
                
    $header .= "Host: ".$host."\r\n" ;
                
    $header .= "Connection: Close\r\n\r\n" ;
                
    fwrite( $fp, $header );
                
    $data = '';
                while ( !
    feof( $fp ) ) {
                    
    $data .= fgets( $fp, 128 );
                }
                
    fclose( $fp );
                if ( ( 
    $pos = strpos( $data, 'Rank_' ) ) !== false ) {
                    
    $pagerank = intval( trim( substr( $data, $pos + 9 ) ) );
                    
    $pagerank = $this->pr_image($pagerank);
                }
            }
            return 
    $pagerank;
        } 
    /// }}}
        
        
    function pr_image($pagerank){
          if(
    $pagerank == 0){
           
    $PR = "<img src=\"images/pr0.gif\" alt=\"PageRank " .$pagerank. " out of 10\">" ;
           }elseif(
    $pagerank == 1){
           
    $PR = "<img src=\"images/pr1.gif\" alt=\"PageRank " .$pagerank. " out of 10\">" ;
           }elseif(
    $pagerank == 2){
           
    $PR = "<img src=\"images/pr2.gif\" alt=\"PageRank " .$pagerank. " out of 10\">" ;
           }elseif(
    $pagerank == 3){
           
    $PR = "<img src=\"images/pr3.gif\" alt=\"PageRank " .$pagerank. " out of 10\">" ;
           }elseif(
    $pagerank == 4){
           
    $PR = "<img src=\"images/pr4.gif\" alt=\"PageRank " .$pagerank. " out of 10\">" ;
           }elseif(
    $pagerank == 5){
           
    $PR = "<img src=\"images/pr5.gif\" alt=\"PageRank " .$pagerank. " out of 10\">" ;
           }elseif(
    $pagerank == 6){
           
    $PR = "<img src=\"images/pr6.gif\" alt=\"PageRank " .$pagerank. " out of 10\">" ;
           }elseif(
    $pagerank == 7){
           
    $PR = "<img src=\"images/pr7.gif\" alt=\"PageRank " .$pagerank. " out of 10\">" ;
           }elseif(
    $pagerank == 8){
           
    $PR = "<img src=\"images/pr8.gif\" alt=\"PageRank " .$pagerank. " out of 10\">" ;
           }elseif(
    $pagerank == 9){
           
    $PR = "<img src=\"images/pr9.gif\" alt=\"PageRank " .$pagerank. " out of 10\">" ;
           }else{
           
    $PR = "<img src=\"images/pr10.gif\" alt=\"PageRank " .$pagerank. " out of 10\">" ;
          }
          return 
    $PR;
        }
    } 
    Here you go

  3. #3
    PR (pagerank) script gezocht
    geregistreerd gebruiker
    229 Berichten
    Ingeschreven
    04/07/06

    Locatie
    Keerbergen - België

    Post Thanks / Like
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    0 Berichten zijn liked


    Registrar SIDN: nee
    KvK nummer: nvt
    Ondernemingsnummer: 475423130

    Thread Starter
    Bedankt, maar dan nu DE domme vraag...is dit PHP of ...?

  4. #4
    PR (pagerank) script gezocht
    geregistreerd gebruiker
    512 Berichten
    Ingeschreven
    30/05/04

    Locatie
    [BE] Sint-Niklaas

    Post Thanks / Like
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    0 Berichten zijn liked


    Registrar SIDN: nee
    KvK nummer: nvt
    Ondernemingsnummer: nvt

    Ja hoor, is PHP

    PHP Code:
    <?php
                $pagerank 
    = new PageRank();
                
    eregi("(http:)?(//)?([a-z0-9_~#@&;=./?+-]+)", $row->url, $output);
                
    $url = $output[3];
                
    $PR = $pagerank->getRank($url);
    ?>
    Dit is om de pagerank op te halen uit de url.

  5. #5
    PR (pagerank) script gezocht
    geregistreerd gebruiker
    229 Berichten
    Ingeschreven
    04/07/06

    Locatie
    Keerbergen - België

    Post Thanks / Like
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    0 Berichten zijn liked


    Registrar SIDN: nee
    KvK nummer: nvt
    Ondernemingsnummer: 475423130

    Thread Starter
    en nu ben ik het kwijt :-(
    Als je zegt "uit de URL", welke URL bedoel je dan?

  6. #6
    PR (pagerank) script gezocht
    Uuuuuhhh
    382 Berichten
    Ingeschreven
    06/11/06

    Locatie
    Voorburg

    Post Thanks / Like
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)
    1 Berichten zijn liked


    Registrar SIDN: nee
    KvK nummer: 27290746
    Ondernemingsnummer: nvt

    De URL van de pagina waar jij de pagerank van wilt hebben.

    Dus:

    PHP Code:
    $pagerank = new PageRank;
    $PR = $pagerank->getRank('webhostingtalk.nl'); 
    (zonder http://)

Webhostingtalk.nl

Contact

  • Rokin 113-115
  • 1012 KP, Amsterdam
  • Nederland
  • Contact
© Copyright 2001-2026 Webhostingtalk.nl.
Web Statistics