如何让脚本一直跑下去（很菜的）

hjjlearning

如何让脚本一直循环的跑下去不停止呢

如我想跑一晚上的自动化脚本，不知道有什么办法不

求答啊

sharetest

==我发给你我的脚本，要用VBS写

sharetest

Dim x
Dim shuzu (9999)
For x=0 to 9999
shuzu(x)="user" & cstr(x)
Browser("BeeSpaceポータルサイト - Powered").Page("BeeSpaceポータルサイト - Powered").Link("新規登録").Click
Browser("BeeNest Board - Powered").Page("BeeNest Board - Powered").WebEdit("username").Set shuzu(x)
Browser("BeeNest Board - Powered").Page("BeeNest Board - Powered").WebEdit("password").SetSecure "460b2be9c4e09416587a0c68"
Browser("BeeNest Board - Powered").Page("BeeNest Board - Powered").WebEdit("password2").SetSecure "460b2bebb20cf26edd56c54b"
Browser("BeeNest Board - Powered").Page("BeeNest Board - Powered").WebEdit("email").Set "yh@hotmail.com"
Browser("BeeNest Board - Powered").Page("BeeNest Board - Powered").WebButton("送信").Click
Browser("BeeNest Board - Powered").Page("BeeNest Board - Powered_2").Link("お使いのブラウザが自動遷移しない場合は、こちらからアクセスし").Click
Browser("BeeNest Board - Powered").Page("スペースの申し込み - BeeSpaceポータルサイト").WebRadioGroup("tplid").Select "worldcup"
Browser("BeeNest Board - Powered").Page("スペースの申し込み - BeeSpaceポータルサイト").WebButton("確認").Click
Browser("BeeNest Board - Powered").Page("ヒントメッセージ - Powered By").Link("確認").Click
Browser("BeeNest Board - Powered").Page("yaoのマイスペース_ホーム_BeeSpaceポータルサイト").Link("Cookie削除").Click
Browser("BeeNest Board - Powered").Page("ヒントメッセージ - Powered By_2").Link("確認").Click
Browser("BeeNest Board - Powered").Page("yaoのマイスペース_ホーム_BeeSpaceポータルサイト").Sync
Browser("BeeNest Board - Powered").Close
Browser("BeeSpaceポータルサイト - Powered").Page("BeeSpaceポータルサイト - Powered").Sync
Next

sharetest

定义一个变量，用作记录循环次数
定义一个数组，和循环次数对应，用来存放用户的注册名
循环10000次
数组shuzu(x)赋值为user0，user1，。。。user9999
set username为数组shuzu（x）就是上面那些名字了
最后别忘了写next
补充：那个cstr()是把int转换为字符，再用&符号连接user
祝你一次成功，呵呵，我也是自己总结出来的

hjjlearning

你给的是不是WEB程序的
我的是C/S结构的,好象WR里不能用VBS写吧
我记的在QTP里才可以的

不过你这个思路是对的,主要是我编程烂,还是谢谢你了

我记的好象WR里有个配置就可以设置跑的,不记的是那了

不知道下面那位兄弟/JM知道

dionysus

sharetest 给出的脚本太像QTP的了，我一般对WR的循环还是在脚本中编写循环语句，并且把调用其他脚本的语句包含在其中，这样好控制循环，只对部分操作作循环。WR在哪里可以设置循环没有用过，好像有点印象但混乱了都，希望其他高手指点

hjjlearning

我也记的那里好象可以设置
期望那个高手指点下

xiaohuo37

偶不知道哪里可以设置循环，感觉好象只在LR中有印象可以设置，可能是我不熟悉。

想问个 很菜的问题， 为什么不直接加个 FOR 循环呢？ 把所有你想循环跑的程序都放到{}中。

可能是我录的脚本比较简单，所以都是这样干的。 ：）

波波天地

Tools--DataDriver Wizard
Tools--Data Table
这2个你先看看，第二个针对对数据的。

hjjlearning

原帖由 xiaohuo37 于 2007-4-27 15:05 发表
偶不知道哪里可以设置循环，感觉好象只在LR中有印象可以设置，可能是我不熟悉。

想问个 很菜的问题， 为什么不直接加个 FOR 循环呢？ 把所有你想循环跑的程序都放到{}中。

可能是我录的脚本比较简单，所 ...

我想过要加FOR,但那只能针对简单的脚本,如果你脚本里要调用其他的脚本

那 估计比较麻烦
还有,你如果跑一晚上,那你FOR循环要加多少呢?
不好配置

hjjlearning

原帖由 波波天地 于 2007-4-27 15:43 发表
Tools--DataDriver Wizard
Tools--Data Table
这2个你先看看，第二个针对对数据的。

这个好想不行,只是针对你FOR循环里是数据

望下面的高手指点

furness

使用call命令是可以的，我录制几十个脚本，可以写成一个总脚本，无人时候只需要启动总脚本就ok了，

dqar

受益！！！
去年刚学习的VB，现在给忘了，我也只会用一些for语句。加油学习！！！
谢谢搂住和sharetest！

shell

来个do while语句让条件永假,那么想让他跑多久就可以让他跑多久,
也可以人性化一点每次循环来个条件判断取本地时间比较,如果不是我们预期时间就continue
呵呵

way

原帖由 shell 于 2007-6-18 16:32 发表
来个do while语句让条件永假,那么想让他跑多久就可以让他跑多久,
也可以人性化一点每次循环来个条件判断取本地时间比较,如果不是我们预期时间就continue
呵呵

while(1182222800>=get_time())
{
wait(1);
i=i+1;
printf i;
}
WR里的时间怎么取出来是整型的?有没有取出来是"YYYY:MM:DD HH:MM:SS"格式的?
还有有没有时间的比较函数的?

dionysus

WR里似乎没有很好的时间函数

kolecat

可以写个死循环就能一直跑了

lantianwei

先写个死循环，到点再让它停，好像这个主意不错。
IF（TRUE && TIME！=“。。”）
{
。。。。。
}

laoshurena

简单的脚本写死循环就最方便了。

dcqjack

学习了。虽然是初学但是也受教了。