Zollartikel, EZA Import, Tariff

VERAG_PROG_ALLGEMEIN/Schnittstellen/ATEZ/TARIFF/cATEZ_Tariff.vb

@@ -103,6 +103,12 @@ Public Class cATEZ_Tariff
 
             ' Create an instance of the HTTP object
             Dim http As New Chilkat.Http()
+
+            ' ==== TIMEOUTS ERHÖHEN ====
+            http.ConnectTimeout = 30000   ' 30 Sekunden Verbindungsaufbau
+            http.ReadTimeout = 300000      ' 5 min /300 Sekunden Antwort lesen 
+            ' =========================
+
             Dim baseUrl = ""
 
 
@@ -131,7 +137,7 @@ Public Class cATEZ_Tariff
 
             ' Führe die GET-Anfrage aus
             Dim response As String = http.QuickGetStr(url)
-
+            'MsgBox(response.ToString)
             ' Prüfe auf Fehler
             If http.LastMethodSuccess = False Then
                 Throw New Exception("HTTP Request failed: " & http.LastErrorText)