Thema: Delphi TidHTTP & SSL ?!

Einzelnen Beitrag anzeigen

skydiablo

Registriert seit: 15. Mär 2004
Ort: Wismar
17 Beiträge
 
#1

TidHTTP & SSL ?!

  Alt 15. Mär 2004, 13:37
hoi leutz... kennt sich hier jemand mit SSL aus ?!

geht darum das ich einen post" anweisung mit der TidHTTP (indy) kompo mache... also IOHandler habe ich "TIdSSLIOHandlerSocket" definiert... dort etwas mit den einstellungen gespielt aber alles was ich vom server zurück bekomme ist:

---------------------------
XXXXXXXXX
---------------------------
HTTP/1.1 302 Found
---------------------------
OK
---------------------------

kann mir jemand das sagen was das bedeuten soll ?1... oder muss ich vielleicht noch code für de komplette SSL verbindung erstellen ?!

wäre echt dankbar über jede hilfe !!!

Delphi-Quellcode:
var liste : tstringlist;
    resultstream : tmemorystream;
    IO : TIdSSLIOHandlerSocket;
begin
  try
    resultstream := tmemorystream.Create;
    liste := tstringlist.Create;
    HTTP := TidHTTP.Create(nil);
    IO := TIdSSLIOHandlerSocket.Create(nil);
    IO.SSLOptions.Method := sslvSSLv23;
    IO.SSLOptions.Mode := sslmUnassigned;
    HTTP.IOHandler := IO;
    ...
    try
      HTTP.Post('https://...',liste,resultstream);
    except
      on e : exception do
      begin
        showmessage(e.Message);
        resultstream.SaveToFile('c:\test.html'); //nur zum testen
        exit;
      end;
    end;
    resultstream.SaveToFile('c:\test.html'); //nur zum testen
    if resultTest(resultstream) then
    ...
  Mit Zitat antworten Zitat