Classic ASP
Classic ASP
Belgium eHealth Platform - checkConnection
See more Belgian eHealth Platform Examples
Demonstrates the first operation of PlatformIntegrationConsumerTest (checkConnection), which has no message-level security and therefore no wsse:Security block in the SOAP header. You test the SSL/TLS connection to the SOA platform.Chilkat Classic ASP Downloads
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
</head>
<body>
<%
success = 0
' This example assumes the Chilkat API to have been previously unlocked.
' See Global Unlock Sample for sample code.
set http = Server.CreateObject("Chilkat.Http")
success = http.SetSslClientCertPfx("SSIN=12345678.acc.p12","p12_password")
If (success = 0) Then
Response.Write "<pre>" & Server.HTMLEncode( http.LastErrorText) & "</pre>"
Response.End
End If
' Create the following XML
' <soapenv:Envelope xmlns:soapenv="http://schemas.xmlsoap.org/soap/envelope/" xmlns:urn="urn:be:fgov:ehealth:platformintegrationconsumertest:v1"
' xmlns:urn1="urn:be:fgov:ehealth:platformintegrationconsumertest:types:v1">
' <soapenv:Header/>
' <soapenv:Body>
' <urn:CheckConnectionRequest>
' <urn1:Message>Hello World</urn1:Message>
' <urn1:Timestamp>2014-12-30T15:29:03.157+01:00</urn1:Timestamp>
' </urn:CheckConnectionRequest>
' </soapenv:Body>
' </soapenv:Envelope>
set xml = Server.CreateObject("Chilkat.Xml")
xml.Tag = "soapenv:Envelope"
success = xml.AddAttribute("xmlns:soapenv","http://schemas.xmlsoap.org/soap/envelope/")
success = xml.AddAttribute("xmlns:urn","urn:be:fgov:ehealth:platformintegrationconsumertest:v1")
success = xml.AddAttribute("xmlns:urn1","urn:be:fgov:ehealth:platformintegrationconsumertest:types:v1")
xml.UpdateChildContent "soapenv:Header",""
xml.UpdateChildContent "soapenv:Body|urn:CheckConnectionRequest|urn1:Message","Hello World"
' Create a timestamp with the current date/time in the following format: 2014-12-30T15:29:03.157+01:00
set dt = Server.CreateObject("Chilkat.CkDateTime")
success = dt.SetFromCurrentSystemTime()
xml.UpdateChildContent "soapenv:Body|urn:CheckConnectionRequest|urn1:Timestamp",dt.GetAsTimestamp(1)
http.SetRequestHeader "Content-Type","text/xml"
set resp = Server.CreateObject("Chilkat.HttpResponse")
success = http.HttpStr("POST","https://services-acpt.ehealth.fgov.be/PlatformIntegrationConsumerTest/v1",xml.GetXml(),"utf-8","application/xml",resp)
If (success = 0) Then
Response.Write "<pre>" & Server.HTMLEncode( http.LastErrorText) & "</pre>"
Response.End
End If
Response.Write "<pre>" & Server.HTMLEncode( resp.BodyStr) & "</pre>"
Response.Write "<pre>" & Server.HTMLEncode( "response status code = " & resp.StatusCode) & "</pre>"
' A successful response is a 200 status code, with this sample response:
'
' <?xml version="1.0"?>
' <soapenv:Envelope xmlns:soapenv="http://schemas.xmlsoap.org/soap/envelope/">
' <soapenv:Header xmlns:v1="urn:be:fgov:ehealth:platformintegrationconsumertest:v1" xmlns:v11="urn:be:fgov:ehealth:platformintegrationconsumertest:types:v1"/>
' <soapenv:Body xmlns:v1="urn:be:fgov:ehealth:platformintegrationconsumertest:v1" xmlns:v11="urn:be:fgov:ehealth:platformintegrationconsumertest:types:v1">
' <ic:CheckConnectionResponse xmlns:ic="urn:be:fgov:ehealth:platformintegrationconsumertest:v1" xmlns:type="urn:be:fgov:ehealth:platformintegrationconsumertest:types:v1">
' <type:Message>Hello World</type:Message>
' <type:Timestamp>2023-09-28T21:24:32.925+02:00</type:Timestamp>
' <type:AuthenticatedConsumer>anonymous</type:AuthenticatedConsumer>
' </ic:CheckConnectionResponse>
' </soapenv:Body>
' </soapenv:Envelope>
%>
</body>
</html>