Добро пожаловать! Это — архивная версия форумов на «Хакер.Ru». Она работает в режиме read-only.
 
журналы новости статьи video форум подписка на «Хакер»

автроризация на сайте(Delphi)

Пользователи, просматривающие топик: none

Зашли как: Guest
Все форумы >> [Компилируемые языки] >> автроризация на сайте(Delphi)
Имя
Сообщение << Старые топики   Новые топики >>
автроризация на сайте(Delphi) - 2009-12-09 18:03:56.763333   
nub Nik

Сообщений: 263
Оценки: 0
Присоединился: 2009-11-18 10:53:00.250000
 Народ подскажите как сделать так что бы при авторизации на сайте, через Delphi, в WebBrowser1 появлялась уже авторизированная страница?
для автроизации использую этот код:

procedure TForm5.btn1Click(Sender: TObject); var params,responseres:tstringlist; begin params:=TStringList.Create; responseres:=TStringList.Create; try params.Add('Login=programmers'); params.Add('Domain=mail.ru'); params.Add('Password=1234'); responseres.Text:=http1.Post('http://win.mail.ru/cgi-bin/auth',params); if Pos('logout',responseres.Text)&gt;0 then ShowMessage('Авторизовались!'); finally params.free; responseres.free; end; end;
Post #: 1
RE: автроризация на сайте(Delphi) - 2009-12-09 18:09:32.526666   
FriLL

Сообщений: 2539
Оценки: 335
Присоединился: 2007-08-11 17:14:26.703333
 Некогда делал подобное но через компонент IdHTTP
Post #: 2
RE: автроризация на сайте(Delphi) - 2009-12-09 18:15:32.116666   
Smelo

Сообщений: 119
Оценки: 0
Присоединился: 2009-09-27 15:48:37.386666
quote:

появлялась уже авторизированная страница?

SID в куке или через GET отправляй
Post #: 3
RE: автроризация на сайте(Delphi) - 2009-12-09 18:16:45.066666   
nub Nik

Сообщений: 263
Оценки: 0
Присоединился: 2009-11-18 10:53:00.250000
 FriLL авторизация и так через IdHTTP )))
Post #: 4
RE: автроризация на сайте(Delphi) - 2009-12-09 18:31:45.400000   
FriLL

Сообщений: 2539
Оценки: 335
Присоединился: 2007-08-11 17:14:26.703333
quote:

ORIGINAL: Smelo

quote:

появлялась уже авторизированная страница?

SID в куке или через GET отправляй

как его отправить если он еще не аторизирован
Post #: 5
RE: автроризация на сайте(Delphi) - 2009-12-09 18:38:53.453333   
Smelo

Сообщений: 119
Оценки: 0
Присоединился: 2009-09-27 15:48:37.386666
quote:

if Pos('logout',responseres.Text)&gt;0 then
ShowMessage('Авторизовались!');
finally
Post #: 6
Страниц:  [1]
Все форумы >> [Компилируемые языки] >> автроризация на сайте(Delphi)







Связаться:
Вопросы по сайту / xakep@glc.ru

Предупреждение: использование полученных знаний в противозаконных целях преследуется по закону.