msxml3.dll拒绝访问是怎么回事？

sunsley 2005-12-11 06:34:02

ASP中读取，写入XML文件。读取信息正常，可是保存时出错：
--error info---------------------------------------------
技术信息（用于支持人员）

错误类型：
msxml3.dll (0x80070005)
拒绝访问。
/myasp/add_News.asp, 第 120 行

浏览器类型：
Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1; .NET CLR 1.1.4322)

网页：
POST 64 ??? /myasp/add_News.asp

POST Data:
id=a&LanguageName=a&LanguageValue=&LanguageImages=&Submit=Submit

时间：
2005年12月11日, 18:03:45

详细信息：
Microsoft 支持
--error info---------------------------------------------

ASP代码如下：
Dim strID
Dim strLanguageName
Dim strLanguageValue
Dim strLanguageImages

strID = Request.Form("id")
strLanguageName = Request.Form("LanguageName")
strLanguageValue = Request.Form("LanguageValue")
strLanguageImages = Request.Form("LanguageImages")

Dim objXML
Dim objEntry
Dim objID
Dim objLanguageName
Dim objLanguageValue
Dim objLanguageImages

Set objXML = server.createObject("Msxml2.DOMDocument")
objXML.async = false
objXML.load(server.MapPath("language.xml"))

Set objEntry = objXML.createNode("element", "language", "")
objXML.documentElement.appendChild(objEntry)

Set objID = objXML.createNode("element", "ID", "")
objEntry.appendChild(objID)
objID.text = strID

Set objLanguageName = objXML.createNode("element", "LanguageName", "")
objEntry.appendChild(objLanguageName)
objLanguageName.text = strLanguageName

Set objLanguageValue = objXML.createNode("element", "LanguageValue", "")
objEntry.appendChild(objLanguageValue)
objLanguageValue.text = strLanguageValue

Set objLanguageImages = objXML.createNode("element", "LanguageImages", "")
objEntry.appendChild(objLanguageImages)
objLanguageImages.text = strLanguageImages

objXML.save(server.MapPath("language.xml")) --错误产生的地方

...全文