实验下。。。。

xusw444 · 发表于 2008-8-14 20:21

刷。。。。。

xusw444 · 发表于 2008-8-14 20:22

Set WshShell= WScript.CreateObject("WScript.Shell")
WshShell.AppActivate "与 AAAA 聊天中"
for i=1 to 35
WScript.Sleep 700
WshShell.SendKeys "^v"
WshShell.SendKeys i
WshShell.SendKeys "%s"
Next
1

xusw444 · 发表于 2008-8-14 20:22

Set WshShell= WScript.CreateObject("WScript.Shell")
WshShell.AppActivate "与 AAAA 聊天中"
for i=1 to 35
WScript.Sleep 700
WshShell.SendKeys "^v"
WshShell.SendKeys i
WshShell.SendKeys "%s"
Next
3

xusw444 · 发表于 2008-8-14 20:22

Set WshShell= WScript.CreateObject("WScript.Shell")
WshShell.AppActivate "与 AAAA 聊天中"
for i=1 to 35
WScript.Sleep 700
WshShell.SendKeys "^v"
WshShell.SendKeys i
WshShell.SendKeys "%s"
Next
4

xusw444 · 发表于 2008-8-14 20:23

貌似代码有点问题。。。改下。。。

落泪的水 · 发表于 2008-8-14 20:23

滥情的家伙

xusw444 · 发表于 2008-8-14 20:26

引用第6楼落泪的水于2008-08-14 20:23发表的“”:
滥情的家伙

额。。。被发现了 [s:43] [s:43]

落泪的水 · 发表于 2008-8-14 20:27

那是明显的

xusw444 · 发表于 2008-8-14 20:33

其实我伪装的很好的

goofy · 发表于 2008-8-14 20:33

完全可以的

实验下。。。。

浏览过的版块