ustva

VERAG_PROG_ALLGEMEIN/Schnittstellen/ATEZ/VERAG_OUT_ATEZ_IN/cATEZ_NCTS_IN.vb

@@ -666,6 +666,8 @@ Public Class cATEZ_NCTS_IN
             Dim bTls As Boolean = True
             Dim port As Integer = 443
             Dim bAutoReconnect As Boolean = True
+            'API_STRING = API_STRING.Replace("https://", "")
+            'API_STRING = API_STRING.Replace("http://", "")
             success = rest.Connect(API_STRING, port, bTls, bAutoReconnect)
             If (success <> True) Then
                 Debug.WriteLine("ConnectFailReason: " & rest.ConnectFailReason)
@@ -691,6 +693,10 @@ Public Class cATEZ_NCTS_IN
             'rest.DebugMode = True
 
             Dim sbResponseBody As New Chilkat.StringBuilder
+
+
+            'myuri = myuri.Replace("https:/", "")
+            'myuri = myuri.Replace("http:/", "")
             Dim ResponseStr = rest.FullRequestSb(method, myuri, sbRequestBody, sbResponseBody)