Sample code for 30+ languages & platforms
Classic ASP

POST GovTalk XML to https://vrep1-t.cssz.cz/VREP/submission

See more HTTP Misc Examples

Demonstrates how to POST a GovTalk XML message to https://vrep1-t.cssz.cz/VREP/submission

PDF Documentation is at http://www.cssz.cz/NR/rdonlyres/0ACDBB35-F78A-4B1A-8258-7249B55C788E/0/csszpodavacidotazovaciprotokol20110608.pdf

Chilkat Classic ASP Downloads

Download Chilkat for Classic ASP
Classic ASP 
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
</head>
<body>
<%
success = 0

'  This requires the Chilkat API to have been previously unlocked.
'  See Global Unlock Sample for sample code.

'  First prepare the XML body that is to be GZip compressed and then encrypted.
'  Build the following XML..

'  Use the online tool at http://tools.chilkat.io/xmlCreate.cshtml
'  to generate the XML creation code that follows this XML.

'  <?xml version="1.0" encoding="utf-8" ?>
'  <pvpoj xmlns="http://schemas.cssz.cz/POJ/PVPOJ2016">
'      <prehled verze="2016.0" typPrehledu="N">
'          <okres>
'              <kodOSSZ>119</kodOSSZ>
'              <nazevOSSZ>Praha 9</nazevOSSZ>
'          </okres>
'          <obdobi>
'              <mesic>1</mesic>
'              <rok>2018</rok>
'          </obdobi>
'          <zamestnavatel>
'              <vs>9992002999</vs>
'              <IC>49710999</IC>
'              <nazev>SIT &amp; KHASO v.o.s.</nazev>
'              <adresa>
'                  <ulice>Na sp�leni�ti</ulice>
'                  <cisloDomu>517</cisloDomu>
'                  <obec>Praha 9</obec>
'                  <PSC>19032</PSC>
'                  <stat>CZ</stat>
'              </adresa>
'          </zamestnavatel>
'          <pojistne>
'              <uhrnVymerovacichZakladu>1104</uhrnVymerovacichZakladu>
'              <pojistneZamestnance>175</pojistneZamestnance>
'              <pojistneZamestnavatele>2826</pojistneZamestnavatele>
'              <pojistneCelkem>4301</pojistneCelkem>
'          </pojistne>
'          <platebniUdaje>
'              <bankaCisloUctu>012345789/0800</bankaCisloUctu>
'          </platebniUdaje>
'          <pracovnik>
'              <jmeno>Matt</jmeno>
'              <prijmeni>Smith</prijmeni>
'              <telefon>606796999</telefon>
'              <email>admin@chilkatsoft.com</email>
'          </pracovnik>
'          <datumVyplneni>2018-03-02</datumVyplneni>
'          <poznamka />
'      </prehled>
'  </pvpoj>

set xml = Server.CreateObject("Chilkat.Xml")
xml.Tag = "pvpoj"
success = xml.AddAttribute("xmlns","http://schemas.cssz.cz/POJ/PVPOJ2016")
success = xml.UpdateAttrAt("prehled",1,"verze","2016.0")
success = xml.UpdateAttrAt("prehled",1,"typPrehledu","N")
xml.UpdateChildContent "prehled|okres|kodOSSZ","119"
xml.UpdateChildContent "prehled|okres|nazevOSSZ","Praha 9"
xml.UpdateChildContent "prehled|obdobi|mesic","1"
xml.UpdateChildContent "prehled|obdobi|rok","2018"
xml.UpdateChildContent "prehled|zamestnavatel|vs","9992002999"
xml.UpdateChildContent "prehled|zamestnavatel|IC","49710999"
xml.UpdateChildContent "prehled|zamestnavatel|nazev","SIT & KHASO v.o.s."
xml.UpdateChildContent "prehled|zamestnavatel|adresa|ulice","Na sp�leni�ti"
xml.UpdateChildContent "prehled|zamestnavatel|adresa|cisloDomu","517"
xml.UpdateChildContent "prehled|zamestnavatel|adresa|obec","Praha 9"
xml.UpdateChildContent "prehled|zamestnavatel|adresa|PSC","19032"
xml.UpdateChildContent "prehled|zamestnavatel|adresa|stat","CZ"
xml.UpdateChildContent "prehled|pojistne|uhrnVymerovacichZakladu","1104"
xml.UpdateChildContent "prehled|pojistne|pojistneZamestnance","175"
xml.UpdateChildContent "prehled|pojistne|pojistneZamestnavatele","2826"
xml.UpdateChildContent "prehled|pojistne|pojistneCelkem","4301"
xml.UpdateChildContent "prehled|platebniUdaje|bankaCisloUctu","012345789/0800"
xml.UpdateChildContent "prehled|pracovnik|jmeno","Matt"
xml.UpdateChildContent "prehled|pracovnik|prijmeni","Smith"
xml.UpdateChildContent "prehled|pracovnik|telefon","606796999"
xml.UpdateChildContent "prehled|pracovnik|email","admin@chilkatsoft.com"
xml.UpdateChildContent "prehled|datumVyplneni","2018-03-02"
xml.UpdateChildContent "prehled|poznamka",""

xml.EmitCompact = 1
xml.EmitXmlDecl = 0

'  Emit the XML into bd.
set bd = Server.CreateObject("Chilkat.BinData")
success = bd.AppendString(xml.GetXml(),"utf-8")

'  GZip compress the bd contents.
set gzip = Server.CreateObject("Chilkat.Gzip")
'  The Filename is not an actual file on disk, but is just the filename string stored in the gzip compressed format.
gzip.Filename = "pvpoj.xml"
success = gzip.CompressBd(bd)

'  Encrypt the contents using the government provided cert.
set cert = Server.CreateObject("Chilkat.Cert")
success = cert.LoadFromFile("qa_data/govs/czech/pvpoj/DISCSSZ2019.cer")
If (success = 0) Then
    Response.Write "<pre>" & Server.HTMLEncode( cert.LastErrorText) & "</pre>"
    Response.End
End If

set crypt = Server.CreateObject("Chilkat.Crypt2")
crypt.CryptAlgorithm = "pki"

crypt.Pkcs7CryptAlg = "aes"
crypt.KeyLength = 256

success = crypt.SetEncryptCert(cert)
If (success = 0) Then
    Response.Write "<pre>" & Server.HTMLEncode( crypt.LastErrorText) & "</pre>"
    Response.End
End If

success = crypt.EncryptBd(bd)
If (success = 0) Then
    Response.Write "<pre>" & Server.HTMLEncode( crypt.LastErrorText) & "</pre>"
    Response.End
End If

'  At this point, bd contains the gzip compressed / encrypted XML.

'  Build the following GovTalkMessage XML:

'  <?xml version="1.0" encoding="utf-8"?>
'  <GovTalkMessage xmlns="http://www.govtalk.gov.uk/CM/envelope">
'    <EnvelopeVersion>2.0</EnvelopeVersion>
'    <Header>
'      <MessageDetails>
'        <Class>CSSZ_PVPOJ</Class>
'        <Qualifier>request</Qualifier>
'        <Function>submit</Function>
'        <TransactionID />
'        <AuditID />
'        <CorrelationID />
'        <ResponseEndPoint PollInterval="0" />
'        <Transformation>XML</Transformation>
'        <GatewayTest />
'        <GatewayTimestamp />
'      </MessageDetails>
'      <SenderDetails>
'        <IDAuthentication>
'          <SenderID />
'          <Authentication>
'            <Method>clear</Method>
'            <Role />
'            <Value />
'          </Authentication>
'        </IDAuthentication>
'        <X509Certificate />
'        <EmailAddress>admin@chilkatsoft.com</EmailAddress>
'      </SenderDetails>
'    </Header>
'    <GovTalkDetails>
'      <Keys>
'        <Key Type="vars">9992888999</Key>
'      </Keys>
'      <GatewayAdditions />
'    </GovTalkDetails>
'    <Body>
'      <Message xmlns="http://www.cssz.cz/XMLSchema/envelope" version="1.2" eType="PVPOJ16">
'        <Header>
'          <Signature xmlns:dt="urn:schemas-microsoft-com:datatypes" dt:dt="bin.base64">Signature goes here</Signature>
'          <Vendor productName="Abc xyz. s r.o. JKL .NET Client" version="6.0.2.0" />
'        </Header>
'        <Body xmlns:dt="urn:schemas-microsoft-com:datatypes" encrypted="yes" contentEncoding="gzip" dt:dt="bin.base64">Base64 goes here
'  </Body>
'      </Message>
'    </Body>
'  </GovTalkMessage>
'  

'  Use the online tool at http://tools.chilkat.io/xmlCreate.cshtml
'  to generate this code.

xml.Clear 
xml.Tag = "GovTalkMessage"
success = xml.AddAttribute("xmlns","http://www.govtalk.gov.uk/CM/envelope")
xml.UpdateChildContent "EnvelopeVersion","2.0"
xml.UpdateChildContent "Header|MessageDetails|Class","CSSZ_PVPOJ"
xml.UpdateChildContent "Header|MessageDetails|Qualifier","request"
xml.UpdateChildContent "Header|MessageDetails|Function","submit"
xml.UpdateChildContent "Header|MessageDetails|TransactionID",""
xml.UpdateChildContent "Header|MessageDetails|AuditID",""
xml.UpdateChildContent "Header|MessageDetails|CorrelationID",""
success = xml.UpdateAttrAt("Header|MessageDetails|ResponseEndPoint",1,"PollInterval","0")
xml.UpdateChildContent "Header|MessageDetails|Transformation","XML"
xml.UpdateChildContent "Header|MessageDetails|GatewayTest",""
xml.UpdateChildContent "Header|MessageDetails|GatewayTimestamp",""
xml.UpdateChildContent "Header|SenderDetails|IDAuthentication|SenderID",""
xml.UpdateChildContent "Header|SenderDetails|IDAuthentication|Authentication|Method","clear"
xml.UpdateChildContent "Header|SenderDetails|IDAuthentication|Authentication|Role",""
xml.UpdateChildContent "Header|SenderDetails|IDAuthentication|Authentication|Value",""
xml.UpdateChildContent "Header|SenderDetails|X509Certificate",""
xml.UpdateChildContent "Header|SenderDetails|EmailAddress","admin@chilkatsoft.com"
success = xml.UpdateAttrAt("GovTalkDetails|Keys|Key",1,"Type","vars")
xml.UpdateChildContent "GovTalkDetails|Keys|Key","9992888999"
xml.UpdateChildContent "GovTalkDetails|GatewayAdditions",""
success = xml.UpdateAttrAt("Body|Message",1,"xmlns","http://www.cssz.cz/XMLSchema/envelope")
success = xml.UpdateAttrAt("Body|Message",1,"version","1.2")
success = xml.UpdateAttrAt("Body|Message",1,"eType","PVPOJ16")
success = xml.UpdateAttrAt("Body|Message|Header|Signature",1,"xmlns:dt","urn:schemas-microsoft-com:datatypes")
success = xml.UpdateAttrAt("Body|Message|Header|Signature",1,"dt:dt","bin.base64")
xml.UpdateChildContent "Body|Message|Header|Signature","Signature goes here"
success = xml.UpdateAttrAt("Body|Message|Header|Vendor",1,"productName","Abc xyz. s r.o. JKL .NET Client")
success = xml.UpdateAttrAt("Body|Message|Header|Vendor",1,"version","6.0.2.0")
success = xml.UpdateAttrAt("Body|Message|Body",1,"xmlns:dt","urn:schemas-microsoft-com:datatypes")
success = xml.UpdateAttrAt("Body|Message|Body",1,"encrypted","yes")
success = xml.UpdateAttrAt("Body|Message|Body",1,"contentEncoding","gzip")
success = xml.UpdateAttrAt("Body|Message|Body",1,"dt:dt","bin.base64")

'  Insert the contents of bd here:
xml.UpdateChildContent "Body|Message|Body",bd.GetEncoded("base64")

'  Show the XML to be sent to https://vrep1-t.cssz.cz/VREP/submission
xml.EmitCompact = 0
Response.Write "<pre>" & Server.HTMLEncode( xml.GetXml()) & "</pre>"
xml.EmitCompact = 1

'  ----------------------------------------------------------
'  POST the XML to https://vrep1-t.cssz.cz/VREP/submission

set http = Server.CreateObject("Chilkat.Http")
set resp = Server.CreateObject("Chilkat.HttpResponse")
success = http.HttpStr("POST","https://vrep1-t.cssz.cz/VREP/submission",xml.GetXml(),"utf-8","application/xml",resp)
If (success = 0) Then
    Response.Write "<pre>" & Server.HTMLEncode( http.LastErrorText) & "</pre>"
    Response.End
End If

'  Examine the response status code (200 = success)
statusCode = resp.StatusCode
Response.Write "<pre>" & Server.HTMLEncode( "Response status code = " & statusCode) & "</pre>"

'  The response body should be XML.
'  Load it into a Chilkat XML object to get it in indented format for viewing..
xml.Clear 
success = xml.LoadXml(resp.BodyStr)
xml.EmitCompact = 0
Response.Write "<pre>" & Server.HTMLEncode( xml.GetXml()) & "</pre>"

'  Output is:
'  <GovTalkMessage xmlns="http://www.govtalk.gov.uk/CM/envelope">
'      <EnvelopeVersion>2.0</EnvelopeVersion>
'      <Header>
'          <MessageDetails>
'              <Class>CSSZ_PVPOJ</Class>
'              <Qualifier>acknowledgement</Qualifier>
'              <Function>submit</Function>
'              <TransactionID />
'              <CorrelationID>1B6336D5ACE949CDB944424CB2D54401</CorrelationID>
'              <ResponseEndPoint PollInterval="60">https://vrep1-t.cssz.cz/VREP/poll</ResponseEndPoint>
'              <GatewayTimestamp>2018-07-02T22:23:41.310</GatewayTimestamp>
'          </MessageDetails>
'          <SenderDetails />
'      </Header>
'      <GovTalkDetails>
'          <Keys />
'      </GovTalkDetails>
'      <Body>
'          <Signature xmlns="http://www.podani.gov.cz/TxE/timestamp" Version="1.0">
'              <DigestMethod Algorithm="http://www.w3.org/2000/09/xmldsig#sha1" />
'              <TimeStamp>
'                  <date>20180702</date>
'                  <time>22:23:41</time>
'              </TimeStamp>
'              <SignatureValue>MIIORwYJKoZIhvcNAQcCo ... bBNE6MeXmk2siMuvY=</SignatureValue>
'          </Signature>
'      </Body>
'  </GovTalkMessage>
'  

'  Hint: Use the online tool at http://tools.chilkat.io/xmlParse.cshtml
'  to generate XML parsing code based on a sample response..

%>
</body>
</html>