51Testing软件测试论坛

 找回密码
 (注-册)加入51Testing

QQ登录

只需一步,快速开始

微信登录,快人一步

手机号码,快捷登录

查看: 5878|回复: 8
打印 上一主题 下一主题

[原创] 请问qtp里如何灵活使用xml文件?

[复制链接]

该用户从未签到

跳转到指定楼层
1#
发表于 2008-12-26 09:41:10 | 只看该作者 回帖奖励 |正序浏览 |阅读模式
我需要把测试的数据写入xml,测试的流程也要从xml中读取,需要测试的控件也要由xml来标示,请问有没有什么好方法?我以前在QTP查看xml文件用的是activex里的msxml,但是不是很实用。
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏
回复

使用道具 举报

该用户从未签到

9#
发表于 2008-12-31 16:15:02 | 只看该作者
说实在的,要是能有有关CreateObject的一个汇总资料该多好啊`~~`
回复 支持 反对

使用道具 举报

该用户从未签到

8#
发表于 2008-12-30 22:58:55 | 只看该作者

回复 3# 的帖子

如果你觉得.net方便的话,完全可以把这部分放在.net里面来做,再由QTP去调啊。
回复 支持 反对

使用道具 举报

该用户从未签到

7#
发表于 2008-12-30 15:13:01 | 只看该作者

  路过 打酱油的  顺便学习一下
回复 支持 反对

使用道具 举报

该用户从未签到

6#
发表于 2008-12-30 10:09:52 | 只看该作者
Set xmlDoc = Nothing

Set xmlDoc = CreateObject("Msxml2.DOMDocument")

'loadXML

xmlDoc.load("C:\ApplyWeb_getPrescreenData.xml")

Set root = xmlDoc.documentElement

Set objChildNodes = root.getElementsByTagName("stns:firstName")

'Set objChildNodes = xmlDoc.childNodes

numberof=objChildNodes.length

msgbox numberof

For i = 0 to objChildNodes.length-1

   msgbox "Nodename: " &  objChildNodes(i).nodeName

   msgbox "Nodetype: " &  objChildNodes(i).nodeType

   msgbox "NodeValue: " & objChildNodes(i).Text

Next
回复 支持 反对

使用道具 举报

该用户从未签到

5#
 楼主| 发表于 2008-12-30 09:45:27 | 只看该作者
原帖由 asoqa 于 2008-12-27 16:39 发表
不太清楚你所说的".net操纵xml文件十分的方便"指的是什么?是用XMLReader吗?
如果觉得XMLUtil不能满足要求,或者可以试试XMLDom,其他的用法我不太清楚了。

大侠能不能给个vbs或是qtp下面使用xmldom的教学?
回复 支持 反对

使用道具 举报

该用户从未签到

4#
发表于 2008-12-27 16:39:42 | 只看该作者

回复 3# 的帖子

不太清楚你所说的".net操纵xml文件十分的方便"指的是什么?是用XMLReader吗?
如果觉得XMLUtil不能满足要求,或者可以试试XMLDom,其他的用法我不太清楚了。
回复 支持 反对

使用道具 举报

该用户从未签到

3#
 楼主| 发表于 2008-12-26 18:17:29 | 只看该作者
多谢,但是感觉qtp里面的xmlutil不是很适合大数据量的xml文件,我看.net里面操纵xml文件十分的方便,不知道在qtp里面能不能拿来使用?
回复 支持 反对

使用道具 举报

该用户从未签到

2#
发表于 2008-12-26 15:46:39 | 只看该作者
看一下XMLUtil的QTP帮助,看是否能满足你的要求。下面是帮助中的一段示例:
Set doc = XMLUtil.CreateXML()
doc.LoadFile "c:\example.xml"
Set root = doc.GetRootElement()
Set attribs = root.Attributes()
numOfAttr = attribs.Count()
i = 1
While i <= numOfAttr
Set attr = attribs.Item(i)
nameStr = attr.Name()
valStr = attr.Value()
attrStr = attrStr + nameStr+"="+chr(34)+valStr+chr(34) + " "
i = i+1
Wend
msgbox "Attributes: " + attrStr

[ 本帖最后由 asoqa 于 2008-12-26 15:47 编辑 ]
回复 支持 反对

使用道具 举报

本版积分规则

关闭

站长推荐上一条 /1 下一条

小黑屋|手机版|Archiver|51Testing软件测试网 ( 沪ICP备05003035号 关于我们

GMT+8, 2024-11-9 09:41 , Processed in 0.069057 second(s), 29 queries .

Powered by Discuz! X3.2

© 2001-2024 Comsenz Inc.

快速回复 返回顶部 返回列表