MSXML2.DOMDocument加载Internet资源时情况枚举
MSXML2.DOMDocument加载Internet资源时情况枚举
Article last modified on 2002-1-21
The information in this article applies to:
- Microsoft XML, versions 2.5，2.6， 3.0
SYMPTOMS
如果你调用MSXML.DOMDocument或者MSXML.DOMDocument的Load方法来加载一个XML文件资源，而访问这个XML文件是Internet上的资源，那么具体会有几种情况出现，开发人员应该熟悉不同的设置下会出现什么状况。
其中有这么四种情况比较特殊，程序员一定要小心。
测试的代码如下：
|
<%Response.Buffer = False%>
<html>
<head>
</head>
<body>
<%
Dim oXML, oXMLError, ReturnValue, x
Set oXML = Server.CreateObject("MSXML2.DOMDocument")
' 设置DOMDocument加载资源时是异步加载，还是同步加载：
A oXML.async = false
' 设置目的：
' True/False value indicating if the "server-safe" ServerXMLHTTP
' component should be used to load a document to a server
B oxml.setProperty "ServerHTTPRequest", true
' 通过HTTP加载资源:
C ReturnValue = oXML.Load("http://localhost/asp/ServerXML.xml")
' 或者加载文件资源：
D 'ReturnValue = oXML.Load("C:Inetpub estASPServerXML.xml")
' 打出DOMDocument.load的返回值：
Response.write "Result of load method is =" & ReturnValue & "<br>"
' 打出DOMDocument加载资源的URL:
Response.Write oxml.url & "<br>"
'如果DOMDocument.load方法返回值为FALSE，则打出它的错误原因：
If ReturnValue = False Then
Response.Write "--****************--" & "<br>"
Set oXMLError = oXML.ParseError
Response.Write "" & _
oXMLError.ErrorCode & _
" - " & oXMLError.Reason & _
"<br>"
Set oXMLError = Nothing
Response.Write "--****************--" & "<br>"
End If
' 打出加载的XML文档的节点个数
For x = 0 to oxml.childNodes.length
Response.Write "Node " & x & "." & "<br>"
Next
' 打出加载的XML文档内容：
Response.Write "<-- XML Content: -->" & "<br>" & oxml.xml & "<br>" & " --------"
Set oXML = Nothing
%>
</body>
</html>
|
第一种情况（小心，一个幌子！）：
默认情况下，DOMDocument对象的async属性是TRUE，即异步方式加载。
而且加载时不使用ServerXMLHTTP组件。
即注释掉上面代码中的第A行和B行代码。
A ‘ oXML.async = false
B ‘ oxml.setProperty "ServerHTTPRequest", true
这时候，加载会成功。
ReturnValue将会是TRUE。
但是加载到DOMDocument中的XML文档为空！也就是说，load方法返回的TRUE是一个幌子！
结果如下所示：
11、XSL在客户端
当我们用浏览器打开一个引用XSL的XML文件时，浏览器在显示前做了一个将XML转换为XHTML的隐蔽动作。
这个动作可以用Javascript在IE上显式的完成，前提是XML中不要含有对XSL的引用。代码如下：
var xml = new ActiveXObject("Microsoft.XMLDOM")
xml.async = false
xml.load("cdcatalog.xml")
var xsl = new ActiveXObject("Microsoft.XMLDOM")
xsl.async = false
xsl.load("cdcatalog.xsl")
document.write(xml.transformNode(xsl))
</script>
12、XSL在服务器端
对于IIS而言，可以很方便地在服务器端实现XML的转换。如下：
set xml = Server.CreateObject("Microsoft.XMLDOM")
xml.async = false
xml.load(Server.MapPath("cdcatalog.xml"))
set xsl = Server.CreateObject("Microsoft.XMLDOM")
xsl.async = false
xsl.load(Server.MapPath("cdcatalog.xsl"))
Response.Write(xml.transformNode(xsl))
%>
var xml = new ActiveXObject("Microsoft.XMLDOM")
xml.async = false
xml.load("cdcatalog.xml")
var xsl = new ActiveXObject("Microsoft.XMLDOM")
xsl.async = false
xsl.load("cdcatalog.xsl")
document.write(xml.transformNode(xsl))
</script>
12、XSL在服务器端
对于IIS而言，可以很方便地在服务器端实现XML的转换。如下：
set xml = Server.CreateObject("Microsoft.XMLDOM")
xml.async = false
xml.load(Server.MapPath("cdcatalog.xml"))
set xsl = Server.CreateObject("Microsoft.XMLDOM")
xsl.async = false
xsl.load(Server.MapPath("cdcatalog.xsl"))
Response.Write(xml.transformNode(xsl))
%>