1.新打开一个IE,网址为www.baidu.com
systemutil.Run "iexplore.exe","http://www.baidu.com"
2.页面跳转
Browser("软酷.人力资源引擎").Navigate "http://www.baidu.com"
3.关闭所有的IE
iecount = systemutil.CloseProcessByName ("iexplore.exe") '关闭所有的IE
msgbox (iecount) '关闭IE的数量
4.导入数据表
datatable.ImportSheet "C:\pp.xls","Sheet1","Global"
5.导出数据表
datatable.Export ("C:\gg.xls") '将所有的表都导出到相应文件中
datatable.ExportSheet "C:\bb.xls","Action1" '将Action1这个表导出到相应文件中
6.创建action template.
当希望在每一个新建action时都增加一些头部说明,比如作者、创建日期、说明等,用action template
来实现最简单快捷。
方法:用记事本等文本编辑器,输入如下类似的内容:
'***************Information About scrīpt***************
'Company: broadengate
'Author: iori
'Product: ruanko
'Date: YYYY-MM-DD
'******************************************************
然后将文件保存为ActionTemplate.mst,并存放到QTP安装目录下的dat目录,重启QTP,新建的action会包含以上信息。
7.ChildObjects的应用
'该代码实现选中页面中所有checkbox的功能
Set gg = descrīption.Create()
gg("type").value = "checkbox"
set aa = Browser("软酷.人力资源引擎").Page("IT技能测评 - 软酷.人力资源引擎").ChildObjects(gg)
n = aa.count()
For i = 0 to n-1 count是由0开始计数的,如果写成i = 1 to n,回放时就会报错.
aa(i).set "on"
Next
8.ExitAction
用结束当前Action的运行,不牵涉其它的Action的运行情况。如果在脚本出现运行错误或者说在循环的跳出条件的约束下结束运行,就不应该使用这个函数,因为很可能结束当前Aciotn的运行之后,其它的Action将会开始运行。
9.ExitRun
这是最彻底的结束运行的方式,如果是在交易(运行)出错的情况下,决定停止执行当前交易,则一般使用判断条件的约束强制结束脚本的运行。这时候的结束需要彻底,就使用该函数,这个函数不需要任何参数,直接就停止所有运行。
10.时间日期加减运算
使用dateadd("y/m/d",天数,基础日期)可以搞定.
例如:
a = date()
b = dateadd("m",1,a) '当前月向后推一个月
c = dateadd("d",-15,a) '当前天向前推15天