请高手帮助，QTP的一段脚本怎么改？

deargodlove

Window("SecureCRT").Restore
Window("SecureCRT").Activate
Window("SecureCRT").WinObject("AfxFrameOrView80u").Click 310,334
Window("SecureCRT").WinObject("AfxFrameOrView80u").Type "1"
Window("SecureCRT").WinObject("AfxFrameOrView80u").Type  micReturn
Window("SecureCRT").WinObject("AfxFrameOrView80u").Click 270,426

-----------------
以上这些是录制的脚本，怎么加函数使  当“1”这块  小于100时，一直循环执行这两句？？？
Window("SecureCRT").WinObject("AfxFrameOrView80u").Type "1"
Window("SecureCRT").WinObject("AfxFrameOrView80u").Type  micReturn

deargodlove

咋没人帮助呢？？？？？？？？

peimzh

首先请问LZ变量是多少，比如A=132

那代码如下：
Window("SecureCRT").Restore
Window("SecureCRT").Activate
Window("SecureCRT").WinObject("AfxFrameOrView80u").Click 310,334
for i = 1 to A
       if i< 100 then
               Window("SecureCRT").WinObject("AfxFrameOrView80u").Type A
               Window("SecureCRT").WinObject("AfxFrameOrView80u").Type  micReturn
        end if
Next
Window("SecureCRT").WinObject("AfxFrameOrView80u").Click 270,426
不知道你是否是这个意思？

lyscser

Terminal字符段？有对应的插件木？有插件应该比较简单那

deargodlove

原帖由 peimzh 于 2009-5-5 22:49 发表
首先请问LZ变量是多少，比如A=132

那代码如下：
Window("SecureCRT").Restore
Window("SecureCRT").Activate
Window("SecureCRT").WinObject("AfxFrameOrView80u").Click 310,334
for i = 1 to A
       if  ...

感谢，是这样的
这句应该是Window("SecureCRT").WinObject("AfxFrameOrView80u").Type "table 1"
如何只变"table 1"中的1，而table不变？

dabie

try
"table" & i

阿七

如何只变"table 1"中的1，而table不变？  
那就定2个参数嘛   呵呵  
1个变的  1个不变的

deargodlove

原帖由 阿七 于 2009-5-6 17:55 发表
如何只变"table 1"中的1，而table不变？  
那就定2个参数嘛   呵呵  
1个变的  1个不变的

怎么弄啊？麻烦给改一下呗  新手  不会

fly_away

偶猜的
貌4用这个
具体循环参考上面朋友的，偶只是把 i 转化成文本，然后与"table"连接，这样应该可以行得通

……
Window("SecureCRT").WinObject("AfxFrameOrView80u").TYPE "table "+cstr(i)
……
……

::yxiao:::
试试，要不行再来讨论

[ 本帖最后由 fly_away 于 2009-5-9 02:15 编辑 ]