HOME    FORUMS    MEMBERS    RECENT POSTS    LOG IN  
Баннер 1   Баннер 2

ANTICHAT — форум по информационной безопасности, OSINT и технологиям

ANTICHAT — русскоязычное сообщество по безопасности, OSINT и программированию. Форум ранее работал на доменах antichat.ru, antichat.com и antichat.club, и теперь снова доступен на новом адресе — forum.antichat.xyz.
Форум восстановлен и продолжает развитие: доступны архивные темы, добавляются новые обсуждения и материалы.
⚠️ Старые аккаунты восстановить невозможно — необходимо зарегистрироваться заново.
Вернуться   Форум АНТИЧАТ > SЕО/Финансовые задачи/Социальные сети > SЕО - тонкости, методы раскрутки > Черные методы раскрутки
Перезагрузить страницу Выжмем немного трафа с vkontakte
   
 
Страница 3 из 4 < 1 2 3 4 >
 
Опции темы Поиск в этой теме Опции просмотра

  #21  
Старый 03.01.2009, 00:51
code_one
Новичок
Регистрация: 29.12.2008
Сообщений: 3
Провел на форуме:
23474

Репутация: 0
По умолчанию
При запуске логинится нормально потом пишет:
Use of unitialized valie $m in concatenaation (.) or string at c:\stript.pl line 58.
.error
 

  #22  
Старый 03.01.2009, 01:22
[dei]
Участник форума
Регистрация: 24.11.2008
Сообщений: 205
Провел на форуме:
1123418

Репутация: 362
Отправить сообщение для [dei] с помощью ICQ
По умолчанию
Только что запускал все пашет, это у тя чето с аком может быть
 

  #23  
Старый 03.01.2009, 02:08
code_one
Новичок
Регистрация: 29.12.2008
Сообщений: 3
Провел на форуме:
23474

Репутация: 0
По умолчанию
Врятли, пробовал с нескольких, одна и таже ошибка.
 

  #24  
Старый 05.01.2009, 03:13
>.:!FrE!:.<
Участник форума
Регистрация: 19.07.2008
Сообщений: 168
Провел на форуме:
1312476

Репутация: 85
Отправить сообщение для >.:!FrE!:.< с помощью ICQ
По умолчанию
Цитата:
Сообщение от code_one  
При запуске логинится нормально потом пишет:
Use of unitialized valie $m in concatenaation (.) or string at c:\stript.pl line 58.
.error
Тоже самое...
 

  #25  
Старый 07.01.2009, 03:38
>.:!FrE!:.<
Участник форума
Регистрация: 19.07.2008
Сообщений: 168
Провел на форуме:
1312476

Репутация: 85
Отправить сообщение для >.:!FrE!:.< с помощью ICQ
По умолчанию
Вот нашол другой скрипт и тоже на перле

PHP код:
#!/usr/bin/perl

use warnings;
use strict;
use IO::Socket;

$|=1;

# конфиг ###########################

my ($email, $pass) = ('e-mail', 'pass'); # логин/пасс

my $sex   = 2; # ПОЛ. 0 - любой, 1 - женский, 2 - мужской
my $years = 0; # ВОЗРАСТ. 0 - до 18-ти, 1 - 18-26, 2 - от 27-ми

my $num = 20000;  # сколько человек пригласить

#####################################

my ($answer, $stop) = (undef, 0);

my $socket = IO::Socket::INET->new('vkontakte.ru:80') || die "\nCan't Connect To Vkontakte.ru\n";

my $content = "email=$email&pass=$pass";

print $socket "POST /login.php HTTP/1.1\r\n"
              ."Host: vkontakte.ru\r\n"
              ."User-Agent: Mozilla/5.0 (Windows; U; Windows NT 5.1; ru; rv:1.8.1.20) Gecko/20081217 Firefox/2.0.0.20\r\n"
              ."Referer: http://vkontakte.ru/\r\n"
              ."Cookie: remixlang=0; remixchk=5\r\n"
              ."Connection: close\r\n"
              ."Content-Type: application/x-www-form-urlencoded\r\n"
              ."Content-Length: ". length ($content) ."\r\n\r\n"
              .$content;
              
              {
                local $/ = undef;
                $answer = <$socket>;
                close $socket
                
              }
              
              my @data = $answer =~ /remixmid=(\d+)
                                     .*
                                     remixpass=([a-f0-9]{32})
                                     .*
                                     remixsid=([a-f0-9]{56})/xs;


if (scalar @data == 3) {&log("[+] GET DATA FROM $email\n")} else {&log("[-] CAN'T GET DATA FROM $email\n"); exit }


while ($num > $stop) {


$socket = IO::Socket::INET->new('vkontakte.ru:80') || die "\nCan't Connect To Vkontakte.ru\n";

$content = "act=a_search&st=0&c=0&s=$sex&y=$years&id=0";

print $socket "POST /matches.php HTTP/1.1\r\n"
             ."Host: vkontakte.ru\r\n"
             ."User-Agent: Mozilla/5.0 (Windows; U; Windows NT 5.1; ru; rv:1.8.1.20) Gecko/20081217 Firefox/2.0.0.20\r\n"
             ."Content-Type: application/x-www-form-urlencoded\r\n"
             ."Connection: close\r\n"
             ."X-Requested-With: XMLHttpRequest\r\n"
             ."Referer: http://vkontakte.ru/matches.php?act=search\r\n"
             ."Cookie: remixlang=0; remixchk=5; remixmid=$data[0]; remixemail=$email; remixpass=$data[1]; remixsid=$data[2]\r\n"
             ."Pragma: no-cache\r\n"
             ."Content-Length: ". length ($content) ."\r\n\r\n"
             .$content;
             
              {
                local $/ = undef;
                $answer = <$socket>;
                close $socket
                
              }

my ($id) = $answer =~ m{href='id(\d+)'>};

next if !defined $id;

$content = "act=a_search&st=0&c=0&s=$sex&y=$years&id=$id";

$socket = IO::Socket::INET->new('vkontakte.ru:80') || die "\nCan't Connect To Vkontakte.ru\n";

print $socket "POST /matches.php HTTP/1.1\r\n"
             ."Host: vkontakte.ru\r\n"
             ."User-Agent: Mozilla/5.0 (Windows; U; Windows NT 5.1; ru; rv:1.8.1.20) Gecko/20081217 Firefox/2.0.0.20\r\n"
             ."Content-Type: application/x-www-form-urlencoded\r\n"
             ."Connection: close\r\n"
             ."X-Requested-With: XMLHttpRequest\r\n"
             ."Referer: http://vkontakte.ru/matches.php?act=search\r\n"
             ."Cookie: remixlang=0; remixchk=5; remixmid=$data[0]; remixemail=$email; remixpass=$data[1]; remixsid=$data[2]\r\n"
             ."Pragma: no-cache\r\n"
             ."Content-Length: ". length ($content) ."\r\n\r\n"
             .$content;

              {
                local $/ = undef;
                $answer = <$socket>;
                close $socket
                
              }
              
              if ($answer =~ m{200 OK}) {&log("[+] INVITE $id\n")} else {&log("[-] CAN'T INVITE $id\n")}

$stop++;
sleep 3;

}


sub log {
    open LOG, '>>', 'log.txt';
    print LOG $_[0];
    print $_[0];
    close LOG;    
} 
Работает на ура
 

  #26  
Старый 07.01.2009, 03:50
Carnivore.Sys
Постоянный
Регистрация: 12.07.2008
Сообщений: 447
Провел на форуме:
1583463

Репутация: 308
По умолчанию
Этот контакт уже высушен и вы... скоко можно )))
 

  #27  
Старый 11.01.2009, 18:24
PiTeRoff
Участник форума
Регистрация: 11.12.2008
Сообщений: 185
Провел на форуме:
2076932

Репутация: 126
Отправить сообщение для PiTeRoff с помощью ICQ
По умолчанию
Цитата:
Сообщение от Carnivore.Sys  
Этот контакт уже высушен и вы... скоко можно )))
Не соглашусь.Еще не "высушен".
 

  #28  
Старый 12.01.2009, 14:09
focusnik
Новичок
Регистрация: 07.01.2009
Сообщений: 14
Провел на форуме:
32254

Репутация: 0
По умолчанию
Всем привет! У меня скрипт неработает. В логе выдает ошибку: CAN'T GET DATA FROM «мыло для логина» В чем может быть дело?
 

  #29  
Старый 14.01.2009, 23:51
*DeViL*
Участник форума
Регистрация: 27.11.2007
Сообщений: 282
Провел на форуме:
1435337

Репутация: 109
Отправить сообщение для *DeViL* с помощью ICQ
По умолчанию
Цитата:
Сообщение от focusnik  
Всем привет! У меня скрипт неработает. В логе выдает ошибку: CAN'T GET DATA FROM «мыло для логина» В чем может быть дело?
то же самое..
 

  #30  
Старый 01.04.2009, 10:15
ICQ Hool
Участник форума
Регистрация: 31.03.2008
Сообщений: 143
Провел на форуме:
403124

Репутация: 95
По умолчанию
тема неактуальна, ввели капчу на предложения
 
 
Страница 3 из 4 < 1 2 3 4 >



« Предыдущая тема | Следующая тема »


Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
 


Быстрый переход




ANTICHAT.XYZ