错误：名称已重新定义

Question

我正在尝试创建一个vbs脚本，在7到15分钟之间运行时会键入一个字符。这是我第一次使用vbs。当我运行该文件时，我收到一个错误框，说＆＃34;错误：名称重新定义了第14行char 5＆＃34;这是我的剧本

Set wshShell = wscript.CreateObject("WScript.Shell")
do
dim max,min
max=900000
min=420000

Dim RNDM
Randomize
RNDM=((max)*Rnd+min)

wscript.sleep (RNDM)
wshshell.sendkeys "{^}"
wscript.sleep (RNDM)
dim max,min
max=900000
min=420000

Dim RNDM
Randomize
RNDM=((max)*Rnd+min)

wshshell.sendkeys "{%}"
wscript.sleep (RNDM)
dim max,min
max=900000
min=420000

Dim RNDM
Randomize
RNDM=((max)*Rnd+min)

wshshell.sendkeys "{*}"
dim max,min
max=900000
min=420000

Dim RNDM
Randomize
RNDM=((max)*Rnd+min)

wscript.sleep (RNDM)
wshshell.sendkeys "{@}"
dim max,min
max=900000
min=420000

Dim RNDM
Randomize
RNDM=((max)*Rnd+min)

wscript.sleep (RNDM)
wshshell.sendkeys "{/}"
dim max,min
max=900000
min=420000

Dim RNDM
Randomize
RNDM=((max)*Rnd+min)

wscript.sleep (RNDM)
loop

Answer 1

您多次声明变量。

请参阅Dim命令的文档：http://ss64.com/vb/dim.html

  

明确声明一个新变量或数组变量。

您只需要声明一次变量。然后，您可以根据需要多次重复使用它。此外，您反复设置相同的值。