AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Netzwerke Umstellung auf Alexandria TRESTRequest funktioniert nicht
Thema durchsuchen
Ansicht
Themen-Optionen

Umstellung auf Alexandria TRESTRequest funktioniert nicht

Ein Thema von bronstein · begonnen am 15. Aug 2022 · letzter Beitrag vom 15. Aug 2022
Antwort Antwort
bronstein

Registriert seit: 3. Feb 2004
28 Beiträge
 
Delphi XE2 Professional
 
#1

Umstellung auf Alexandria TRESTRequest funktioniert nicht

  Alt 15. Aug 2022, 07:04
Hallo,
ich stelle mein Programm gerade von Tokyo nach Alexandria jetzt habe ich aber ein Problem mit einem Rest Request

Mein Quellcode sieht folgendermaßen aus:
Delphi-Quellcode:
Client := TRESTClient.Create(nil);
    Client.Authenticator := THTTPBasicAuthenticator.Create(user, PWD);
    Client.RaiseExceptionOn500 := true;
    //Client.ConnectTimeout := 500;
    //Client.ReadTimeout := 500;

    try
      URL := 'https://test.com/generate-certificate?cn=';

      sFDNumber := '123454767458';
      Client.BaseURL := Url + sFDNumber;

      Request := TRESTRequest.Create(Client);
      Response := TRESTResponse.Create(Client);

     Client.ProxyPort := 8888;
     Client.ProxyServer := '127.0.0.1';

      try
        try
          Request.Method := TRESTRequestMethod.rmGET;
          //Request.Response := Response;
          Start := now;
          Request.Execute;
          //Request.ExecuteAsync();
          Protokoll_Log('Dauer der Abfrage erfolgreich: ' + IntToStr(MilliSecondsBetween(Start, now)) + 'URL: ' + Client.BaseURL);

          Response := Request.Response;
          Json := Request.Response.Content;
          State := true;
        except
          on e:Exception do
          begin
            //ShowMessage(IntToStr(MilliSecondsBetween(Start, now));
            Protokoll_Log('Dauer der Abfrage fehlerhaft: ' + IntToStr(MilliSecondsBetween(Start, now)) + 'URL: ' + Client.BaseURL + ' Error: ' + e.Message);
            State := false;
            resultMessage := e.Message + ' BFIT Service: ' + Client.BaseURL;
          end;
        end;
      finally
        Request.Free;
      end;
    finally
      Client.Free;
    end;

Wenn ich den Code in Tokyo debugge funktioniert alles wunderbar in Delphi Alexandria komme ich zur Zeile "Request.Execute;" dann tut sich überhaupt nichts mehr

Geändert von bronstein (15. Aug 2022 um 10:33 Uhr)
  Mit Zitat antworten Zitat
Benutzerbild von DeddyH
DeddyH

Registriert seit: 17. Sep 2006
Ort: Barchfeld
27.542 Beiträge
 
Delphi 11 Alexandria
 
#2

AW: Umstellung auf Alexandria TRESTRequest funktioniert nicht

  Alt 15. Aug 2022, 09:46
Bist Du Dir sicher, dass Client.BaseURL so stimmt?
Detlef
"Ich habe Angst vor dem Tag, an dem die Technologie unsere menschlichen Interaktionen übertrumpft. Die Welt wird eine Generation von Idioten bekommen." (Albert Einstein)
Dieser Tag ist längst gekommen
  Mit Zitat antworten Zitat
bronstein

Registriert seit: 3. Feb 2004
28 Beiträge
 
Delphi XE2 Professional
 
#3

AW: Umstellung auf Alexandria TRESTRequest funktioniert nicht

  Alt 15. Aug 2022, 10:34
Hallo,
ich habe es im Code nochmal angepasst, wollte die url nur hier im Forum vereinfachen da man ja nur intern in meinem Netz auf das Ziel kommt
  Mit Zitat antworten Zitat
taveuni

Registriert seit: 3. Apr 2007
Ort: Zürich
526 Beiträge
 
Delphi 11 Alexandria
 
#4

AW: Umstellung auf Alexandria TRESTRequest funktioniert nicht

  Alt 15. Aug 2022, 12:19
(..)
Wenn ich den Code in Tokyo debugge funktioniert alles wunderbar in Delphi Alexandria komme ich zur Zeile "Request.Execute;" dann tut sich überhaupt nichts mehr
Definiere "tut sich überhaupt nichts mehr". Auch nicht nach dem Timeout? Warst Du mit dem Debugger schon mal in der Methode?
Die obige Aussage repräsentiert meine persönliche Meinung.
Diese erhebt keinen Anspruch auf Objektivität oder Richtigkeit.
  Mit Zitat antworten Zitat
Benutzerbild von Uwe Raabe
Uwe Raabe

Registriert seit: 20. Jan 2006
Ort: Lübbecke
11.021 Beiträge
 
Delphi 12 Athens
 
#5

AW: Umstellung auf Alexandria TRESTRequest funktioniert nicht

  Alt 15. Aug 2022, 12:48
Definiere "tut sich überhaupt nichts mehr". Auch nicht nach dem Timeout?
Der Default-Connection-Timeout ist 30 Sekunden.
Uwe Raabe
Certified Delphi Master Developer
Embarcadero MVP
Blog: The Art of Delphi Programming
  Mit Zitat antworten Zitat
bronstein

Registriert seit: 3. Feb 2004
28 Beiträge
 
Delphi XE2 Professional
 
#6

AW: Umstellung auf Alexandria TRESTRequest funktioniert nicht

  Alt 15. Aug 2022, 13:55
Habe das noch eingefügt vor dem Request dann läuft es
Request.SynchronizedEvents := false;
  Mit Zitat antworten Zitat
Antwort Antwort

 

Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 09:04 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz