[spoiler] [/spoiler]
ИНТЕРНЕТ
Главная
Вход
Регистрация
Понедельник, 14.07.2025, 17:45Приветствую Вас Гость | RSS
(WMZ - доллар)
Меню сайта

Категории раздела
Музыка и аудио Вконтакте [0]
Секреты Вконтакте [0]
Видео Вконтакте [0]
Аватарки Вконтакте [0]
Стили Вконтакте [45]
Установка стилей [0]
Программки Вконтакте [0]
Разное интересное [0]
Скрипты [14]

Мини-чат

Опрос
Оцените мой сайт
Результаты | Архив опросов
Всего ответов: 45
Главная » Файлы » Скрипты
Скрипт для удаления отметок с Видео и Фото
[ Чтоб скачать фаил зарегистрируйтесь, или войдите под своим логином ] 10.06.2009, 22:19
Знакомая наверное ситуация---все кому не лень отмечают на своих видео,фотках, а потом приходится сидеть удалять весь этот хлам... 

Доработанная версия предыдущего скрипта (удаление отметок с видео)+добавлено удаление отметок с фоток+создал некое подобие интерфейса..) 
(написано на php+php_curl) 

скачать комплект (всё уже собрано,упаковано,разложено по полочкам и ждёт вашего запуска) happy

Надо будет ручками чуть-чуть поработать, подробности читайте в файле как настроить.txt 


Скачать 

Или разбитрайтесь сами 
 
 
 
 
   
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">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=adeletetag&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=show&id='.$foto_id; 

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

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

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

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

} 

print "\n\n--------------\n© Le][ 2009\n--------------\n"; 

?>

Категория: Скрипты | Добавил: Demon
Просмотров: 1585 | Загрузок: 262 | Комментарии: 2 | Рейтинг: 0.0/0 |
Всего комментариев: 0
Имя *:
Email *:
Код *:
Поиск

Статистика
Онлайн всего: 1
Гостей: 1
Пользователей: 0

Сайт не несёт ответственности за то, для каких целей будет использоваться весь представленный материал. Используя материал... Вы берёте на себя ответственность за все последствия! © 2025