<?xml version="1.0" encoding="gb2312"?>

<books>

  <book>

     <name>ASP程序设计</name>

     <author>尚俊杰</author>

     <price>￥20</price>

  </book>

  <book>

     <name>JSP程序设计</name>

     <author>jsper</author>

     <price>￥40</price>

  </book>

</books>

Loadxml.asp

<%

Set xmldom=server.CreateObject("microsoft.xmldom")

xmldom.load(server.mappath("book.xml"))

xmldom.loadxml "<?xml version=""1.0"" encoding=""gb2312""?><books></books>"

Set root=xmldom.documentelement

Set book=xmldom.createelement("book")

root.appendchild(book)

Set name")

name.text="PHP程序设计"

book.appendchild(name)

Set author=xmldom.createelement("author")

author.text="PHPer"

book.appendchild(author)

Set price=xmldom.createelement("price")

price.text="￥50"

book.appendchild(price)

xmldom.save(server.mappath("loadxml.xml"))

%>

Load.asp

<%

Set xmldom=server.CreateObject("microsoft.xmldom")

xmldom.load(server.mappath("book.xml"))

Set root=xmldom.documentElement

Set book=root.appendchild(xmldom.createElement("book"))

Set name")

name.text="JSP程序设计"

book.appendchild(name)

Set author=xmldom.createElement("author")

author.text="JSPer"

book.appendchild(author)

Set price=xmldom.createElement("price")

price.text="￥50"

book.appendchild(price)

xmldom.save(server.mappath("load.xml"))

%>

Insertbefore.asp

<%

Set xmldom=server.CreateObject("microsoft.xmldom")

xmldom.load(server.mappath("book.xml"))

Set root=xmldom.documentElement

Set book=xmldom.createElement("book")

root.insertbefore book,root.childnodes(1)

Set name")

name.text="jsp程序"

book.appendchild(name)

Set author=xmldom.createElement("author")

author.text="jsper"

book.appendchild(author)

Set price=xmldom.createElement("price")

price.text="￥50"

book.appendchild(price)

xmldom.save(server.mappath("insertbefore.xml"))

%>

Createtag.asp

<%

set tempxml=server.createobject("microsoft.xmldom")

tempxml.load server.mappath("book.xml")

set xmlnode=tempxml.documentelement.childNodes(1)

set element=tempxml.createelement("introduction")

element.text="Good Book"

xmlnode.appendchild element

tempxml.save server.mappath("ex2.xml")

%>

Createattr.asp

<%

set tempxml=server.createobject("microsoft.xmldom")

tempxml.load server.mappath("book.xml")

'set xmlnode=tempxml.getElementsByTagName("books").item(0).childnodes(0)

Set xmlnode=tempxml.documentelement.firstchild

set element=tempxml.createattribute("introduction")

element.text="good book!"

xmlnode.attributes.setnameditem element

tempxml.save server.mappath("attr.xml")

%>

如有问题，可以QQ搜索群1028468525加入群聊，欢迎一起研究技术

有疑问联系站长，请联系QQ：