无法循环工作 - VBSCRIPT

时间:2018-02-14 14:58:38

标签: loops for-loop foreach vbscript while-loop

我正在尝试在vbscript中创建一个10x的循环(在这种情况下,每5分钟向计算机发送一次击键。我尝试了几种循环类型,但我无法弄清楚如何使其工作,我刚刚在发布时收到错误800A0005。

我该怎么办?

以下是代码:

Set Ws = CreateObject("wscript.Shell")
Dim cpt
cpt = 0
For cpt = 0 to 10 step 1
    ws.Sendkeys "{Ctrl}"
    Pause(5) 'Pause de 5 minutes
Next

Function Pause(NbMin)
wscript.Sleep(60000*NbMin)
End Function

1 个答案:

答案 0 :(得分:0)

发送 Ctrl 键的代码为^

所以,试着替换

ws.Sendkeys "{Ctrl}"

ws.Sendkeys "^"

有关详细信息,请参阅此LINK