产生xml文件

<%

Set objXML = Server.CreateObject("Microsoft.XMLDOM")
 objXML.async = False
cpath="F:\盗文章系统"
Set root = objXML.createElement("MyRoot")
Set objXML.documentElement = root

 Set El2 =  objXML.createElement("xx")
  El2.text="11111111111"
 objXML.documentElement.appendChild El2
 response.write cpath
  objXML.save cpath&"\2.xml"

%>