deargodlove 发表于 2009-5-5 16:08:09

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

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

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

deargodlove 发表于 2009-5-5 22:40:35

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

peimzh 发表于 2009-5-5 22:49:58

首先请问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").TypemicReturn
      end if
Next
Window("SecureCRT").WinObject("AfxFrameOrView80u").Click 270,426
不知道你是否是这个意思？

lyscser 发表于 2009-5-5 23:28:42

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

deargodlove 发表于 2009-5-6 10:25:59

原帖由 peimzh 于 2009-5-5 22:49 发表 http://bbs.51testing.com/images/common/back.gif
首先请问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 发表于 2009-5-6 17:27:29

try
"table" & i

阿七 发表于 2009-5-6 17:55:45

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

deargodlove 发表于 2009-5-7 11:06:49

原帖由 阿七 于 2009-5-6 17:55 发表 http://bbs.51testing.com/images/common/back.gif
如何只变"table 1"中的1，而table不变？
那就定2个参数嘛   呵呵
1个变的1个不变的

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

fly_away 发表于 2009-5-9 02:12:18

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

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

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

[ 本帖最后由 fly_away 于 2009-5-9 02:15 编辑 ]
页: [1]
查看完整版本: 请高手帮助，QTP的一段脚本怎么改？