新买空间上执行xmlhttp.Send(xmlDOC)出错(同样的文件在原服务器上可以)
qpgsd 2005-04-09 09:03:17 我在新网新买的超级经济II型空间在ASP中执行xmlhttp.Send(xmlDOC)时出现错误 '80004005' ,但同样的文件在别的空间上却能正确运行,这是不是因为新网的主机不支持这个功能?
新网服务器是2003的,我自已机器XP与以前空间2000的系统都能正确运行
急盼高手指点!谢谢!
部分源程序如下(8848的支付网关):
Dim url,xmlhttp,dom,node,xmlDOC,SoapRequest
SoapRequest = "<?xml version=" & CHR(34) & "1.0" & CHR(34) & " encoding=" & CHR(34) & "utf-8" & CHR(34) & "?>"& _
"<soap:Envelope xmlns:xsi=" & CHR(34) & "http://www.w3.org/2001/XMLSchema-instance" & CHR(34) & " xmlns:xsd=" & CHR(34) & "http://www.w3.org/2001/XMLSchema" & CHR(34) & " xmlns:soapenc=" & CHR(34) & "http://schemas.xmlsoap.org/soap/encoding/" & CHR(34) & " xmlns:tns=" & CHR(34) & "http://estore.8848.com/" & CHR(34) & " xmlns:types=" & CHR(34) & "http://estore.8848.com/encodedTypes" & CHR(34) & " xmlns:soap=" & CHR(34) & "http://schemas.xmlsoap.org/soap/envelope/" & CHR(34) & " >"& _
" <soap:Body soap:encodingStyle=" & CHR(34) & "http://schemas.xmlsoap.org/soap/encoding/" & CHR(34) & " >"& _
" <tns:PayGatewayEncrypt>"& _
" <sStrFromStore xsi:type=" & CHR(34) & "xsd:string" & CHR(34) & ">" & sEncryStr & "</sStrFromStore>"& _
" <sForward xsi:type=" & CHR(34) & "xsd:string" & CHR(34) & ">" & "SEND" & "</sForward>"& _
" </tns:PayGatewayEncrypt>"& _
" </soap:Body>"& _
"</soap:Envelope>"
url = "http://estore.8848.com/PayGateway.asmx?methodname=PayGatewayEncrypt"
Set xmlDOC =server.CreateObject("MSXML.DOMDocument")
xmlDOC.loadXML(SoapRequest)
Set xmlhttp = server.CreateObject("Msxml2.XMLHTTP.3.0")
xmlhttp.Open "POST",url,false
xmlhttp.setRequestHeader "Content-Type", "text/xml; charset=utf-8"
xmlhttp.setRequestHeader "SOAPAction", "http://estore.8848.com/PayGatewayEncrypt"
xmlhttp.setRequestHeader "Content-Length",LEN(SoapRequest)
xmlhttp.Send(xmlDOC) '就是执行到这里就出现错误