Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2008.11.30;
Скачать: CL | DM;

Вниз

http get post   Найти похожие ветки 

 
Аврам   (2008-10-21 22:14) [0]

пытаюсь пройти авторизацию и получить код страницы.
var
 i:integer;
 s:string;
begin
   lData := TStringList.Create;
   http := TIdHTTP.Create(nil);
   HTTP.HandleRedirects := True;
   HTTP.ProtocolVersion := pv1_0;
   HTTP.ProtocolVersion := pv1_0;
   HTTP.Request.BasicAuthentication := True;

         lData.Clear;
         try
           for i:=0 to Memo2.Lines.Count - 1 do
           begin
             lData.Add(memo2.Lines.Strings[i]);
           end;
           HTTP.ProxyParams.ProxyServer := "127.0.0.1";
           HTTP.ProxyParams.ProxyPort := 8888;
           try
           HTTP.Post("site", lData);//
           s := http.Get("site");
           except
           end;
           memo1.Lines.Add(s);
         finally
         end;
    ldata.free;


в мемо2:
email=mocia@mail.ru
pass=timatima

кнопка вход имеет ссылку на javascript:document.login.submit()
как послать submit?


 
DVM ©   (2008-10-21 22:19) [1]


> кнопка вход имеет ссылку на javascript:document.login.submit()
> как послать submit?

посмотреть URL в функции submit()


 
Аврам   (2008-10-21 23:05) [2]

не нашел функцию



Страницы: 1 вся ветка

Текущий архив: 2008.11.30;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.009 c
8-1188292828
dr_craigan
2007-08-28 13:20
2008.11.30
PNG


2-1224490514
real K.
2008-10-20 12:15
2008.11.30
1С + DELPHI


9-1175692825
Ford
2007-04-04 17:20
2008.11.30
Электронные книги по созданию игр.


2-1224221423
Sergey2
2008-10-17 09:30
2008.11.30
Прокрутка гиф-анимации в отдельном потоке при выполнении задачи


11-1196036263
Донской
2007-11-26 03:17
2008.11.30
BeginThread