好学IT学院:IT信息技术分享交流平台
标签:ASP  来源:互联网  作者:NC_Editor  发布时间:2008-02-28  ★★★加入收藏〗〖手机版
摘要:使用ASP访问XML文件有两种方式:● 作为文本流的简单结构文件;● 作为XML DOM对象。本文使用的是第二种方式,DOM中常用的方法和属性有:1. CreateObject()方法与load()方法为给出的文件创建DOM,首先要使用Cr……

使用ASP访问XML文件有两种方式:

● 作为文本流的简单结构文件;

● 作为XML DOM对象。

本文使用的是第二种方式,DOM中常用的方法和属性有:

1. CreateObject()方法与load()方法

为给出的文件创建DOM,首先要使用CreateObject()方法创建DOM的实例。

下面是如何使用ASP在服务器上创建DOM的例子:

set oXMLDOM=server.CreateObject (“Microsoft.XMLDOM”)

XML DOM被创建后,它必须装入一个XML文件。例如:

oXMLDOM.load(“d:\students.xml”)

创建了DOM对象并载入了XML文件后,就可以使用DOM的方法和属性来访问文件了。

2. getElementsByTagName()方法

Document对象的getElementsByTagName方法可以取得所有具有所传参数指定的名字的后续元素的列表,

它返回一个NodeList对象。

例如: set recordlist=oXMLDOM.getElements-

ByTagName(“student”)

3. item()方法

nodeList对象的item()方法将一个索引作为参数,返回这个索引位置上的节点。如果这个索引超出了范围,

那么就返回空值。注意:计数器总是从零开始。

4.Length属性

nodeList对象的Length属性返回一个无符号的长整数,为NodeList中节点的个数。

5.Childnodes属性

Childnodes是node对象的一个属性,它返回这个节点的所有子节点的NodeList。

例如: recordlist.item(i).childnodes.item(j)

.text指的是第i+1个student的第j+1个子节点的值(因为计数器总是从零开始)。

假设i=1,j=0,则recordlist.item(i).childnodes.item(j).text的值为“alice”,

即为第2个student的第1个子节点(name)的值。

程序说明

下面的程序访问XML文件students.xml,并将其数据写入数据库ST的students表中。

为了使程序尽量简洁,假设空表students已存在于数据库ST中。程序的实现步骤如下:

1.连接数据库ST,打开表students,创建Recordset对象

Set conn=server.CreateObject(“ADODB

.connection”)

conn.Open “dsn=st;uid=sa;pwd=;database=st”

Set myrecord=server.createobject(“ADODB

.Recordset”)

myrecord.open “students”,conn,1,3

2. 创建DOM的实例oXMLDOM

set oXMLDOM=server.CreateObject (“Microsoft.XMLDOM”)

3. 载入XML文件students.xml

oXMLDOM.load(“d:\students.xml”)

4. 使用DOM的getElementsByTagName()方法创建所有student元素的节点清单

set recordlist=oXMLDOM.getElementsByTag-

Name(“student”)

5.使用一个双重循环将XML文件中的数据读出,写入数据库表中

’用外循环遍历各student

for i=0 to recordlist.length-1

’用内循环取得每个student的各节点的值,存入数组sp

for j=0 to recordlist.item(i).childnodes

.length-1

sp(j)= recordlist.item(i).childnodes

.item(j).text

next

’在表students中增加一条记录,并将数组sp的值写入各字段(注意数据类型的转变)

myrecord.AddNew

myrecord(“name”).value=sp(1)

myrecord(“birthday”).value=cdate(sp(3))

myrecord(“score”).value=cint(sp(4))

myrecord.Update

next

6.关闭所创建的实例与对象

set oxmldom=nothing

set recordlist=nothing

myrecord.Close

Set myrecord=nothing