以文本方式查看主题

-  计算机科学论坛  (http://bbs.xml.org.cn/index.asp)
--  『 XML基础 』  (http://bbs.xml.org.cn/list.asp?boardid=1)
----  ASP操作XML数据  (http://bbs.xml.org.cn/dispbbs.asp?boardid=1&rootid=&id=233)


--  作者:caca
--  发布时间:11/26/2003 12:40:00 AM

--  ASP操作XML数据
ASP操作XML数据
*****************************
**   ASP操作XML数据
**    Author:caca
**     qq:154222225
**   Mail:root@3ney.com
**    2003.11.21@zzu
******************************
NO.1--建立一个XML数据库data.xml
      <?xml version="1.0"?>
      <records>
         <record>
            <name>caca</name>
            <qq>154222225</qq>
            <email>root@3ney.com</email>
         </record>
       <records>
NO.2--建立对象CreateObject
      建立data.xml的对象先
      set xmldoc=server.createobjcet("microsoft.xmldom")
      xmldoc.load(server.mappath("data.xml")

NO.3--选定节点SelectNode
      你想操作哪个Node,必须定位到这个节点是不是,先看看这个data.xml有几个Node??
      用一个递归函数搞定:
      getnodes(xmldoc)

      sub getnodes(node)
       dim i
         response.write("<br><b>NodeName:</b>"&node.nodename&"<br><b>NodeTypeString:</b>"&node.nodetypestring&"<br><b>Nodevalue:</b>"&node.nodevalue&"<br><b>Text:</b>"&node.text&"<br><b>node.childnodes.length:</b>"&node.childnodes.length&"<p>")

           if node.childnodes.length<>0 then
                  for i=0 to node.childnodes.length-1
                  getnodes(node.childnodes(i))
              next
       end if
       end sub
       用这个函数后,可以看到这个data.xml有10个Node
       这些Node可以很简单的定位:
       xmldoc
       xmldoc.childnodes(0)
       xmldoc.childnodes(1)
       xmldoc.childnodes(1).childnodes(0)
       xmldoc.childnodes(1).childnodes(0).childnodes(0)
       xmldoc.childnodes(1).childnodes(0).childnodes(0).text
       xmldoc.childnodes(1).childnodes(0).childnodes(1)
       xmldoc.childnodes(1).childnodes(0).childnodes(1).text
       xmldoc.childnodes(1).childnodes(0).childnodes(2)
       xmldoc.childnodes(1).childnodes(0).childnodes(2).text
       是不是定位很简单呀,还有个方法,比如定位<name>
       xmldoc.selectsinglenode("//name")
       
NO.4--给节点赋值(修改节点的值)
       学会了定位节点,利用其属性,就可以修改或者赋值了
       例如,把<name>的值caca改为wawa
       xmldoc.selectsinglenode("//name").text="wawa"
       xmldoc.save(server.mappath("data.xml"))
       搞定!
NO.5--创建新的节点CreatenewNode
       用createelement或者createnode("","","")
       例如:在record下新建个<age>,只需要一句就搞定:
       xmldoc.selectsinglenode("//record").appendchild(xmldoc.createelement("<age>"))
       给<age>赋值
       xmldoc.selectsinglenode("//age").text="20"
       xmldoc.save(server.mappath("data.xml"))
       搞定!
NO.6--删除一个节点DeleteNode
       你必须明确你想删除的这个节点的父节点,以及这个节点的特征
       例如:删除<qq>节点
       xmldoc.selectsinglenode("//record").removechild(xmldoc.selectsinglenode("//qq"))
       例如:删除那个<name>=caca的<record>
       xmldoc.selectsinglenode("//records").removechild(xmldoc.selectsinglenode("//record[name='caca']))
       xmldoc.save(server.mappath("data.xml"))
       搞定!
只有能熟练这6条code,用asp控制xml数据库,也就差不多了...
等两天写个XML留言本子来也不是很复杂的(以前用vbs写的,可以查询,可以到http://www2.zzu.edu.cn/ie/dvbbs看看).
闪人......
******************
卡卡(caca)@zzu.ie  2003.1121

----------------------------------------------
*ML & DataBase is my love!!
qq:154222225


--  作者:admin
--  发布时间:11/26/2003 12:45:00 AM

--  
嗯。。可以考虑开一个XML源码版了。。
--  作者:阳光小虾
--  发布时间:11/26/2003 8:07:00 PM

--  艾。。。
偶看了它的原代码,虽然注释很多,可是我还是看不懂,不会用。。。555。。。
--  作者:wyw_email
--  发布时间:11/29/2003 2:38:00 PM

--  

--  作者:yedengzhou
--  发布时间:12/2/2003 11:59:00 PM

--  
很难看懂
W 3 C h i n a ( since 2003 ) 旗 下 站 点
苏ICP备05006046号《全国人大常委会关于维护互联网安全的决定》《计算机信息网络国际联网安全保护管理办法》
72.266ms