Classic ASP
Classic ASP
SOAP WS-Security Username Authentication
See more XML Examples
Demonstrates creating SOAP XML for WS-Security Username Authentication. The client user name and password are encapsulated in a WS-Security <wsse:UsernameToken>.Chilkat Classic ASP Downloads
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
</head>
<body>
<%
' Generate this XML with the code that follows:
' <soap:Envelope xmlns:soap="http://schemas.xmlsoap.org/soap/envelope/">
' <soap:Header>
' <wsse:Security xmlns:wsse="http://schemas.xmlsoap.org/ws/2003/06/secext">
' <wsse:UsernameToken wsu:Id="sample"
' xmlns:wsu="http://schemas.xmlsoap.org/ws/2003/06/utility">
' <wsse:Username>sample</wsse:Username>
' <wsse:Password Type="wsse:PasswordText">oracle</wsse:Password>
' <wsu:Created>2004-05-19T08:44:51Z</wsu:Created>
' </wsse:UsernameToken>
' </wsse:Security>
' <wsse:Security soap:actor="oracle"
' xmlns:wsse="http://schemas.xmlsoap.org/ws/2003/06/secext">
' <wsse:UsernameToken wsu:Id="oracle"
' xmlns:wsu="http://schemas.xmlsoap.org/ws/2003/06/utility">
' <wsse:Username>myUsername</wsse:Username>
' <wsse:Password Type="wsse:PasswordText">myPassword</wsse:Password>
' <wsu:Created>2004-05-19T08:46:04Z</wsu:Created>
' </wsse:UsernameToken>
' </wsse:Security>
' </soap:Header>
' <soap:Body>
' <getHello xmlns="http://www.oracle.com"/>
' </soap:Body>
' </soap:Envelope>
'
' First build the outer housing:
set xml = Server.CreateObject("Chilkat.Xml")
xml.Tag = "soap:Envelope"
success = xml.AddAttribute("xmlns:soap","http://schemas.xmlsoap.org/soap/envelope/")
xml.UpdateChildContent "soap:Header",""
success = xml.UpdateAttrAt("soap:Body|getHello",1,"xmlns","http://www.oracle.com")
' Get the current date/time in a string with this format: 2004-05-19T08:46:04Z
set dt = Server.CreateObject("Chilkat.CkDateTime")
success = dt.SetFromCurrentSystemTime()
bLocal = 0
created = dt.GetAsTimestamp(bLocal)
' Now build each UsernameToken block:
set wsse1 = Server.CreateObject("Chilkat.Xml")
wsse1.Tag = "wsse:Security"
success = wsse1.AddAttribute("xmlns:wsse","http://schemas.xmlsoap.org/ws/2003/06/secext")
success = wsse1.UpdateAttrAt("wsse:UsernameToken",1,"wsu:Id","sample")
success = wsse1.UpdateAttrAt("wsse:UsernameToken",1,"xmlns:wsu","http://schemas.xmlsoap.org/ws/2003/06/utility")
wsse1.UpdateChildContent "wsse:UsernameToken|wsse:Username","sample"
success = wsse1.UpdateAttrAt("wsse:UsernameToken|wsse:Password",1,"Type","wsse:PasswordText")
wsse1.UpdateChildContent "wsse:UsernameToken|wsse:Password","oracle"
wsse1.UpdateChildContent "wsse:UsernameToken|wsu:Created",created
set wsse2 = Server.CreateObject("Chilkat.Xml")
wsse2.Tag = "wsse:Security"
success = wsse2.AddAttribute("soap:actor","oracle")
success = wsse2.AddAttribute("xmlns:wsse","http://schemas.xmlsoap.org/ws/2003/06/secext")
success = wsse2.UpdateAttrAt("wsse:UsernameToken",1,"wsu:Id","oracle")
success = wsse2.UpdateAttrAt("wsse:UsernameToken",1,"xmlns:wsu","http://schemas.xmlsoap.org/ws/2003/06/utility")
wsse2.UpdateChildContent "wsse:UsernameToken|wsse:Username","oracle"
success = wsse2.UpdateAttrAt("wsse:UsernameToken|wsse:Password",1,"Type","wsse:PasswordText")
wsse2.UpdateChildContent "wsse:UsernameToken|wsse:Password","oracle"
wsse2.UpdateChildContent "wsse:UsernameToken|wsu:Created",created
' Insert the UsernameToken blocks:
' xHeader is a Chilkat.Xml
Set xHeader = xml.GetChildWithTag("soap:Header")
success = xHeader.AddChildTree(wsse1)
success = xHeader.AddChildTree(wsse2)
' Show the XML:
Response.Write "<pre>" & Server.HTMLEncode( xml.GetXml()) & "</pre>"
%>
</body>
</html>