Текущий архив: 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.022 c