1
0
mirror of https://github.com/Bayselonarrend/OpenIntegrations.git synced 2025-08-15 20:13:31 +02:00
This commit is contained in:
Anton
2024-06-01 19:32:30 +03:00
3 changed files with 4 additions and 4 deletions

Binary file not shown.

View File

@@ -258,8 +258,8 @@ Function SplitURL(Val URL) Export
URL = StrReplace(URL, "http://", "");
URL = StrReplace(URL, ":443", "");
Address = Right(URL, StrLen(URL) - StrFind(URL, "/", SearchDirection.FromStart) + 1);
Server = Left(URL, StrFind(URL, "/", SearchDirection.FromStart) - 1);
Address = Right(URL, StrLen(URL) - StrFind(URL, "/", SearchDirection.FromBegin) + 1);
Server = Left(URL, StrFind(URL, "/", SearchDirection.FromBegin) - 1);
Try
SSL = New OpenSSLSecureConnection;

View File

@@ -258,8 +258,8 @@ Function SplitURL(Val URL) Export
URL = StrReplace(URL, "http://", "");
URL = StrReplace(URL, ":443", "");
Address = Right(URL, StrLen(URL) - StrFind(URL, "/", SearchDirection.FromStart) + 1);
Server = Left(URL, StrFind(URL, "/", SearchDirection.FromStart) - 1);
Address = Right(URL, StrLen(URL) - StrFind(URL, "/", SearchDirection.FromBegin) + 1);
Server = Left(URL, StrFind(URL, "/", SearchDirection.FromBegin) - 1);
Try
SSL = New OpenSSLSecureConnection;