Я-Вконтакте.at.ua » Для Вконтакте.ру » Скрипты для ВК |
Удаляем все сообщения на стене
Code <? set_time_limit(0); $mail='email@mail.ru'; $pass='qweqwe'; $id='22671298'; function go($link){ $ch = curl_init(); curl_setopt($ch, CURLOPT_URL,$link); curl_setopt($ch, CURLOPT_RETURNTRANSFER,1); curl_setopt($ch, CURLOPT_TIMEOUT, 1); curl_setopt($ch, CURLOPT_GET, 1); curl_setopt($ch, CURLOPT_HEADER, 1); $otvet = curl_exec($ch); curl_close($ch); return $otvet; } $otvet=go('login.userapi.com/auth?site=2&login=force&email='.$mail.'&pass='.$pass); $begin = 'sid='; $begin = strpos($otvet, $begin) + strlen($begin); $end = "\r"; $end = strpos($otvet, $end, $begin); $sid= substr($otvet, $begin, $end - $begin); $count=1; while($count!==0){ $otvet=go('http://userapi.com/data?&act=wall&from=0&to=200&id='.$id.'&sid='.$sid); $count=substr_count($otvet,']],['); $end=1; for ($i=0;$i<$count;$i++){ $otvet= substr($otvet, $end); $begin = ']],['; $begin = strpos($otvet, $begin) + strlen($begin); $end = ","; $end = strpos($otvet, $end, $begin); $post_id= substr($otvet, $begin, $end - $begin); go('http://userapi.com/data?&act=del_wall&id='.$id.'&wid='.$id.'_'.$post_id.'&sid='.$sid); print $i."\n"; } } ?> | |