Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: Сети > Клиент для Мамба.ру

Автор: Cornelius 13.12.2010, 23:32

друзья,

я не совсем начинающий, писал базы данных... хочу попробовать написать клиента для мамба.ру...

не подскажите с чего начинать...

заранее благодарен...

Автор: casinosoftguru 14.12.2010, 17:22

можно вот отсюда http://parsing-and-i.blogspot.com/2009/06/twebbrowser-oleobject.html
еще вот отсюда http://pblog.ru/?p=420
лучше конечно сразу большие соц сети брать там и апи есть и описание для делфи (всеми любимый вконтакте), перспектив там явно больше..

Автор: Cornelius 20.12.2010, 03:02

спасибо за совет... вроде просмотрел кое что... но при авторизации появляется проблема... "Внутренняя ошибка сервера"... с чем это может быть связано? Код следующий.

Код


try
    Data := TStringList.Create;
    Data.Add('login=' + UserNameEdit.Text);
    Data.Add('password=' + PasswordEdit.Text);

    Memo.Lines.Text := IdHttp.Post(LoginEdit.Text, Data);
finally
    Data.Free;
end;

Автор: Mifody 21.12.2010, 20:49

Цитата

вроде просмотрел кое что

Ну, похоже Вы действительно посмотрели "кое что" smile

.
1. обращение браузера приручной авторизации снифили?
2. обращение Вашей программы снифили?
3. результаты пп. 1 и 2 сравнивали?

это на вскидку

"LoginEdit.Text" - нет, ну конечно URL хороший, но как-то не информативный smile

Автор: Mach3 5.1.2011, 18:03

попробуй так..

Код



Data.Add('clickUrl=http://mamba.ru/tips/?tip=Login');                     
Data.Add('target=');                                                               
Data.Add('login_captcha=');                                                         
Data.Add('login='+UserNameEdit.Text );                                             
Data.Add('password='+PasswordEdit.Text);                                   
Data.Add('VAnketaId=0');                                                     
Data.Add('RedirectBack=/index.phtml');                     

Memo.Lines.Text := IdHttp.Post('http://mamba.ru/ajax/login.phtml?XForm=Login', Data);

HTTPAnalyzer в помощь.. //снифер

Автор: AMDG 2.2.2011, 14:10

Цитата(Mach3 @ 5.1.2011, 18:03)

попробуй так..

Код



Data.Add('clickUrl=http://mamba.ru/tips/?tip=Login');                     
Data.Add('target=');                                                               
Data.Add('login_captcha=');                                                         
Data.Add('login='+UserNameEdit.Text );                                             
Data.Add('password='+PasswordEdit.Text);                                   
Data.Add('VAnketaId=0');                                                     
Data.Add('RedirectBack=/index.phtml');                     

Memo.Lines.Text := IdHttp.Post('http://mamba.ru/ajax/login.phtml?XForm=Login', Data);

HTTPAnalyzer в помощь.. //снифер

после строки с логином необходимо еще добавить эту
Data.Add('domain='+'mail.ru'); // в домене mail.ru

P.S. проверял работу на сайте love.mail.ru

Автор: mr_smit 2.2.2011, 15:18

Есть хороший сниффер для Mozilla. Называется Tamper Data. Позволяет смотреть что отсылает страница и что получает. Из Делфи надо просто отправить то же самое, те же самые параметры.