Re: "Connection reset by peer" with TIdHTTP

procedure TPhase3Thread.Execute;

    .....

    vException := False;

    vTempFileName := GetTemporaryFileName('.html');

    if Pos('https://', vLink) = 0 then
      try
        FHTTP.DisconnectSocket;
        FResult.Text := FHTTP.Get(vLink);
      except
        on E: Exception do
        begin
          vException := True;
          vExceptionMessage := E.Message
        end
      end
    else
    begin
      DownloadFile(vLink, vTempFileName);
      FResult.LoadFromFile(vTempFileName);
    end;

    if vException then
    begin
      if Assigned(FOnLog) then
        FOnLog(Self, 'HTTP Transaction failed: ' + vLink + ' :: ' +
vExceptionMessage)
      .....

"Remy Lebeau (TeamB)" <no.spam@no.spam.com> wrote in message
news:444f253f$3@newsgroups.borland.com...