Скачать: 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 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.01 c