标题: 使用DOM创建XML
问天
元帅
Rank: 1


元帅勋章 终身成就勋章
UID 11493
精华 186
积分 34120
帖子 33346
威望 88
金币 13137
热心 2610
阅读权限 100
注册 2006-4-7
状态 离线
使用DOM创建XML

我以前在介绍XML和让别人试着使用DOM时,不只一个人问过我用DOM是否能用来凭空直接生成一个XML文件。
  当然,这是当然可以的了,其次是怎么写程序呢。

   
  那我就这个问题,专门在这篇文章中用VB和MSXML的COM接口的DOM实现的一个例子来讲一下:      
  首先我要说明的是,我用的MSXML的版本是IE5带的,版本号是5.0.2919.3800,微软的早期版本的接口和新的有些不一样,所以自己编程时,应该看一下她的接口和说明。      
  如果你对vb和COM不太熟悉,看下面的就可能比较费劲了,但VB比起其他的语言实现,应该是比较简单清楚的了。   
  首先声明下面要用的几个对象的变量:      
Dim tempdoc As MSXML.DOMDocument
Dim tempnode As MSXML.IXMLDOMNode
Dim tempelement As MSXML.IXMLDOMElement
Dim tempattribute As MSXML.IXMLDOMElement
Dim root As MSXML.IXMLDOMElement      
  生成一个XML DOMDocument对象

   
Set tempdoc = New MSXML.DOMDocument   
  生成根节点并把它设置为文件的根

   
Set root = tempdoc.createElement("MyRoot")
Set tempdoc.documentElement = root   
  生成孩子节点添加到根节点上去,并且为这个节点设置一个属性   
Set tempnode = tempdoc.createNode(MSXML.NODE_ELEMENT, "MyNode", "")
tempnode.Text = "MyNodeValue"
root.appendChild tempnode   
  取得元素节点的接口,添加属性   
Set tempelement = tempnode
tempelement.setAttribute "MyAttribute", "MyAttributeValue"   
  写xml文件      
Open "MyXMLFile.xml" for output as #1
Print #1, root.XML
Close #1   
  下面就是上面程序生成的XML文件内容:   
   MyNodeValue      
  在MSXML中也有非DOM的接口可以用,这就要看大家自己的用法了。   
    作者:常明/XML China

网友 问天 签名 - 网友社区 请您回个帖。谢谢
PR查询 免费域名 免费空间
顶部
[广告] 免费域名(Free Subdomain) 免费空间(Free hosting) PR查询(Google Pagerank)



当前时区 GMT+8, 现在时间是 2008-8-30 16:59
信产部ICP备案:京ICP备05066424号 北京市公安局网监备案:1101050648号

Powered by Discuz! 5.5.0
清除 Cookies - 联系我们 - 网友俱乐部 - Archiver - WAP