Скрипт рассылки приглашений в группу|личных сообщений для Vkontakte

Тема в разделе "Коммерческие", создана пользователем Oxana89, 30 июн 2008.

Информация :
Публиковать (для всех) нуленые версии, особенно от modulesgarden КАТЕГОРИЧЕСКИ не стоит. Тема мониторится оным разработчиком, а к нам приходят абузы которые нельзя игнорировать.
Статус темы:
Закрыта.
Модераторы: Amazko, Aste
  1. Oxana89

    Oxana89 Создатель

    Регистр.:
    12 июн 2008
    Сообщения:
    35
    Симпатии:
    29
    1. Ищу РАБОЧИЙ скрипт для рассылки приглашений в группу для всем известного Вконтакте. Если работает через прокси - вообще идеал. Найден.

    Stingers1, уже выкладывали
    Этот я позаимствовала с другого форума. Не знаю - код под хайд прячут? Но, на всякий случай: :)
    PHP:
    <? 
    #&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&& 
    #&   Vkontakte.ru group inviter 
    #&     By NNNS {icq: 474374} 
    #&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&& 

    error_reporting(0); 
    set_time_limit(0); 
    # Всякие переменные 
    $user_agent "Mozilla/5.0 (Windows; U; Windows NT 5.1; ru; rv:1.8.1.11) Gecko/20071127 Firefox/2.0.0.11"

    $begin intval($_POST['begin']); 
    $end intval($_POST['end']); 
    $gid intval($_POST['gid']); 
    $email strip_tags($_POST['email'], ""); 
    $pass strip_tags($_POST['pass'], ""); 

    if(
    $begin == '') {$begin "0";} 
    if(
    $end == '') {$end "0";} 
    if(
    $gid == '') {$gid "0";} 
    ?> 
    <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"> 
    <html xmlns="http://www.w3.org/1999/xhtml"> 
    <head> 
    <meta http-equiv="Content-Type" content="text/html; charset=windows-1251" /> 
    <title>ВКонтакте инвайтер (С) NNNS</title> 
    <style type="text/css"> 
    <!-- 
    .tablichko { 
    font-family: Arial, Helvetica, sans-serif; 
    background-color: #F7FCFD; 
    border-top-width: 1px; 
    border-bottom-width: 1px; 
    border-top-style: solid; 
    border-bottom-style: solid; 
    border-top-color: #E0F3F8; 
    border-bottom-color: #E0F3F8; 
    height: 100px; 

    .tit { 
    font-family: Georgia, "Times New Roman", Times, serif; 
    font-size: 24px; 
    color: #1C6679; 

    .comment { 
    font-family: Arial, Helvetica, sans-serif; 
    font-size: 10px; 
    color: #289AB7; 

    .inputko { 
    font-size: 12px; 
    color: #289AB7; 
    height: 16px; 
    text-align: center; 
    border-top-width: 1px; 
    border-left-width: 1px; 
    border-top-style: solid; 
    border-right-style: none; 
    border-bottom-style: solid; 
    border-left-style: solid; 
    border-top-color: #E0F3F8; 
    border-left-color: #E0F3F8; 
    border-bottom-width: 1px; 
    border-bottom-color: #E0F3F8; 

    .inputko:focus { 
    background-color: #E8F5F9; 

    .inputko2:focus { 
    background-color: #E8F5F9; 

    .inputko3:focus { 
    background-color: #FFF; 

    .buttoncheg { 
    color: #FFFFFF; 
    background-color: #1C6679; 
    border: 1px solid #E0F3F8; 
    height: 20px; 
    font-size: 12px; 
    width: 80px; 

    .inputko2 { 
    font-size: 12px; 
    color: #289AB7; 
    height: 16px; 
    text-align: center; 
    border-top-width: 1px; 
    border-top-style: solid; 
    border-right-style: solid; 
    border-bottom-style: solid; 
    border-left-style: none; 
    border-top-color: #E0F3F8; 
    border-bottom-width: 1px; 
    border-bottom-color: #E0F3F8; 
    border-right-width: 1px; 
    border-right-color: #E0F3F8; 

    .inputko3 { 
    font-size: 12px; 
    color: #289AB7; 
    height: 16px; 
    text-align: center; 
    width: 78px; 
    border-right-width: 1px; 
    border-bottom-width: 1px; 
    border-left-width: 1px; 
    border-top-style: none; 
    border-right-style: solid; 
    border-bottom-style: solid; 
    border-left-style: solid; 
    border-right-color: #E0F3F8; 
    border-bottom-color: #E0F3F8; 
    border-left-color: #E0F3F8; 
    background-color: #F7FCFD; 

    .vtab { 
    color: #48BAD7; 
    border-bottom-width: 1px; 
    border-bottom-style: solid; 
    border-bottom-color: #DFF3F9; 
    font-size: 12px; 
    font-family: Arial, Helvetica, sans-serif; 

    --> 
    </style> 
    </head> 
    <body> 
    <form method="post" action=""> 
    <table width="100%" border="0" cellpadding="0" cellspacing="0" class="tablichko"> 
    <tr> 
    <td align="center" valign="middle"><span class="tit">      ВКонтакте инвайтер<br /> 
    </span> 
    <table border="0" cellpadding="0" cellspacing="0"> 
    <tr> 
    <td colspan="2" align="center" valign="middle" bgcolor="#FDFFFF" class="comment">Диапазон пользователей (с/до) </td> 
    <td valign="top">&nbsp;</td> 
    <td width="100" align="center" valign="middle" bgcolor="#FDFFFF" class="comment">email  </td> 
    <td width="100" align="center" valign="middle" bgcolor="#FDFFFF" class="comment">пароль</td> 
    </tr> 
    <tr> 
    <td valign="top"><input name="begin" type="text" class="inputko" id="begin" value="<?=$begin;?>" /></td> 
    <td valign="top"><input name="end" type="text" class="inputko" id="end" value="<?=$end;?>" /></td> 
    <td valign="top"><input name="submit" type="submit" class="buttoncheg" id="submit" value="Пригласить" /></td> 
    <td width="100" valign="top"><input name="email" type="text" class="inputko2" id="email" value="<?=$email;?>" /></td> 
    <td width="100" valign="top"><input name="pass" type="text" class="inputko2" id="pass" value="<?=$pass;?>" /></td> 
    </tr> 
    <tr> 
    <td valign="top">&nbsp;</td> 
    <td align="right" valign="middle"><span class="comment">ID группы &gt;</span></td> 
    <td align="center" valign="middle" bgcolor="#FDFFFF" class="error"><input name="gid" type="text" class="inputko3" id="gid" value="<?=$gid;?>" /></td> 
    <td width="200" colspan="2" valign="middle">&nbsp;</td> 
    </tr> 
    </table></td> 
    </tr> 
    </table> 
    </form> 
    <br /> 
    <?php 
    if ($_POST['submit']) { 
    # Соединяемся с сервером ВКонтакте.ру 
    $fp=fsockopen("vkontakte.ru",80,$errno,$errstr,10); 
    if (!
    fp) {die();} 
    # Авторизуемся 
    $out "GET /login.php?email=".$email."&pass=".$pass." HTTP/1.0\r\n"
    $out .= "Host: vkontakte.ru\r\n"
    $out .= "User-Agent: ".$user_agent."\r\n"
    $out .= "Cookie: income=1\r\n"
    $out .= "Content-Type:text/xml; charset=windows-1251\r\n\r\n"
    fwrite($fp,$out); 
    $ans=''
    while(!
    feof($fp)) 

    $ans.=fgets($fp,128); 

    fclose($fp); 
    # вытаскиваем кукисы из ответа сервера 
    preg_match("/revalidate(.*?)Location/is"$ans$cookies); 
    $cookies str_replace("Set-Cookie: """,$cookies[1]); 
    preg_match("/remixchk(.*?);/is"$cookies$cook1); 
    preg_match("/remixmid(.*?);/is"$cookies$cook2); 
    preg_match("/remixemail(.*?);/is"$cookies$cook3); 
    preg_match("/remixpass(.*?);/is"$cookies$cook4); 
    $cook1 "remixchk=".$cook1[1]."; "
    $cook2 "remixmid=".$cook2[1]."; "
    $cook3 "remixemail=".$cook3[1]."; "
    $cook4 "remixpass=".$cook4[1]."; "
    $acook $cook1.$cook2.$cook3.$cook4
    $acook str_replace ("==""="$acook); 
    # Открываем новое соединение 
    for($i=$begin;$i<$end;$i++) { 
    $fp=fsockopen("vkontakte.ru",80,$errno,$errstr,10); 
    $out  "GET /groups.php?act=ajaxinv&gid=".$gid."&id=".$i." HTTP/1.0\r\n"
    $out .= "Host: vkontakte.ru\r\n"
    $out .= "User-Agent: ".$user_agent."\r\n"
    $out .= "Cookie: ".$acook."\r\n\r\n"
    fwrite($fp$out); 
    $ans=''
    while(!
    feof($fp)) 

    $ans.=fgets($fp,128); 

    # достаем результат 
    preg_match("/>(.*?)</is"$ans$result); 
    # Выводим его 
    echo "<center><table border=\"0\" cellpadding=\"0\" cellspacing=\"0\" class=\"vtab\"> 
    <tr> 
    <td width=\"70\" valign=\"middle\">"
    .$i."</td> 
    <td width=\"350\" valign=\"middle\">"
    .$result[1]."</td> 
    </tr> 
    </table><center>"

    ob_flush(); 
    flush(); 
    fclose($fp); 
    sleep(1); 


    ?> 

    </body> 
    </html>
    2. Или альтернативу - спамилку в личные сообщения пользователям.

    У кого есть?:)
     
  2. igloom

    igloom Создатель

    Регистр.:
    13 май 2007
    Сообщения:
    44
    Симпатии:
    16
    Скрипт рассылки по группам.


    #!/usr/bin/perl -w
    print "Content-Type: text/html\n\n";
    use warnings;
    use strict;
    use LWP::UserAgent;
    use HTTP::Cookies;

    my $gruplist = 'list.txt'; #файл с ссылками на группы
    my $message = 'Hello';
    my $mail = '';
    my $pass = '';

    open (F, '<'.$gruplist) || die 'Cant open grup list!';
    my @list = <F>;
    chomp @list;
    close F;

    my $ua = LWP::UserAgent->new(max_redirect => 0);
    my $cookies = HTTP::Cookies->new();
    $ua->cookie_jar($cookies);

    my $req = $ua->post('http://vkontakte.ru/login.php', { email => $mail, pass => $pass } )->status_line;
    die '[-] Bad password or login!' unless $req =~ /302 Found/;

    my $i=0;
    foreach my $target (@list) {
    $ua->max_size(undef);
    $req = $ua->get($target)->as_string;
    my ($wallhash) = $req =~ /[name="wall_hash" value="|wall_hash=]([a-f0-9]{32})/;
    my ($mid) = $req =~ /name="to_id" value="(g\d+)"/;
    print "[+] $wallhash $mid $target\n";
    $ua->max_size(0);
    $req = $ua->post('http://vkontakte.ru/wall.php?act=get10&wall_hash='.$wallhash.'&wpage=1 00000', [
    seed => $message.($i%2 == 1 ? ' ' : ''),
    fpage => 1,
    mid => $mid,
    n => 3 ]);
    #print $req->as_string;
    $i++;
    sleep 4
    }
     
  3. dima-aka-dims

    dima-aka-dims Создатель

    Регистр.:
    19 сен 2007
    Сообщения:
    23
    Симпатии:
    1
    Блин, долго искал такой, но че-то все, что не нахожу... плохо пашет =(( какие тут ограничения? и в чем плюсы?
     
  4. tigraz_kill

    tigraz_kill

    Регистр.:
    24 июн 2007
    Сообщения:
    579
    Симпатии:
    91
    первый вариант по ходу вообще не пашет только сча пробовал гонять. результат нулевой.
     
  5. timonnnn

    timonnnn

    Регистр.:
    22 май 2008
    Сообщения:
    164
    Симпатии:
    20
    Xt-то не разобрался как им пользоваться. Где запускать этот скрипт? Запускаю с хостинга, но ничего не получается
     
  6. Oxana89

    Oxana89 Создатель

    Регистр.:
    12 июн 2008
    Сообщения:
    35
    Симпатии:
    29
    пашет, пашет.:) усе пашет, если уж у меня, у нуба полного пашет, то у вас и подавно. у меня работает под денвером (портатив).:smmne: главное, помнить про ограничение в 40 челов с одного ака, и про то, чтоб не с одного айпи шел поток приглашений - забанят группу.
     
  7. method

    method

    Регистр.:
    8 июл 2007
    Сообщения:
    559
    Симпатии:
    134
    а как насчет скрипта личных сообщений ? Сообщений друзьям? Очень надо, набрутить те же аки вконтакте можно, есть бруты и приличные чекеры, вот наспамить незнаю чем
    вот нарыл кое какой инструкшн, помогит что то с него собрать
    http://forum.antichat.ru/showpost.php?p=757934&postcount=395
     
Статус темы:
Закрыта.