Get XML Element Value with classic asp

kubyustus · December 15th, 2014, 07:51 AM

Hi,

I have problem to get xml element value with classic asp.

This is the xml:

<?xml version="1.0" encoding="UTF-8"?>
-<soap:Envelope xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:soap="http://schemas.xmlsoap.org/soap/envelope/">
-<soap:Body>
-<Add_ClubCustomer xmlns="http://someurl/">
<Add_ClubCustomerResult>1607</Add_ClubCustomerResult>
</Add_ClubCustomer >
</soap:Body>
</soap:Envelope>

I want to get the 1607 value in classic asp.

Thanks.

mat41 · December 16th, 2014, 07:42 PM

To be honest I have never hit a SOAP web service with ASP before. Here is how you work with an XML file

This is cut and paste code with two exceptions:
1.. replace someXMLFileName.xml with a valid XML file name. The code expects this file should be in the same dir as the ASP file calling it.
2.. replace 'firstName' and 'lastName' with two valid node names form your XML file. or you could use the example I ahve pasted at the end, it will simply run with this

Code:

Dim objxml,fName,lName
Set objxml = Server.CreateObject("MSXML2.DOMDocument")
objxml.async = False
objxml.load (Server.MapPath("someXMLFileName.xml"))
'get individual elements
set fName     = objxml.getElementsByTagName("firstName")
set lName     = objxml.getElementsByTagName("lastName")
response.write "The first name is = " & fName.item(0).Text & "<br>"
response.write "The last name is = " & lName.item(0).Text & "<br><br><bR>"

'or you can loop through liek this
dim nodeList, i
Set nodeList = objxml.SelectNodes("//xmldata/")
for each i In nodeList
    response.write(i.text & " -> Tag Name: " & i.nodeName & "<br />")
Next

an example of a vid XML file could be:

Code:

<xmldata>
  <people>
    <id>22506</id>
    <firstName>Jim</firstName>
	<lastName>Jones</lastName>
    <isAdmin>N</isAdmin>   
  </people>
</xmldata>