ANTICHAT.XYZ    VIDEO.ANTICHAT.XYZ    НОВЫЕ СООБЩЕНИЯ    ФОРУМ  
Баннер 1   Баннер 2

ANTICHAT — форум по информационной безопасности, OSINT и технологиям

ANTICHAT — русскоязычное сообщество по безопасности, OSINT и программированию. Форум ранее работал на доменах antichat.ru, antichat.com и antichat.club, и теперь снова доступен на новом адресе — forum.antichat.xyz.
Форум восстановлен и продолжает развитие: доступны архивные темы, добавляются новые обсуждения и материалы.
⚠️ Старые аккаунты восстановить невозможно — необходимо зарегистрироваться заново.
Вернуться   Форум АНТИЧАТ > Программирование > С/С++, C#, Delphi, .NET, Asm
Перезагрузить страницу Антикапча C++ Builder
   
Ответ
 
Опции темы Поиск в этой теме Опции просмотра

Антикапча C++ Builder
  #1  
Старый 28.04.2010, 13:27
Zuldrak
Познающий
Регистрация: 15.01.2010
Сообщений: 64
Провел на форуме:
215151

Репутация: 5
По умолчанию Антикапча C++ Builder
Может кто нить будь дать простой пример работы с AC в билдере,

Тупо отправка капчи - Ожидание - Прием

Спасибо

Желательно пример с Id Http а не на сокетах

Компилятор желательно C++ Builder 6 или 9
Последний раз редактировалось Zuldrak; 28.04.2010 в 13:29..
 
Ответить с цитированием

  #2  
Старый 29.04.2010, 12:58
M_script_
Постоянный
Регистрация: 29.10.2008
Сообщений: 306
Провел на форуме:
1819761

Репутация: 180
Отправить сообщение для M_script_ с помощью ICQ
По умолчанию
PHP код:
//---------------------------------------------------------------------------
String CheckCaptcha(String filename, String apikey, bool is_phrase, bool is_regsense, bool is_numeric, int min_len, int max_len)
{
    String sFtype = "image/pjpeg";
    String sTmpstr = "";
    String sCaptcha_id = "";
    TIdMultiPartFormDataStream *multi = new TIdMultiPartFormDataStream;
    TIdHTTP *http = new TIdHTTP(0);
    multi->AddFormField("method", "post");
    multi->AddFormField("soft_id", "5");    
    multi->AddFormField("key", apikey);
    multi->AddFile("file", filename, sFtype);
    if(is_phrase)
        multi->AddFormField("phrase", "1");
    if(is_regsense)
        multi->AddFormField("regsense", "1");
    if(is_numeric)
        multi->AddFormField("numeric", "1");
    if(min_len)
        multi->AddFormField("min_len", IntToStr(min_len));
    if(max_len)
        multi->AddFormField("max_len", IntToStr(max_len));

    sTmpstr = http->Post("http://antigate.com/in.php", multi);

    if(sTmpstr.Pos("ERROR_"))
    {
        delete multi;
        delete http;
        return sTmpstr;
    }
    if(sTmpstr.Pos("OK"))
    {
        sCaptcha_id = sTmpstr.SubString(sTmpstr.Pos("|") + 1, sTmpstr.Length() - sTmpstr.Pos("|"));
    }
    if(sCaptcha_id == "")
    {
        delete multi;
        delete http;
        return "ERROR: bad captcha id!";
    }
    for(int i = 0; i < 12; i++)
    {
        Sleep(5000);

        sTmpstr = http->Get("http://antigate.com/res.php?key="+apikey+"&action=get&id="+sCaptcha_id);

        if(sTmpstr.Pos("ERROR_"))
        {
            delete multi;
            delete http;
            return sTmpstr;
        }
        if(sTmpstr.Pos("OK|"))
        {
            delete multi;
            delete http;
            return sTmpstr.SubString(sTmpstr.Pos("|") + 1, sTmpstr.Length() - sTmpstr.Pos("|"));
        }
    }
    delete multi;
    delete http;
    return "ERROR_TIMEOUT!";
}
//--------------------------------------------------------------------------- 
 
Ответить с цитированием
Ответ



« Предыдущая тема | Следующая тема »
Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Программа антикапча. Решит все проблемы с капчей в вконтакте и других соц. сетях. dima270 Покупка, продажа, услуги в Соц. Сетях 17 02.01.2010 16:53
Нужен hosts builder с поддержкой и последующей чисткой Mysterious Разное - Покупка, продажа, обмен 1 25.11.2009 23:03
Embarcadero: C++ Builder 2009 Kollinz С/С++, C#, Delphi, .NET, Asm 1 11.08.2009 11:27
[Статья] Создание расширения для Windows Explorer при помощи C++ Builder Dobby007 С/С++, C#, Delphi, .NET, Asm 2 29.03.2009 08:58



Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
 


Быстрый переход




ANTICHAT.XYZ