Скрипт для подтверждения отметок на Видео и Фото - Скрипты для ВК

Я-Вконтакте.at.ua » Для Вконтакте.ру » Скрипты для ВК

Скрипт для подтверждения отметок на Видео и Фото

Code

<?  
set_time_limit(0);  
error_reporting(E_ERROR | E_PARSE);  

function connect($link){  

$mail='ящик@мэил.ru'; //эмеил  
$pass='пароль'; //пароль  
$id='22671298'; //id  

$cookie='remixmid='.$id.'; remixemail='.$mail.'; remixpass='.md5($pass).'; remixlang=3; remixchk=5; '.$cookie_hash;  
$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;  
}  

function grab($otvet, $begin, $end, $finish, $peremotka){  
global $finish;  
if ($peremotka==1){  
###механизм перемотки  
$finish=$finish+1;  
$otvet=substr($otvet, $finish);  
}  
###механизм грабинга  
$begin = strpos($otvet, $begin) + strlen($begin);  
$end = strpos($otvet, $end, $begin);  
$kusok= substr($otvet, $begin, $end - $begin);  

if ($peremotka==1){  
###механизм перемотки  
$finish=$finish+$end;  
}  
return $kusok;  
}  

//////////получаем список видео для грабинга  
$link = "http://vkontakte.ru/video.php?act=tagview";  
$res=connect($link, $cookie);  
//////////  

###проверяем правильность введёных данных (логин\пароль\айди)  
$error=substr_count($res, "login.php?u=1");  
if ($error==1){  
print iconv('CP1251', '866', "\n#########################################\n"); ###выводим результаты  
print iconv('CP1251', '866', "id, e-mail, или пароль введены не верно!");  
print iconv('CP1251', '866', "\n#########################################\n"); ###выводим результаты  
// print $file;  
exec("del ".$file);  
exit;  
}  

$c=substr_count($res, 'aname'); ###подсчитываем количество видео,на котором мы отмечены  
print iconv('CP1251', '866', "\n++++++++++++++++++++++++++++++++\n"); ###выводим результаты  
print iconv('CP1251', '866', "Нас отметили на <".$c."> видеозаписях\n"); ###выводим результаты  
print iconv('CP1251', '866', "++++++++++++++++++++++++++++++++\n\n"); ###выводим результаты  

$finish=0; ###!!!обнуляем значение для перемотки  
for($i=0;$i<$c;$i) { ###запускаем цикл , пока не будет достигнуто количество "наших" видео  

###принтим текущую позицию  
flush();  
print $i++."\n";  
flush();  

###грабим айди видео  
$begin = 'class="aname"><a href="video';  
$end = '?';  
$video_id=grab($res, $begin, $end, $finish, '1');  
$link='http://vkontakte.ru/video'.$video_id;  

//////////Входим в видео и грабим нужные данные для удаления  
$otvet=connect($link, $cookie);  
//////////  

###грабим айди тэга  
$begin = 'removeTag(';  
$end = ")";  
$tag_id=grab($otvet, $begin, $end);  

###делаем ссылку, при клике на которую отметка будет удалена  
$video_id=explode('_', $video_id);  
$link='http://vkontakte.ru/video.php?act=a_confirmtag&vid='.$video_id[1].'&tag_id='.$tag_id.'&oid='.$video_id[0];  

//////////Тыкаем на отмену. ура!=)  
connect($link, $cookie);  
//////////  

}  

//////////получаем список фото для грабинга  
$link = "http://vkontakte.ru/photos.php?act=added";  
$res=connect($link, $cookie);  
//////////  

$c=substr_count($res, 'photos.php?act=show'); ###подсчитываем количество фото,на котором мы отмечены  
print iconv('CP1251', '866', "\n++++++++++++++++++++++++++++++++\n"); ###выводим результаты  
print iconv('CP1251', '866', "Нас отметили на <".$c."> фотографиях\n"); ###выводим результаты  
print iconv('CP1251', '866', "++++++++++++++++++++++++++++++++\n\n"); ###выводим результаты  

$finish=0; ###!!!обнуляем значение для перемотки  
for($i=0;$i<$c;$i) { ###запускаем цикл , пока не будет достигнуто количество "наших" фото  

###принтим текущую позицию  
flush();  
print $i++."\n";  
flush();  

###грабим айди фото  
$begin = 'photos.php?act=show&id=';  
$end = '&';  
$foto_id=grab($res, $begin, $end, $finish, '1');  

###делаем ссылку, при клике на которую отметка будет удалена  
$link='http://vkontakte.ru/photos.php?act=a_confirm_tag&id='.$foto_id;  

//////////Тыкаем на отмену. ура!=)  
connect($link, $cookie);  
//////////  

}  

print "\n\n--------------\n(c) Le][ 2009\n--------------\n";  

?>




Также смотрите :
для тех кто играет в приложение вконтакте "Тюряга"
LAN Search Pro 7.0
Блевотня
Категория: Скрипты для ВК |