'新建txt文件并复制下列代码,将新建txt文件的后缀名改为.vbs,然后你就知道什么什么强大!!!!
'不管你信不信,反正我信了
'本人亲测 无毒无害
Set a=WScript.CreateObject("Wscript.shell")
WScript.Sleep 5000
For i=1 To 20
WScript.Sleep 1000
a.SendKeys "nimeiya1"
a.SendKeys "{ENTER}"
a.SendKeys "^{ENTER}"
Next
WScript.Sleep 15000
For i=1 To 50
WScript.Sleep 1000
a.SendKeys "haha1"
a.SendKeys "{ENTER}"
a.SendKeys "^{ENTER}"
Next
WScript.Sleep 15000
For i=1 To 200
WScript.Sleep 1000
a.SendKeys "heihei1"
a.SendKeys "{ENTER}"
a.SendKeys "^{ENTER}"
Next
'不管你信不信,反正我信了
'本人亲测 无毒无害
Set a=WScript.CreateObject("Wscript.shell")
WScript.Sleep 5000
For i=1 To 20
WScript.Sleep 1000
a.SendKeys "nimeiya1"
a.SendKeys "{ENTER}"
a.SendKeys "^{ENTER}"
Next
WScript.Sleep 15000
For i=1 To 50
WScript.Sleep 1000
a.SendKeys "haha1"
a.SendKeys "{ENTER}"
a.SendKeys "^{ENTER}"
Next
WScript.Sleep 15000
For i=1 To 200
WScript.Sleep 1000
a.SendKeys "heihei1"
a.SendKeys "{ENTER}"
a.SendKeys "^{ENTER}"
Next
2000





