Поздравляем друзей с Новым Годом! :)

Discussion in 'Социальные сети' started by [email protected], 28 Dec 2009.

  1. pavl1k_fan@mail.ru

    [email protected] New Member

    Joined:
    3 Jul 2009
    Messages:
    0
    Likes Received:
    1
    Reputations:
    0
    Скрипт (php) рассылает указанным друзьям в ВК подарки..
    Подарок выбирается автоматически, из предложенных.. Возможность указывать подпись к подарку.

    PS
    От подарков не откажусь ;)

    PHP:
    <?php

    /*/          byPavl1k        /*/
    /*/       ICQ 396-613-887   /*/
    /*/        [id40270043]    /*/


    $mail '';
    $pass '';

    $text "C наступающим ^_^ \n byPavl1k"// текст подписи к падарку

    /* массив с id подарков, дарим рандомные подарки.. чтобы дарить всем одно и тоже, оставьте только один id */
    $gifts = array(
    '174'// "Новогодний" манул 
    '168'// олень с мешком
    '169'// бегемот
    '176'// тигр
    '37'// Ёлка 
    '34'// жопа зайца 
    '35'// снеговик
    );

    // тут вводим id друзей
    $friends = array(
    '40270043'// оставив эту строчку выразите мне благодарность)
    ''// id друга
    );

    function 
    connect($link$cookie=null){


            
    $ch curl_init();
            
    curl_setopt($chCURLOPT_URL,$link);
            
    curl_setopt($chCURLOPT_RETURNTRANSFER,1);
            
    curl_setopt($chCURLOPT_TIMEOUT0);
            
    curl_setopt($chCURLOPT_GET1);
               
    curl_setopt($chCURLOPT_HEADER1);
            if(
    $cookie !== nullcurl_setopt($chCURLOPT_COOKIE$cookie);
            
    curl_setopt($chCURLOPT_POST1);
            
    curl_setopt($chCURLOPT_POSTFIELDS$post);

            
    $otvet curl_exec($ch);
            
    curl_close($ch);
    return 
    $otvet;
    }
    function 
    auth($mail$pass) {

        
    $res connect("http://login.vk.com/?act=login&email=$mail&pass=$pass&vk=");

        if(
    substr_count($res"id='s'") !== 1) return 'error';
        
    $s grabb($res"id='s' value='""'");
        
    $res connect("http://vkontakte.ru/login.php?op=slogin&redirect=1&s=$s");
        
    $remixsid grabb($res'remixsid='' ');
        
    $cookie 'remixchk=5; remixsid='.$remixsid;
    return 
    $cookie;
    }
    function 
    grabb($str$start$end) {
            
    $start strpos($str$start) + strlen($start);
            
    $end strpos($str$end$start);
            
    $result substr($str$start$end $start);
            
    flush();
    return 
    $result;
    }

    echo 
    "\n\n\n*********************\n     (c) PaVl1k\n*********************\n\n\n";

    echo 
    "auth...";
    $cookie auth($mail$pass);
    if(
    $cookie == 'error') die(" ERROR!\n\n\n\n");
    echo 
    " OK! \n\n";

    $amount_friends count($friends);
    echo 
    "Amount friends: ".$amount_friends."\n\n";

    $text urlencode($text);

    for(
    $i=1$i<=$amount_friends$i++) {
        
    $id $friends[$i-1];
        echo 
    "Send to friend #$i [id".$friends[$i-1]."]... \n";
        
    $res connect("http://vkontakte.ru/gifts.php?to=".$friends[$i-1], $cookie);
        
    $hash grabb($res'name="hash" value="''"');
        echo 
    "  Grabb... hash = $hash\n";
        
    $gift $gifts[rand(0count($gifts)-1)];
        echo 
    "  Gift: $gift\n";
        
    $res connect("http://vkontakte.ru/gifts.php?act=do_send&giftNumber=".$gift."&hash=$hash&to_users=".$friends[$i-1]."&to_users_custom=&giftText=$text&giftType=0"$cookie);
        
    $locat grabb($res"Location: ""\n");
        
    $locat trim($locat);
        
    $res connect($locat$cookie);
        echo 
    "SENSED! ;) \n\n";
        
    sleep(1);
    }

    echo 
    "All gifts sensed! =) \n (c) Pavl1k 2009-2010 \n\n\n\n";

    /*/          byPavl1k        /*/
    /*/       ICQ 396-613-887   /*/
    /*/        [id40270043]    /*/

    ?>
     
  2. Masters

    Masters New Member

    Joined:
    31 Oct 2009
    Messages:
    4
    Likes Received:
    0
    Reputations:
    0
    Какой бесплатный холст работает с php? или как иначе запустить это?)))
     
  3. .Life

    .Life Banned

    Joined:
    26 Dec 2009
    Messages:
    81
    Likes Received:
    3
    Reputations:
    0
    Зачем хост?
    Вот http://www.denwer.ru/
    И хост уже ненужен будет...
     
  4. pavl1k_fan@mail.ru

    [email protected] New Member

    Joined:
    3 Jul 2009
    Messages:
    0
    Likes Received:
    1
    Reputations:
    0
    Masters
    Скачай Денвер и модули (http://www.denwer.ru/packages/php5.html)
    Там всё написано как устанавливать )
     
  5. .Life

    .Life Banned

    Joined:
    26 Dec 2009
    Messages:
    81
    Likes Received:
    3
    Reputations:
    0
    А я разве не то написал?

    Зачем хост?
    Вот http://www.denwer.ru/
    И хост уже ненужен будет...
     
  6. pavl1k_fan@mail.ru

    [email protected] New Member

    Joined:
    3 Jul 2009
    Messages:
    0
    Likes Received:
    1
    Reputations:
    0
    .Life
    То, я уточнил про php5, в данном случае без этих модулей скрипт работать не будет.
     
  7. NoVinKa

    NoVinKa New Member

    Joined:
    16 Dec 2009
    Messages:
    0
    Likes Received:
    0
    Reputations:
    0
    Невероятно вовремя! Спасибки! Подарю тебе рандомный подарок 31го числа! :)
     
    #7 NoVinKa, 29 Dec 2009
    Last edited: 29 Dec 2009
  8. ToR.4.ok

    ToR.4.ok Member

    Joined:
    14 Jun 2009
    Messages:
    0
    Likes Received:
    6
    Reputations:
    0
    спасибо) автор от меня получил подарочек)
     
  9. winlogon.exe

    winlogon.exe Active Member

    Joined:
    5 Jun 2009
    Messages:
    31
    Likes Received:
    129
    Reputations:
    13
    А как то можно чтобы отправилось только тем кто в папке "друзья" ?
     
  10. mrTUZ

    mrTUZ Active Member

    Joined:
    17 May 2008
    Messages:
    63
    Likes Received:
    155
    Reputations:
    5
    мастерс, локал хост никто не отменял, если что.
     
  11. Genrix-v.i.p

    Genrix-v.i.p New Member

    Joined:
    2 Aug 2009
    Messages:
    12
    Likes Received:
    1
    Reputations:
    0
    Люди подскажите с начала как это сделать не пойму просто, я скачал денвер , установил его, а что дальше делать не пойму
     
  12. NoVinKa

    NoVinKa New Member

    Joined:
    16 Dec 2009
    Messages:
    0
    Likes Received:
    0
    Reputations:
    0
    Про хостинг — он не нужен. И даже денвер. Всё проще.

    1. Качаешь php вот отсюда — http://ru2.php.net/get/php-5.2.12-Win32.zip/from/a/mirror.
    2. Распаковываешь zip в директорию, допустим C:\php
    3. Из папки C:\php\ext копируешь в C:\php файл php_curl.dll. Это поддержка CURL.
    4. Копируешь файл C:\php\php.ini-dist в C:\php\php.ini.
    5. Находишь строчку ;extension=php_curl.dll и убираешь впереди ;.
    6. Сохраняешь файл php.ini :)
    7. Запускаешь командную строку (Win+R » cmd), переходишь в C:\php (cd C:\php)
    8. Выполняешь C:\php\php.exe gifts.php

    Подарки уходят, друзья радуются, дуров зарабатывает. Счастье. С новым годом! :)
     
  13. CyberStorm

    CyberStorm Member

    Joined:
    25 Feb 2006
    Messages:
    4
    Likes Received:
    11
    Reputations:
    -4
    qweqwe начинает захавывать мир? ;)

    это я к тому, что появляется всё больше и больше выходцев из группы, которые начинают писать\делиться интересными штуками... :)
     
  14. [spn]

    [spn] New Member

    Joined:
    22 Dec 2009
    Messages:
    0
    Likes Received:
    0
    Reputations:
    0
    разве работает ?
     
  15. nuBo

    nuBo Elder - Старейшина

    Joined:
    29 Dec 2008
    Messages:
    53
    Likes Received:
    84
    Reputations:
    53
    если нету голосов выходить не работает? сорри за глупый вопрос но чего-то не догоняю малость О_о
     
  16. djramil

    djramil Member

    Joined:
    21 Apr 2009
    Messages:
    0
    Likes Received:
    9
    Reputations:
    0
    nuBo Есстественно нет)))
     
  17. nuBo

    nuBo Elder - Старейшина

    Joined:
    29 Dec 2008
    Messages:
    53
    Likes Received:
    84
    Reputations:
    53
    юпи юпи... тогда в чем смысл скрипта ?:)
     
  18. NoVinKa

    NoVinKa New Member

    Joined:
    16 Dec 2009
    Messages:
    0
    Likes Received:
    0
    Reputations:
    0
    В автоматизации рутинных действий.
    Скрипт работает, разослал около сотни подарков за пару минут.
     
  19. pavl1k_fan@mail.ru

    [email protected] New Member

    Joined:
    3 Jul 2009
    Messages:
    0
    Likes Received:
    1
    Reputations:
    0
    Скрипт ещё актуален, например, для поздравления с 23февраля/8марта и т.д. :)
     
    #19 [email protected], 2 Jan 2010
    Last edited: 3 Jan 2010
Loading...