碧海潮声大学生网

标题: 实验下。。。。 [打印本页]

作者: xusw444 时间: 2008-8-14 20:20
标题: 实验下。。。。
看下是否能刷钱

作者: 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: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
完全可以的

作者: 荒凉的河岸 时间: 2008-8-14 20:35
刷点给我好了

作者: 荒凉的河岸 时间: 2008-8-14 20:35
抓狂中

作者: xusw444 时间: 2008-8-14 20:40

引用第10楼goofy于2008-08-14 20:33发表的“”:
完全可以的

实验过了？

作者: xusw444 时间: 2008-8-14 20:44
再试下

作者: xusw444 时间: 2008-8-14 20:45
西西，。。。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:45
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" 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
Next
2

作者: xusw444 时间: 2008-8-14 20:45
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 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
5
4

作者: 四十四次日落 时间: 2008-8-14 20:46
什么东西?

作者: xusw444 时间: 2008-8-14 20:51

引用第18楼四十四次日落于2008-08-14 20:46发表的“”:
什么东西?

就是那个流氓的东东

欢迎光临碧海潮声大学生网 (http://www.zjoubbs.com/)