发布时间:2019-08-01 12:00:12
Set WshShe11=
WScript.Create0bject
("WScript.She11")
WshShe11.AppActivate "网名"
for i=1 to 99
WScript.Sleep 99
WshShe11.SendKeys "^v"
WshShe11.SendKeys i
WshShe11.SendKeys "%s"
Next
又是网上抄的(自己完全没明白),0与o没有分清,1与l也搞错了,还有就是断行的。
以下是可用的
Set WshShe11=WScript.CreateObject("WScript.Shell")WshShe11.AppActivate "网名"for i=1 to 99WScript.Sleep 99WshShe11.SendKeys "^v"WshShe11.SendKeys iWshShe11.SendKeys "%s"Next