XML文档内容
<?xml version="1.0" encoding="gb2312"?> <xml> <note> <item> <id>1</id> <from>CNLX</from> <to>LDJ</to> <content>I like you very much!</content> </item> </note> </xml> |
<% '指定XML文档路径 strSourceFile = Server.MapPath("test.xml") '以自由线程创建一个XML对象 Set objXML = Server.CreateObject("Microsoft.FreeThreadedXMLDOM") '加载文档到内存 objXML.load(strSourceFile) '选取note节点 Set objRootsite = objXML.documentElement.selectSingleNode("note") '把各个节点值赋值给相应的变量 id = objRootsite.childNodes.item(0).childNodes.item(0).text from = objRootsite.childNodes.item(0).childNodes.item(1).text toer = objRootsite.childNodes.item(0).childNodes.item(2).text content = objRootsite.childNodes.item(0).childNodes.item(3).text '输出变量值 response.write id response.write from response.write toer response.write content set objXML = nothing %> |
修改XML文档的ASP代码
<% Set objRootlist = objXML.documentElement.selectSingleNode("note") Set oListNode = objXML.documentElement.selectSingleNode("note").AppendChild(objXML.createElement("item")) |
<% i = Request.QueryString("id") |
<% Response.Write("<script>alert('删除成功');</script>") end if |