您现在的位置是:网站首页> 编程资料编程资料

从XML文件中获取信息的vbs代码_vbs_

2023-12-09 173人已围观

简介 从XML文件中获取信息的vbs代码_vbs_

复制代码 代码如下:

'*****************************************************************
'** Script: getxmlelement.vbs
'** Version: 1.0
'** Created: 1/8/2009 10:58PM
'** Author: Adriaan Westra
'** E-mail:
'** Purpose / Comments:
'** Get an element from a xml file
'**
'**
'** Changelog :
'** 1/8/2009 10:58PM : Initial version
'**
'*****************************************************************
Dim objXML ' object to hold the xml document
Dim objNnode ' xml node object

'*****************************************************************
'** create the xml object
Set objXML = CreateObject("Msxml2.DOMDocument.6.0")

'*****************************************************************
'** Load the xml from file
objXML.load("album.xml")
'*****************************************************************
'** Set language for finding information to XPath
objXML.setProperty "SelectionLanguage", "XPath"
'*****************************************************************
'** Get a reference to the node
Set objNode = objXML.selectSingleNode("/album/DSC_2710/title")
'*****************************************************************
'** Output the requested text
wscript.echo "Title : " & objNode.text

The sample xml file used by the script :
复制代码 代码如下:



Bloemen

Pioenroos
Pioenroos


DSC_4777
DSC_4777


Vingerhoedskruid
Vingerhoedskruid


Lavendel
Lavendel


Zonnebloem
Zonnebloem


-六神源码网