51Testing软件测试论坛

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

QQ登录

只需一步,快速开始

微信登录,快人一步

手机号码,快捷登录

查看: 2680|回复: 7
打印 上一主题 下一主题

[原创] 关于用QTP为xml文件自动添加信息的问题

[复制链接]

该用户从未签到

跳转到指定楼层
1#
发表于 2006-10-19 16:07:00 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
众所周知,用QTP能在网页上需要输入参数的地方参数化,能达到自动添加的效果。而我现在需要对xml文件添加信息,不知道可以吗?有知道的烦请告诉我,请看下面的xml文件内容:
<?xml version="1.0" standalone="yes"?>
<MonitorPlanList xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns="http://tempuri.org/MonitorPlanList.xsd">
  <MonitorPlan nodeID="1" timePlanID="1">
    <MonitorInstance id="1" nodeID="1" name="192.168.18.23-ping" monitorID="1100" interval="10">
      <Param paramName="SENDNUM" monitorInstanceID="1">3</Param>
    </MonitorInstance>
  </MonitorPlan>
</MonitorPlanList>
     我想让MonitorInstance id值自动增加到200个,并且name的值也自动增加到200个,如下的效果:(我只增加MonitorInstance id到2,红色部分就是我添加的)
<?xml version="1.0" standalone="yes"?>
<MonitorPlanList xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns="http://tempuri.org/MonitorPlanList.xsd">
  <MonitorPlan nodeID="1" timePlanID="1">
    <MonitorInstance id="1" nodeID="1" name="192.168.18.23-ping" monitorID="1100" interval="10">
      <Param paramName="SENDNUM" monitorInstanceID="1">3</Param>
    </MonitorInstance>
    <MonitorInstance id="2" nodeID="1" name="192.168.18.23-ping02" monitorID="1100" interval="10">
      <Param paramName="SENDNUM" monitorInstanceID="1">3</Param>
    </MonitorInstance>
  </MonitorPlan>
</MonitorPlanList>
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏
回复

使用道具 举报

该用户从未签到

2#
发表于 2006-10-20 10:40:30 | 只看该作者
QTP能够处理xml文件,你这只是让QTP写xml文件吧.有关xml的内容,有帖子讲到过.
回复 支持 反对

使用道具 举报

该用户从未签到

3#
 楼主| 发表于 2006-10-20 10:50:42 | 只看该作者
是啊,我这就是要写xml文件,要把MonitorInstance id递增到2000。请问xiaonan版主,有关这方面的帖子具体在那里啊?我找过,似乎很难找噢。
回复 支持 反对

使用道具 举报

该用户从未签到

4#
发表于 2006-10-20 10:53:44 | 只看该作者
就在这个版快里,我都看到过的
回复 支持 反对

使用道具 举报

该用户从未签到

5#
 楼主| 发表于 2006-10-20 11:19:27 | 只看该作者
好,我再找找 谢谢
回复 支持 反对

使用道具 举报

该用户从未签到

6#
 楼主| 发表于 2006-10-23 16:49:26 | 只看该作者
怎么也找不到,哎。。 有人有现成的资料吗? 谢谢。。
回复 支持 反对

使用道具 举报

该用户从未签到

7#
发表于 2006-12-28 17:40:16 | 只看该作者
下面是我写的,希望能帮上你,不过双引号没了.




Set doc = XMLUtil.CreateXML()

doc.CreateDocument "root"

Set root = doc.GetRootElement()

Dim rc :  rc = micPass

For n= 1 to 9

root.AddChildElementByName "MonitorInstance",""
Set children = root.ChildElements()
str1= "id="&n
'msgbox str1
ip = "192.168.18.23-ping"
str2=" name="&cstr(ip)&n
'msgbox str2
num1="1"
num2="1100"
num3 = "10"
If rc = micPass  Then   str3 =cstr(str1)&"nodeID="&cstr(num1) &cstr(str2)&" monitorID="&cstr(num2  )&"interval="&cstr(num3)   End If
'msgbox str3
If rc = micFail   Then  str3 = "第 "&N&"        次测试Fail"  End If
root.AddChildElementByName "Result"&n,str3
doc.SaveFile "c:\report.xml".

Next
回复 支持 反对

使用道具 举报

该用户从未签到

8#
发表于 2009-12-12 16:13:13 | 只看该作者

回复 7# 的帖子

doc.SaveFile "c:\report.xml"放在循环里面,循环N次不就写N次文件?!
虽然最后的结果一样~~~囧~~~~
回复 支持 反对

使用道具 举报

本版积分规则

关闭

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

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

GMT+8, 2024-11-8 19:28 , Processed in 0.078545 second(s), 27 queries .

Powered by Discuz! X3.2

© 2001-2024 Comsenz Inc.

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