我的csdn博客地址: http://blog.csdn.net/blizzardlyk
QTP中判断Action运行是否超时
上一篇 /
下一篇 2010-08-25 10:39:53
/ 个人分类:QTP
1 需要在环境变量中自定义一个最大超时时间
Environment("MAX_ACTION_TIMEOUT")
2 判断是否超时的方法:
Dim INT_ACTION_STARTTIME_MSEC 'global variable
INT_ACTION_STARTTIME_MSEC = Timer 'start time
Public Function CheckIfActionReachedTimeout()
Dim intElapsedTimeMsec
intElapsedTimeMsec = Timer-INT_ACTION_STARTTIME_MSEC 'calculate time passed
If intElapsedTimeMsec > Environment("MAX_ACTION_TIMEOUT") Then
CheckIfActionReachedTimeout = True
exitaction
else
CheckIfActionReachedTimeout = false
end if
end function
3 使用方法示例代码:
print CheckIfActionReachedTimeout()
相关阅读:
- 【zz】QTP一些宝贵的总结(下 (lovewedy, 2010-8-02)
- QTP在性能测试中的应用 (xin_晴, 2010-8-04)
- QTP对象识别与操作 (lvjz, 2010-8-04)
- QTP加载外部文件函数,三种方法比较 (xin_晴, 2010-8-19)
- QTP---用户指南 (fengzhulin, 2010-8-11)
- qtp使用记录(不断更新) (fengzhulin, 2010-8-23)
- QTP中的Description对象详解 (xin_晴, 2010-8-26)
- QTP运行时,动态加载外部共享对象库 (blizzardlyk, 2010-8-25)
- 使用QTP与Winrar,压缩指定的文件 (blizzardlyk, 2010-8-25)
收藏
举报
TAG:
QTP
判断运行超时