Форум АНТИЧАТ

Форум АНТИЧАТ (https://forum.antichat.xyz/index.php)
-   Социальные сети (https://forum.antichat.xyz/forumdisplay.php?f=133)
-   -   Поздравляем друзей с Новым Годом! :) (https://forum.antichat.xyz/showthread.php?t=166781)

pavl1k_fan@mail.ru 28.12.2009 22:45

Поздравляем друзей с Новым Годом! :)
 
Скрипт (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]    /*/

?>


Masters 29.12.2009 00:19

Какой бесплатный холст работает с php? или как иначе запустить это?)))

.Life 29.12.2009 00:26

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

pavl1k_fan@mail.ru 29.12.2009 16:33

Masters
Скачай Денвер и модули (http://www.denwer.ru/packages/php5.html)
Там всё написано как устанавливать )

.Life 29.12.2009 16:53

Цитата:

Сообщение от pavl1k_fan@mail.ru
Masters
Скачай Денвер и модули (http://www.denwer.ru/packages/php5.html)
Там всё написано как устанавливать )

А я разве не то написал?

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

pavl1k_fan@mail.ru 29.12.2009 18:26

.Life
То, я уточнил про php5, в данном случае без этих модулей скрипт работать не будет.

NoVinKa 29.12.2009 21:11

Невероятно вовремя! Спасибки! Подарю тебе рандомный подарок 31го числа! (:

ToR.4.ok 29.12.2009 21:59

спасибо) автор от меня получил подарочек)

winlogon.exe 30.12.2009 08:03

А как то можно чтобы отправилось только тем кто в папке "друзья" ?

mrTUZ 30.12.2009 10:29

мастерс, локал хост никто не отменял, если что.

Genrix-v.i.p 30.12.2009 12:57

Люди подскажите с начала как это сделать не пойму просто, я скачал денвер , установил его, а что дальше делать не пойму

NoVinKa 30.12.2009 23:28

Про хостинг — он не нужен. И даже денвер. Всё проще.

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

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

CyberStorm 30.12.2009 23:44

qweqwe начинает захавывать мир? ;)

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

[spn] 31.12.2009 01:21

разве работает ?

nuBo 31.12.2009 02:19

если нету голосов выходить не работает? сорри за глупый вопрос но чего-то не догоняю малость О_о

djramil 31.12.2009 03:16

nuBo Есстественно нет)))

nuBo 31.12.2009 03:24

юпи юпи... тогда в чем смысл скрипта ?:)

NoVinKa 31.12.2009 10:23

В автоматизации рутинных действий.
Скрипт работает, разослал около сотни подарков за пару минут.

pavl1k_fan@mail.ru 02.01.2010 23:11

Скрипт ещё актуален, например, для поздравления с 23февраля/8марта и т.д. :)


Время: 20:29