HOME FORUMS MEMBERS RECENT POSTS LOG IN  
× Авторизация
Имя пользователя:
Пароль:
Нет аккаунта? Регистрация
Баннер 1   Баннер 2
НОВЫЕ ТОРГОВАЯ НОВОСТИ ЧАТ
loading...
Скрыть
Вернуться   ANTICHAT > ПРОГРАММИРОВАНИЕ > С/С++, C#, Rust, Swift, Go, Java, Perl, Ruby
   
 
 
Опции темы Поиск в этой теме Опции просмотра

Не проходит авторизация
  #1  
Старый 01.05.2010, 15:53
IgrikX
Познающий
Регистрация: 13.08.2009
Сообщений: 92
С нами: 8812922

Репутация: 1
По умолчанию Не проходит авторизация

PHP код:
TStringList *post_data = new TStringList;
TStringList *post_data_2 = new TStringList;
String mail Edit1->Text;
String pass Edit2->Text;
String otv;
String otv_2;
try{
post_data->Add("email="+mail+"&pass="+pass+"&expire=&vk=");
otv IdHTTP1->Post("http://login.vk.com/?act=login",post_data);
}
__finally{}
//-- регулярка hash
AnsiString exp_hash="(id='s' value='(.+?)')";
TRegExprhash= new TRegExpr;   // hash
hash->Expression=exp_hash;     // hash
    
if(hash->Exec(otv)){
    
Memo1->Text hash->Match[2];
    }else{
    
Memo1->Text "Error!";
    }

try{
post_data_2->Add("s="+hash->Match[2]);
otv_2 IdHTTP1->Post("http://vkontakte.ru/login.php?op=slogin",post_data_2);
}
__finally{}

//Memo1->Text = IdHTTP1->Response->Connection;
String Cooci;
    for(
int i 0;i<IdHTTP1->CookieManager->CookieCollection->Count;i++)
    {
    
Cooci Cooci IdHTTP1->CookieManager->CookieCollection->Items[i]->CookieText;
    }
Memo1->Text Cooci
что нужно сделать?, менеджер куки в IdHTTP1 прявязал.. hash на первом шаге получаю, на втором при передаче
 
Ответить с цитированием
 



Предыдущая тема Следующая тема
Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Обсуждение софта от M_script M_script_ Социальные сети 149 17.06.2010 20:51
Webmoney. Enum авторизация и файлы ключей. m0le[x] Платежные системы 4 12.01.2010 12:13
[Delphi] Авторизация ВКонтакте Kandi С/С++, C#, Rust, Swift, Go, Java, Perl, Ruby 24 26.12.2009 01:31
Авторизация nonamez PHP 9 07.06.2009 19:26
MAIL.ru авторизация на perl rdrule PHP 5 17.04.2009 20:31



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


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




ANTICHAT ™ © 2001- Antichat Kft.