ClassMethod GetSSLConfiguration(host) As %String
{
NEW $NAMESPACE
SET $NAMESPACE = "%SYS"
IF '##class(Security.SSLConfigs).Exists(host) {
DO ##class(Security.SSLConfigs).Create(host)
}
QUIT host
}
Set tRequest = ##class(%Net.HttpRequest).%New() Set tRequest.Server = "community.intersystems.com" Set tRequest.Https = 1 Set tRequest.SSLConfiguration = ..GetSSLConfiguration(tRequest.Server) ....
- Inicie sesión para enviar comentarios