here is a little test that i rigged up. both of these files are on my machine. but i can't seem to get them to talk. i've had this stuff working before but can't seem to figure out why it won't this time.
calling page code:
sendXML = "<?xml version=""1.0"" encoding=""ISO8859-1"" ?>" & vbCrLf
sendXML = sendXML & "<user>" & vbCrLf
sendXML = sendXML & "<name>Bill</name>" & vbCrLf
sendXML = sendXML & "</user>"
webServiceUrl = "Set httpReq = Server.CreateObject("MSXML2.ServerXMLHTTP"
Set myXmlDoc = Server.CreateObject("MSXML.DOMDocument"
httpReq.Open "post", webServiceUrl, False
httpReq.setRequestHeader "Content-Type", "text/xml"
httpReq.Send sendXML
dim didLoadXML
returnXML = httpReq.responseText
Set httpReq=Nothing
didLoadXML = myXmlDoc.loadXML(returnXML)
If didLoadXML Then
MyResponse = "Good"
Else
MyResponse = "Bad"
End If
Response.Write("<h1>" & MyResponse & "</h1>"
receiving page code(xmltest2.asp):
set xmldoc = Server.CreateObject("Msxml2.DOMDocument"
xmldoc.async = false
didLoadXML=xmldoc.load(Request)
Set xmlDoc = Nothing
If didLoadXML Then
Result = "Yes"
Else
Result = "No"
End If
'// write the response out for sign
strResultXML = "<?xml version=""1.0""?>"
strResultXML = strResultXML & "<MyResult>"
strResultXML = strResultXML & "<answer>" & Result & "</answer>"
strResultXML = strResultXML & "</MyResult>"
Response.Write strResultXML
can't figure out what's wrong...
calling page code:
sendXML = "<?xml version=""1.0"" encoding=""ISO8859-1"" ?>" & vbCrLf
sendXML = sendXML & "<user>" & vbCrLf
sendXML = sendXML & "<name>Bill</name>" & vbCrLf
sendXML = sendXML & "</user>"
webServiceUrl = "Set httpReq = Server.CreateObject("MSXML2.ServerXMLHTTP"

Set myXmlDoc = Server.CreateObject("MSXML.DOMDocument"

httpReq.Open "post", webServiceUrl, False
httpReq.setRequestHeader "Content-Type", "text/xml"
httpReq.Send sendXML
dim didLoadXML
returnXML = httpReq.responseText
Set httpReq=Nothing
didLoadXML = myXmlDoc.loadXML(returnXML)
If didLoadXML Then
MyResponse = "Good"
Else
MyResponse = "Bad"
End If
Response.Write("<h1>" & MyResponse & "</h1>"

receiving page code(xmltest2.asp):
set xmldoc = Server.CreateObject("Msxml2.DOMDocument"

xmldoc.async = false
didLoadXML=xmldoc.load(Request)
Set xmlDoc = Nothing
If didLoadXML Then
Result = "Yes"
Else
Result = "No"
End If
'// write the response out for sign
strResultXML = "<?xml version=""1.0""?>"
strResultXML = strResultXML & "<MyResult>"
strResultXML = strResultXML & "<answer>" & Result & "</answer>"
strResultXML = strResultXML & "</MyResult>"
Response.Write strResultXML
can't figure out what's wrong...