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

Тема в разделе "Социальные сети", создана пользователем felix90, 23 апр 2009.

Статус темы:
Закрыта.
Модераторы: arman29
  1. felix90

    felix90 Постоялец

    Регистр.:
    16 июл 2007
    Сообщения:
    109
    Симпатии:
    20
    Выкладываю скрипт для массового удаления отметок с видео и фото. Зачем это нужно? Ну знаю как вас, но меня добавляют во все картинки все, кому не лень и очень не хочется сидеть и удалять отметки. Темболее у меня интернет по трафику. Вот скрипт для всех этих нужд.

    <?
    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=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(c) Le][ 2009\n--------------\n";

    ?>

    P.S. Скрипт писал не я!
     
    slboiko нравится это.
  2. Kane

    Kane

    Регистр.:
    12 окт 2007
    Сообщения:
    155
    Симпатии:
    143
    Также есть специальная программа и скрипт, позволяющие удалять все фото и\или видео.

    Программа:

    VKAntiOtmetki
    Программа для массового удаления или принятия фотографий и видео, на котором вас отметили.

    Создана для тех, кому лень удалять всё вручную.
    _http://vksoft.ucoz.ru/load/0-0-0-7-20


    Скрипт для удаления с фото:
    _http://ckontakta.ru/uploads/files/script.vkontakte.foto.rar
     
Статус темы:
Закрыта.