上证指数构成

老鼠哥|网络站长门户网,PHP工程师,PHP教程,PHP100,PHP源码,PHP程序员
  • 老鼠哥网络站长门户改版新上线
  • 欢迎您老鼠哥网络门户网
  • 老鼠哥网络站长门户改版新上线
  • 欢迎您老鼠哥网络门户网

使用DOM创建XML

出处:老鼠哥站长网 作者:老鼠哥 日期:2012-05-24 16:42 浏览:次
使用DOM创建XML,我以前在介绍xml和让别人试着使用DOM时,不只一个人问过我用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的接口可以用,这就要看大家自己的用法了。

顶一下
(0)
0%
踩一下
(0)
0%
最新评论
发表评论
请自觉遵守互联网相关的政策法规,严禁发布色情、暴力、反动的言论。
评价:
表情:
验证码:点击我更换图片

上证指数构成