Witam.
Mam dwa problemy z INDY w Delphi 7.
Otóż potrzebuję wysłać dane logowania w dwóch formularzach, osobno.
-
Pierwszy formularz znajduje się na stronie z protokołem HTTPS. Proszę mi powiedzieć, co trzeba ustawić / dodać, aby formularz się wysyłał? Wyrzuca mi błędy, a wiem że na pewno trzeba coś dodać.
-
Drugi formularz znajduje się na stronie, która po zalogowaniu przekierowywuje i z tego powodu dostaję błąd 302. Co zrobić, aby INDY podążało za tym przekierowaniem i dopiero zwróciło wynik logowania?
Gdy formularze są bez HTTPS i bez przekierowywań to wszystko działa.
function PostIndy(data1, data2: string): string;
var
lHTTP: TIdHTTP;
lParamList: TStringList;
begin
lParamList := TStringList.Create;
lParamList.Add('login=' + data1);
lParamList.Add('password=' + data2);
lHTTP := TIdHTTP.Create(nil);
try
Result := lHTTP.Post('http://www.strona.pl/formularz.php', lParamList);
finally
lHTTP.Free;
lParamList.Free;
end;
end;