51Testing软件测试论坛

 找回密码
 (注-册)加入51Testing

QQ登录

只需一步,快速开始

微信登录,快人一步

手机号码,快捷登录

查看: 4710|回复: 5
打印 上一主题 下一主题

[Robot] 求助:robot 如何进行循环?

[复制链接]

该用户从未签到

跳转到指定楼层
1#
发表于 2004-8-9 15:03:32 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
Sub Main
    Dim Result As Integer

    'Initially Recorded: 2004-8-9  11:59:48
    'Script Name: jiaoseshanchu
   
    Window SetContext, "Caption=http://192.168.102.252:7001/adm/welcome.jsp - Microsoft Internet Explorer", ""
    Browser SetFrame,"Type=HTMLFrame;HTMLId=mainFrame",""
    Browser NewPage,"HTMLTitle=角色管理",""
   
    HTMLLink Click, "Type=HTMLLink;HTMLText=229", ""
    PushButton Click, "Type=PushButton;Name=delete"
   
    Window SetContext, "Caption=Microsoft Internet Explorer", ""
    PushButton Click, "Text=确定"
   

End Sub
上面是删除id号为229的记录,若我想删除229-240号的记录,如何进行循环操作呢,谢谢各位大侠了。。。。。。。。。。。。
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏

该用户从未签到

2#
发表于 2004-8-9 16:38:51 | 只看该作者

循环

可以将要删除的id号定义 为变量,利用for循环语句,使变量自动增加,形成循环就行了
定义id号变量  dim  id as integer
定义循环变量 dim i as integer
把你执行脚本放在for循环中,可以实现循环回放
将HTMLLink Click, "Type=HTMLLink;HTMLText=229", ""
229 换成 id   
别忘了 把id加1
回复 支持 反对

使用道具 举报

该用户从未签到

3#
 楼主| 发表于 2004-8-10 10:20:42 | 只看该作者
小颖_hlj,你看我这个循环可以么,怎么还是还是执行不下去呢,你可别笑我笨哦 ,新手上路,大家多多指点
id=234
  
   do
   
   HTMLLink Click, "Type=HTMLLink;HTMLText=id", ""
   PushButton Click, "Type=PushButton;Name=delete"
  
   id=id+1
   loop  while id<237
   
    Window SetContext, "Caption=Microsoft Internet Explorer", ""
    PushButton Click, "Text=确定"

End Sub
回复 支持 反对

使用道具 举报

该用户从未签到

4#
发表于 2004-8-12 09:04:35 | 只看该作者
For id=229 to 240
       Browser NewPage,"HTMLTitle=角色管理",""
        HTMLLink Click, "Type=HTMLLink;HTMLText=" & cstr(id),""
        PushButton Click, "Type=PushButton;Name=delete"  
     
    Window SetContext, "Caption=Microsoft Internet Explorer", ""
    PushButton Click, "Text=确定"

Next   
没看到你的程序,可能for 循环嵌套位置要有所调整
回复 支持 反对

使用道具 举报

该用户从未签到

5#
 楼主| 发表于 2004-8-12 10:08:15 | 只看该作者
问题已经解决了, 谢谢大家
回复 支持 反对

使用道具 举报

该用户从未签到

6#
发表于 2004-9-17 14:49:25 | 只看该作者
我录的是这样的,就是删除一条记录的操作,要怎么样让他循环多次呢。

   sub main
    'Initially Recorded: 2004-9-17  13:32:17
    'Script Name: 1
  
    Window SetContext, "Caption=Newtouch ONE! - Microsoft Internet Explorer", ""
    Browser SetFrame,"Type=HTMLFrame;HTMLId=Main_frame",""
    HTMLTable Click, "Type=HTMLTable;Index=3", "Row=2;Col=5"
    Browser NewPage,"",""
    PushButton Click, "Type=PushButton;Name=delB"
   
    Window SetContext, "Caption=Microsoft Internet Explorer", ""
    PushButton Click, "Text=确定"


    End Sub
回复 支持 反对

使用道具 举报

本版积分规则

关闭

站长推荐上一条 /1 下一条

小黑屋|手机版|Archiver|51Testing软件测试网 ( 沪ICP备05003035号 关于我们

GMT+8, 2024-11-15 00:49 , Processed in 0.085714 second(s), 27 queries .

Powered by Discuz! X3.2

© 2001-2024 Comsenz Inc.

快速回复 返回顶部 返回列表