ASP操作xml--删除xml文件中某个节点

http://www.aspprogram.cn/detail.asp?id=157这个页面用来显示xml文件中的所有节点,在每个节点旁边有删除和编辑两个连接,其中删除的代码是:
<
%
id=request("
id"
)
if 
IsNumeric(id)=false 
or 
isNull(id) 
then
response.write 
("
参数不正确，请返回！"
)
response.end
end 
if 

strSourceFile 
= 
Server.MapPath("
./"
) 
&

#38
 
"
\test.xml"

&
#39
获取XML文件的路径这里根据你的虚拟目录不同而不同
 
Set 
objXML 
= 
Server.CreateObject("
Microsoft.XMLDOM"
)
 
&
#39
创建XML对像
 
objXML.load(strSourceFile)
 
&
#39
把XML文件读入内存中
 
Set 
objRootlist 
= 
objXML.documentElement.selectSingleNode("
root"
)
 
set 
rootOldNode=objRootlist.childNodes.item(id) 

 
objRootlist.RemoveChild 
rootOldNode
 
&
#39
删除节点
 
objXML.save(strSourceFile)
 
&
#39
存储test.xml文件（因为不存储test.xml只在内存中更新了）
 
set 
objXML=Nothing
 
set 
objXML2=Nothing
 
Response.Redirect("
index.asp"
)
 
response.end
%>


源码下载地址：http://www.aspprogram.cn/soft.asp?id=33