51Testing软件测试论坛

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

QQ登录

只需一步,快速开始

微信登录,快人一步

手机号码,快捷登录

查看: 3939|回复: 3
打印 上一主题 下一主题

[Robot] 下拉框选年份,月份,我想让它做循环,每次可以改变年份,月份,要怎么做呢?

[复制链接]

该用户从未签到

跳转到指定楼层
1#
发表于 2004-10-21 11:52:12 | 只看该作者 回帖奖励 |正序浏览 |阅读模式
Sub Main
    Dim Result As Integer
   
    'Initially Recorded: 2004-10-21  11:22:30
    'Script Name: newtouch1
   
   
    Window SetContext, "Caption=Newtouch ONE! - Microsoft Internet Explorer", ""
    Browser SetFrame,"Type=HTMLFrame;HTMLId=left;\;Type=HTMLFrame;HTMLId=forumList",""
    HTML Click, "Type=HTML;HTMLId=txt1_2_2", "Coords=38,2"
    Browser SetFrame,"Type=HTMLFrame;HTMLId=Main_frame",""
    Browser NewPage,"",""
    PushButton Click, "Type=PushButton;HTMLText=新  增"
    Browser NewPage,"",""
    ComboBox Click, "Type=ComboBox;Name=chyear", ""
   
    ComboListBox Click, "Type=ComboListBox;Name=chyear", "text=2004"
    ComboBox Click, "Type=ComboBox;Name=chmonth", ""
    ComboListBox Click, "Type=ComboListBox;Name=chmonth", "Text=1"

End Sub

这是一部分代码,下拉框选年份,月份,我想让它做循环,每次可以改变年份,月份,要怎么做呢?
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏

该用户从未签到

4#
 楼主| 发表于 2004-10-22 11:06:12 | 只看该作者

谢谢

OK了。谢谢。
回复 支持 反对

使用道具 举报

该用户从未签到

3#
 楼主| 发表于 2004-10-22 10:09:35 | 只看该作者

不用datapool可以吗?

不用datapool可以吗?
回复 支持 反对

使用道具 举报

该用户从未签到

2#
发表于 2004-10-21 15:44:52 | 只看该作者
Sub Main
    Dim Result As Integer
   
    'Initially Recorded: 2004-10-21  11:22:30
    'Script Name: newtouch1
   ‘------------------------------------
   '添加代码
   '------------------------------------
   dim tm as string
   dim m as  string
   
   tm = '2003'
   m= '2'
   
   
    Window SetContext, "Caption=Newtouch ONE! - Microsoft Internet Explorer", ""
    Browser SetFrame,"Type=HTMLFrame;HTMLId=left;\;Type=HTMLFrame;HTMLId=forumList",""
    HTML Click, "Type=HTML;HTMLId=txt1_2_2", "Coords=38,2"
    Browser SetFrame,"Type=HTMLFrame;HTMLId=Main_frame",""
    Browser NewPage,"",""
    PushButton Click, "Type=PushButton;HTMLText=新  增"
    Browser NewPage,"",""
    ComboBox Click, "Type=ComboBox;Name=chyear", ""
   
    ComboListBox Click, "Type=ComboListBox;Name=chyear", "text=" + tm
    ComboBox Click, "Type=ComboBox;Name=chmonth", ""
    ComboListBox Click, "Type=ComboListBox;Name=chmonth", "Text=" + m
End Sub

代码中我只是告诉你传递变量
你的变量用datapool代替处理,做成循环,就可以实现你的目的
做成循环 ,就可以
这里循环 留给你自己做,还有代码我的例子 有个问题 你直接用估计有问题
不过你自己稍微想一下 都可以解决的
回复 支持 反对

使用道具 举报

本版积分规则

关闭

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

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

GMT+8, 2024-11-12 04:26 , Processed in 0.076879 second(s), 28 queries .

Powered by Discuz! X3.2

© 2001-2024 Comsenz Inc.

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