还是老问题：msxml3.dll 错误 '80070005' 拒绝访问。

[zhui9]

相关文章
http://expert.csdn.net/Expert/topic/2828/2828844.xml?temp=.6290705

代码应该正确的，我昨天晚上测试过了，可以显示。

但今天再用，提示

msxml3.dll 错误 '80070005'

拒绝访问。

怎么解决啊？

附代码：

<%
dim url,xml,xml2,n,CDATASection,xmlkeyword,xmltitle,xmlcontent
'url = Request.QueryString("url")
url = Request.form("url")
Set xml = CreateObject("Msxml2.DOMDocument")
xml.async=false
Set xml2 = CreateObject("Msxml2.DOMDocument")
xml2.async=false
xml2.setProperty "ServerHTTPRequest", true

'xml2.load("http://www.37c.com.cn/info/message/200403/200403149.xml?tmp=.7035639")
xml2.load(url)

Set n = xml2.selectSingleNode("//Content")
Set CDATASection = xml2.createCDATASection(xml.xml)
n.appendChild CDATASection

xmlkeyword=xml2.selectSingleNode("//Keyword").Text
xmltitle=xml2.selectSingleNode("//InfoTitle").Text
xmlcontent=xml2.selectSingleNode("//Content").Text
%>