Основан 26 Июля 2013 года
freehacks.ru fhacks.me fhacks.pw fhacksnplmzxaaoo.onion
HashFlare
Показано с 1 по 7 из 7
  1. #1
    TopicStarter


    Статус
    Offline
    Регистрация
    11.11.2013
    Сообщений
    84
    Репутация
    16 + / -
    Другое

    Авторизация в ВК

    Здраствуйте! Дорогие посетители нашего сайта! Сегодня мы узнаем "Как авторизоваться в ВК через DevelStudio" Приступим! Для начала включим PHP модуль "php_curl.dll".
    Добавим компоненты:
    SpeedButton - 2 шт.
    Поля для ввода (Edit) - 2 шт.
    Чекбокс (CheckBox) - 1 шт.
    Изображение (Image) - 1 шт.
    Наш фон будет вот этим!
    Дальше расположим компоненты как показано на рисунке:
    Для того чтобы сделать такие кнопки, очистим в свойствах "Button" текст, и добавим наши картинки для кнопок:
    После того как навели красоту приступим к самим функциям. Для SpeedButton OK добавим событие клик и вставим этот код:
    $user_agent = 'Opera/9.80 (Windows NT 5.1; U; MRA 5.10 (build 5231); ru) Presto/2.10.229 Version/11.61';
    $cookie = '';
    $login = c("edit1")->text;
    $password = c("edit2")->text;
    $ch = curl_init();
    curl_setopt($ch, CURLOPT_POST, true);
    curl_setopt($ch, CURLOPT_USERAGENT, $user_agent);
    curl_setopt($ch, CURLOPT_RETURNTRANSFER, 1);
    curl_setopt($ch, CURLOPT_TIMEOUT, 10);
    curl_setopt($ch, CURLOPT_FOLLOWLOCATION, true);
    curl_setopt($ch, CURLOPT_URL, 'http://login.vk.com/?act=login');
    $post = array(
    'act' => 'login',
    'q' => '',
    'al_frame' => '1',
    'expire' => '',
    'captcha_sid' => '',
    'captcha_key' => '',
    'from_host' => 'vkontakte.ru',
    'email' => $login,
    'pass' => $password
    );
    curl_setopt($ch, CURLOPT_POSTFIELDS, http_build_query($post));
    $answer = curl_exec($ch);
    $sid = substr($answer, strpos($answer, "setCookieEx('sid', '") + 20, 60);
    $cookie = 'remixsid=' . $sid;
    curl_setopt($ch, CURLOPT_POST, false);
    curl_setopt($ch, CURLOPT_COOKIE, $cookie);
    curl_setopt($ch, CURLOPT_URL, 'http://vkontakte.ru/');
    $answer = curl_exec($ch);
    c("memo1")->text = $answer;
    curl_close($ch);
    if (c("memo1")->text == 'False')
    echo 'authorization successful.';
    else
    echo 'authorization failed.';
    Для SpeedButton ОТМЕНА добавим событие КЛИК и вставим этот код:
    app::close();
    Для чекбокса добавим событие клик и вставим туда этот код:
    if(c("checkbox1")->checked) {
    $edit1 = c("edit1")->text;
    $edit2 = c("edit2")->text;
    ini:pen("ini.ini");
    ini::write("Text", "edit1", $edit1);
    ini::write("Text", "edit2", $edit2);
    }

  2. Пользователь сказал cпасибо:
  3. #2
    Аватар для sata-ata

    Статус
    Offline
    Регистрация
    29.10.2013
    Сообщений
    3,035
    Репутация
    282 + / -
    Программист
    только ХР и опера?
    $user_agent = 'Opera/9.80 (Windows NT 5.1; U; MRA 5.10 (build 5231); ru)
    8AC4F56356469F79B5283364053ACDA49D8EC9FEFDADC2B42F A5B4E979D9222267583F350BF9

    с/delphi/pascal/vbs/vbm/bat
    Ник зареган, суки! [Только зарегистрированные могут видеть это. ]

  4. #3
    TopicStarter
    Аватар для Th3Inferno

    Статус
    Offline
    Регистрация
    11.11.2013
    Сообщений
    84
    Репутация
    16 + / -
    Другое
    Цитата Сообщение от sata-ata Посмотреть сообщение
    только ХР и опера?
    да,только для xp и оперы

  5. #4
    Trust
    Админ негодует :3
    Аватар для admin

    Статус
    Offline
    Регистрация
    27.07.2013
    Сообщений
    1,448
    Репутация
    159 + / -
    Безопасность
    Можно любой юзер-агент
    [Только зарегистрированные могут видеть это. ]
    JID: [Только зарегистрированные могут видеть это. ] - пока не сижу там, только ЛС.

  6. #5
    Аватар для Next

    Статус
    Offline
    Регистрация
    26.10.2013
    Сообщений
    84
    Репутация
    22 + / -
    Другое
    Давай те если выкладывать то копирайт ставьте.
    И выкинь эту phpds...
    На делфи выложи че нибудь лучше

  7. #6
    Аватар для XaskiVision

    Статус
    Offline
    Регистрация
    17.12.2013
    Сообщений
    171
    Репутация
    57 + / -
    DDoS / DoS
    Либо я что-то не так делаю, либо код корявенький. При валидных данных - autorization failed. [phpds 2.0]

  8. #7
    Аватар для SyGaK

    Статус
    Offline
    Регистрация
    09.11.2013
    Сообщений
    144
    Репутация
    41 + / -
    Безопасность
    Цитата Сообщение от Next Посмотреть сообщение
    Давай те если выкладывать то копирайт ставьте.
    И выкинь эту phpds...
    На делфи выложи че нибудь лучше
    Уж лучше на питоне

Метки этой темы

Ваши права

  • Вы не можете создавать новые темы
  • Вы не можете отвечать в темах
  • Вы не можете прикреплять вложения
  • Вы не можете редактировать свои сообщения
  •  
Информация на сайте предоставлена исключительно в ознакомительных целях, использование знаний в противозаконных целях преследуется по закону! Администрация не несет ответственности за ваши деяния.