QTP LR JSP ORACLE

QTP知识点

上一篇 / 下一篇  2008-12-17 13:06:41 / 个人分类:QuickTestProfessional

1.启动

SystemUtil.Run和InvokeApplication

例子:

SystemUtil.Run "D:\Program Files\HP\QuickTest Professional\samples\flight\app\flight4a.exe"

InvokeApplication "D:\Program Files\HP\QuickTest Professional\samples\flight\app\flight4a.exe"

SystemUtil.Run "iexplore.exe","www.baidu.com",,,3

InvokeApplication "C:\Program Files\Internet Explorer\IEXPLORE.EXEhttp://www.google.cn/"

2.设置环境参数,并读取

1)手动设置:file-settings-environment,选择build in,添加参数和值,并可以导出为xml文件

2)可以自己直接创建修改xml文件,格式如下:

xml文件的格式为:

================================================

<Environment>
 <Variable>
  <Name>UserID</Name>
  <Value>founder</Value>
 </Variable>
 <Variable>
  <Name>pwd</Name>
  <Value>112</Value>
 </Variable>
</Environment>

=================================================

3)通过语句读xml文件,并设置为环境参数

例子:

Environment.LoadFromFile "G:\qtpscrīpt\peixun\liufei.xml"
Dim tmp_ID,tmp_pwd
tmp_ID= Environment.Value ("UserID")
tmp_pwd= Environment.Value ("pwd")
msgbox environment.ExternalFileName
msgbox tmp_ID
msgbox tmp_pwd

4)优点:任何action可以调用。

如:设置路径为环境参数,以后脚本转移了,直接修改xml里路径的值就可以了。(?待实践)

3.导出QTP的EXCEL文件,读取默认格式的xls文件(有Global,Action1)

例子:导出excel文件,读取文件,并读取具体字段

Dim tmp_pwd
Datatable.Export "G:\qtpscrīpt\peixun\test.xls"                                                
Datatable.Import "G:\qtpscrīpt\peixun\test.xls"
tmp_pwd = datatable.RawValue("Password","Action1")
msgbox tmp_pwd

4.读取自己定义的xls文件

例子:读取自己定义的xls文件,取值

自己定义的xls文件,取出,替换到ACTION1的值。
Datatable.ImportSheet "G:\qtpscrīpt\peixun\test1.xls",1,"Action1"  
'设置当前读取第几行     
datatable.SetCurrentRow(2)   
tmp_pwd=Datatable.RawValue("Password","Action1")                            
msgbox tmp_pwd
Dim tmp_user 
tmp_user=datatable.RawValue("UserID","Action1")
msgbox tmp_user

5.显示当前执行excel的行数

Dim tmp
datatable.SetCurrentRow(2)
datatable.SetPrevRow
datatable.SetNextRow
tmp=datatable.RawValue("row","Action1")
msgbox tmp
tmp=datatable.RawValue("row","Action1")
msgbox tmp

6.语句调用vbs函数

ExecuteFile  "c:\my.vbs"
或者:systemutil.Run   "c:\my.vbs"


TAG:

 

评分:0

我来说两句

日历

« 2024-05-01  
   1234
567891011
12131415161718
19202122232425
262728293031 

数据统计

  • 访问量: 71492
  • 日志数: 117
  • 图片数: 1
  • 文件数: 1
  • 建立时间: 2007-05-07
  • 更新时间: 2011-06-16

RSS订阅

Open Toolbar