未来已来

qtp动态脚本执行-Execute

上一篇 / 下一篇  2008-07-08 14:15:29 / 个人分类:自动化测试

动态脚本代码执行,灵活性在于字符串的组合,如何让脚本动态执行关键是Execute

样例代码如下:

Systemutil.Run "notepad.exe"

Window("记事本").Activate
Window("记事本").WinMenu("Menu").Select "帮助(H);关于记事本(A)"

tempString= "Window(""记事本"").Dialog(""关于 记事本"").WinButton(""确定"")"

pcl_Click tempString

'------------------------------------------
Function pcl_Click(ByVal str)
 Dim obj
 Execute "Set ōbj = " & str '关键点
 obj.Click
End Function

'-------------------------------------------

 


TAG: 自动化测试

引用 删除 jgriffin   /   2009-12-03 19:02:38
5
 

评分:0

我来说两句

Open Toolbar