在QTP中巧用Execute语句

以前也介绍过Execute 的用法,这个用法在一些特殊时候很有用的.
x="4"
Execute "Dim A_" & x
Execute "A_" & x &"=99"
Msgbox Eval("A_" & x)  
Msgbox A_4
这个结果就是都会输出99，也就是说
Execute "Dim A_" & x
Execute "A_" & x &"=99"
这段代码实现功能是
Dim A_4
A_4=99
但是这个方法就是可以动态的给变量赋值。
比如我们可以把脚本作为变量来放在datatable里。
我的原始脚本是这样的：
Browser("Welcome: Mercury Tours").Page("Welcome: Mercury Tours").WebEdit("userName").Set "sss"
于是我在Action1里建一个Date
sTemp=DataTable.RawValue ("Date","Action1")
Execute "Set L = " & sTemp
L.Set "sss"
在自动脚本实现这又给我们一个思路，甚至我们可以把它引入到php?name=%D7%D4%B6%AF%BB%AF">自动化测试里面去，相信是一个不错的值得研究的方向。