51Testing软件测试论坛

标题: 如何读取XML文件的内容 [打印本页]

作者: aries1979 时间: 2005-7-26 10:38
标题: 如何读取XML文件的内容
因为要进行数据验证，如何按一定格式（比如指定读取某个XML TAG里的内容）？

作者: DontTest 时间: 2005-8-17 16:30
标题: 希望对你有帮助.
Dim xmlDoc As Object
Dim x As Object
Dim y As Object
Dim xml as stirng
Dim i,ii as interger

xml="c:\test\xmltest.xml"
Set xmlDoc = CreateObject("Microsoft.XMLDOM")
xmlDoc.async = "false"
xmlDoc.Load (xml) 'xml是你制定的xml文件
Set x = xmlDoc.getElementsByTagName("Option")
For i = 1 To x.length()
   msgbox x.Item(i - 1).getAttribute("id")
         For ii = 1 To x.Item(i - 1).childNodes.length
            Set y = x.Item(i - 1).childNodes.Item(ii - 1)
            msgbox CStr(y.Text)
         Next
next

作者: 战神 时间: 2005-8-19 09:42
楼上的能不能对你的代码稍做一下解释啊？不是很明白呀

作者: wsly 时间: 2005-8-20 20:07
haotie!

作者: wsly 时间: 2005-8-20 20:14
不过现在robot还没装起来,没发子试过,有谁试试先?
我以前是用xslt先解析一遍做的.

欢迎光临 51Testing软件测试论坛 (http://bbs.51testing.com/)