Я-Вконтакте.at.ua » Для Вконтакте.ру » Скрипты для ВК |
Удаляем все группы
Code <? set_time_limit(0); error_reporting(E_ERROR | E_PARSE); $mail='ящик@мэил.ru'; //эмеил $pass='пароль'; //пароль $id='22671298'; //id $cookie='remixmid='.$id.'; remixemail='.$mail.'; remixpass='.md5($pass).';remixlang=3'; function connect($link, $cookie){ $ch = curl_init(); curl_setopt($ch, CURLOPT_URL,$link); curl_setopt($ch, CURLOPT_RETURNTRANSFER,1); curl_setopt($ch, CURLOPT_TIMEOUT, 0); curl_setopt($ch, CURLOPT_GET, 1); curl_setopt($ch, CURLOPT_HEADER, 1); // Результат будет содержать заголовки curl_setopt($ch, CURLOPT_COOKIE, $cookie); $otvet = curl_exec($ch); curl_close($ch); return $otvet; } //////////скачиваем список групп $link = 'http://vkontakte.ru/id'.$id; $res=connect($link, $cookie); ////////// $c=substr_count($res, "<a href='club"); ###подсчитываем количество групп for($i=0;$i<$c;$i++) { ###запускаем цикл , пока не будет достигнуто количество групп flush(); print $i."\n"; flush(); $end=$end+1; $res= substr($res, $end); $begin = "<a href='club"; $begin = strpos($res, $begin) + strlen($begin); $end = "'"; $end = strpos($res, $end, $begin); $qwe= substr($res, $begin, $end - $begin); if ($qwe=='6968868'){ $qwe=$qwe+1; } $link = "http://vkontakte.ru/groups_ajax.php?act=aleave&n=1&gid=".$qwe; // выходим из групп $otvet=connect($link, $cookie); } print '(c) Le]['; ?> | |