1. Halo Guest, pastikan Anda selalu menaati peraturan forum sebelum mengirimkan post atau thread baru.

[ISENG] PHP Get Query From Search Engine & Its Related Keywords

Discussion in 'Pemrograman Web' started by gembel-intelek, Dec 27, 2011.

  1. gembel-intelek

    gembel-intelek Lurker

    Joined:
    Mar 29, 2009
    Messages:
    4,341
    Likes Received:
    907
    Location:
    New Coral
    numpang bikin trit mod daripada bengong, kalo ga berguna, numpang lewat jg gpp :swt2:



    iseng2 merangkai kata kode buat nangkep query dari search engine dan mengawinkan dengan api Bing buat ngedapetin relates searches terms


    ini buat nangkep query
    PHP:
    function anu() {
        if (isset(
    $_SERVER['HTTP_REFERER']) || ($_SERVER['HTTP_REFERER'] !='')){
            
    $referer parse_url($_SERVER['HTTP_REFERER']);
            
    $host $referer['host'];
            
    $query $referer['query'];
            
    $search_engines = array(
            
    'about' => 'terms',
            
    'alice' => 'qs',
            
    'alltheweb' => 'q',
            
    'altavista' => 'q',
            
    'aol' => 'q',
            
    'aol.' => 'query',
            
    'aol..' => 'encquery',
            
    'answers' => 's',
            
    'aolsearch' => 'q',
            
    'ask' => 'q',
            
    'baidu' => 'wd',
            
    'bing' => 'q',
            
    'cnn' => 'query',
            
    'daum' =>'q',
            
    'eniro' => 'search_word',
            
    'ekolay' => 'q',
            
    'google' => 'q',
            
    'google.se' => 'as_q'//google.se
            
    'images.google' => 'q',
            
    'kvasir' => 'q',
            
    'live' => 'q',
            
    'lycos' => 'query',
            
    'mamma' => 'query',
            
    'msn' => 'q',
            
    'mynet' => 'q',
            
    'naver' => 'query',
            
    'najdi' => 'q',
            
    'netscape' => 'query',
            
    'onet' => 'qt',
            
    'ozu' => 'q',
            
    'pchome' => 'q',
            
    'rambler' => 'words',
            
    'search' => 'q',
            
    'sesam' => 'q',
            
    'seznam' => 'q',
            
    'sNOWsh' => 'q',
            
    'szukacz' => 'q',
            
    'terra' => 'query',
            
    'voila' => 'rdata',
            
    'virgilio' => 'qs',
            
    'wp' => 'szukaj',
            
    'yahoo' => 'p',
            
    'yam' => 'k',
            
    'yandex' => 'text',
            );
            if (
    preg_match('/('.implode('|',array_keys($search_engines)).')\./'$host$matches)){
                
    $a preg_match('/('.implode('|',array_values($search_engines)).')=(.*?)&/',$query$keywords);
                
    $keyword urldecode($keywords[2]);
                
    $keyword preg_replace('~[^0-9a-z]+~i',' ',$keyword);
                
    $keyword trim($keyword);
                return 
    $keyword;
            }
        }
    }

    ini buat related anunya :swt2:
    PHP:
    function related($anu){
        
    $url 'http://api.bing.net/json.aspx?Appid=ABCDE&query='.urlencode($anu).'&sources=RelatedSearch&JsonType=raw';//GANTI ABCDE DG API BING
        
    $ch curl_init();
        
    $timeout 5;
        
    curl_setopt($chCURLOPT_URL$url);
        
    curl_setopt($chCURLOPT_RETURNTRANSFER1);
        
    curl_setopt($chCURLOPT_CONNECTTIMEOUT$timeout);
        
    curl_setopt($chCURLOPT_USERAGENT'Mozilla/5.0 (Windows; U; Windows NT 5.1; de; rv:1.9.2.3) Gecko/20100401 Firefox/3.6.3 (.NET CLR 3.5.30729) (Prevx 3.0.5)');
        
    $data curl_exec($ch);
        
    curl_close($ch);
        if (
    $data){
            
    $query json_decode($datatrue);
            if (isset(
    $query['SearchResponse']['RelatedSearch']['Results'])){
                
    $terms $query['SearchResponse']['RelatedSearch']['Results'];
                foreach (
    $terms as $keys){
                    
    $term[] = $keys;
                }
                foreach (
    $term as $key){
                    echo 
    $key['Title']."\n";
                }
            }
        }
    }
    ini buat manggil anunya

    PHP:
    $anu anu();
    echo 
    $anu."\n";
    echo 
    related($anu)."\n";

    kenapa repot2 kalo ada STT2nya bang Purwedi?

    kan iseng gan :swt2:
    kali aja yg punya php web mau nampilin anu2 :D
     
  2. aditwebid

    aditwebid Super Hero

    Joined:
    Mar 10, 2011
    Messages:
    1,877
    Likes Received:
    32
    Location:
    Dumai - Medan - Brastagi
    boleh juga nih gan buat nembak keyword :mukamesum:
     
  3. gembel-intelek

    gembel-intelek Lurker

    Joined:
    Mar 29, 2009
    Messages:
    4,341
    Likes Received:
    907
    Location:
    New Coral

    apalagi kalo related anunya dikawinin ma AGC :tampar:
     
    ariefsanjani likes this.
  4. laila

    laila Ads.id Fan

    Joined:
    Jul 13, 2011
    Messages:
    211
    Likes Received:
    0
    wah, ane demen mas sama anunya... :mukamesum: :lol:
     
  5. pinginsehat

    pinginsehat Banned

    Joined:
    Jul 27, 2010
    Messages:
    3,151
    Likes Received:
    279
    Location:
    Surabaya
    ada anu yg **lebih-besar mas? :lol:


    ** sama imagenya
     
  6. wongkediri

    wongkediri Ads.id Pro

    Joined:
    Apr 30, 2010
    Messages:
    341
    Likes Received:
    2
    Location:
    Kedirigakure
    script lgsg lbh cepet drpd pk plugin.. trims........
     
  7. gembel-intelek

    gembel-intelek Lurker

    Joined:
    Mar 29, 2009
    Messages:
    4,341
    Likes Received:
    907
    Location:
    New Coral
    tapi ini tidak kesave lho gan, jadi ga bisa nongol tanpa referer :D
     
  8. adsene

    adsene Super Hero

    Joined:
    Nov 17, 2009
    Messages:
    1,010
    Likes Received:
    64
    wah bingung replace anunya sama anu nih :D
     
  9. khoid

    khoid Super Hero

    Joined:
    Aug 18, 2008
    Messages:
    3,380
    Likes Received:
    256
    Location:
    depok
    wowww,., ajarin ane dunk mbel biar anu saya bisa kaya anu na dikau :kacapembesar:
     
  10. fee_kyu

    fee_kyu Super Hero

    Joined:
    May 25, 2010
    Messages:
    892
    Likes Received:
    8
    Location:
    malang
    mas da cara ato tutorial buat nempatin ANU. bingung nih maksudnya ANU itu ma kode2nya
     
  11. Alfiano

    Alfiano Super Hero

    Joined:
    Nov 12, 2009
    Messages:
    1,113
    Likes Received:
    344
    Location:
    Heaven
    kalo di wordpress itu "anu" dimasukkan di mana ya bro? (jangan ngeres lho) hahaha...maklum nyubitol tol tol tol..
     
  12. gembel-intelek

    gembel-intelek Lurker

    Joined:
    Mar 29, 2009
    Messages:
    4,341
    Likes Received:
    907
    Location:
    New Coral
    yg 2 kode atas taruh di functions.php

    yg kode paling bawah bisa di single.php
     
  13. itsmefurzy

    itsmefurzy Super Hero

    Joined:
    Dec 5, 2009
    Messages:
    789
    Likes Received:
    89
    wew. sama seperti STT2an ya.keren :salaman:
     
  14. bocah_lugu

    bocah_lugu Ads.id Pro

    Joined:
    Nov 16, 2011
    Messages:
    284
    Likes Received:
    14
    Location:
    Kota Gethuk
    ane bingung sama anunya agan ni.
     
  15. aPeN.Jr

    aPeN.Jr Newbie

    Joined:
    Sep 8, 2012
    Messages:
    8
    Likes Received:
    0
    Gan klo mau dipasang di web biasa bukan di wordpress. Penempatannya dimana ya ?
    Dan buat simpan keywordna di log bisa ga ya ? syntaxnya gmn ya ?
     
  16. gudel

    gudel Ads.id Pro

    Joined:
    Dec 13, 2012
    Messages:
    269
    Likes Received:
    24
    Masih bagusan punya gugel. :)
     
  17. widi 980

    widi 980 Ads.id Fan

    Joined:
    Jun 24, 2013
    Messages:
    200
    Likes Received:
    23
    Location:
    Di hatinya VE
    Wah keren gan, gak cuman bisa di implementasikan di WP aja kan gan?, BTW itu buat nampilin anunya :sttt: bing gitu gan??
     
  18. zulkhaery

    zulkhaery Newbie

    Joined:
    Apr 24, 2011
    Messages:
    30
    Likes Received:
    1
    Location:
    Jakarta
    tks infonya
     
  19. Uya Jelek

    Uya Jelek Super Hero

    Joined:
    Jul 28, 2009
    Messages:
    847
    Likes Received:
    51
    Location:
    Tanah Grogot, Kaltim
    Ninggalin anu dulu di sini, biar ntar kalau mau anu-anu gampang di anuin :D
     
  20. Maestro Cellular

    Maestro Cellular Banned

    Joined:
    Mar 29, 2012
    Messages:
    653
    Likes Received:
    12
    Location:
    Ads-id.com
    biar anuny bs ke save bijimane gan? klo bs pake referer yg ke index google dong gan biar tambah oke anunya..
     

Share This Page