Question

求自动连续循环按1、2、3、4、5、6,间隔5秒，的VBS脚本

以前在网上见到过一个不能停止的

Answer 1

在网上下载一个按键精灵
然后 将下面的代码复制到一个TXT文件里面
然后在按键精灵里面加载就可以了。
无限循环，F5 是开始， F12 是结束。
最好是做成小精灵的， 方便使用

[General]
Description=VBS
BeginHotkey=116
BeginHotkeyMod=0
PauseHotkey=0
PauseHotkeyMod=0
StopHotkey=123
StopHotkeyMod=0
RunOnce=1
EnableWindow=
Enable=1
AutoRun=0
[Repeat]
Type=1
Number=1943232333
[Relative]
SetupOCXFile=
[Comment]
Content=

[Script]
KeyPress 49,1
Delay 5000
KeyPress 50,1
Delay 5000
KeyPress 51,1
Delay 5000
KeyPress 52,1
Delay 5000
KeyPress 53,1
Delay 5000
KeyPress 54,1
Delay 5000

Answer 2

vbs代码如下:

set ws=createobject("wscript.shell")
do
ws.sendkeys"1"
wscript.sleep 5000
ws.sendkeys"2"
wscript.sleep 5000
ws.sendkeys"3"
wscript.sleep 5000
ws.sendkeys"4"
wscript.sleep 5000
ws.sendkeys"5"
wscript.sleep 5000
ws.sendkeys"6"
wscript.sleep 5000
loop