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

发布时间：2016-12-03 16:41:33 所属栏目：Asp教程来源：站长网

导读：复制代码代码如下: '***************************************************************** '** Script: getxmlelement.vbs '** Version: 1.0 '** Created: 1/8/2009 10:58PM '** Author: Adriaan Westra '** E-mail: '** Purpose / Comments: '** Get an

复制代码代码如下:
'*****************************************************************
'** 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 :
复制代码代码如下:
lt;?xml version="1.0"?gt;
lt;albumgt;
lt;titlegt;Bloemenlt;/titlegt;
lt;DSC_2710gt;
lt;altgt;Pioenrooslt;/altgt;
lt;titlegt;Pioenrooslt;/titlegt;
lt;/DSC_2710gt;
lt;DSC_4777gt;
lt;altgt;DSC_4777lt;/altgt;
lt;titlegt;DSC_4777lt;/titlegt;
lt;/DSC_4777gt;
lt;DSC_4787gt;
lt;altgt;Vingerhoedskruidlt;/altgt;
lt;titlegt;Vingerhoedskruidlt;/titlegt;
lt;/DSC_4787gt;
lt;DSC_4899gt;
lt;altgt;Lavendellt;/altgt;
lt;titlegt;Lavendellt;/titlegt;
lt;/DSC_4899gt;
lt;DSC_5003gt;
lt;altgt;Zonnebloemlt;/altgt;
lt;titlegt;Zonnebloemlt;/titlegt;
lt;/DSC_5003gt;
lt;/albumgt;

（编辑：PHP编程网 - 黄冈站长网）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!