123   2  /  3  页   跳转

[版聊] VB代码谁能看懂?

回复 10F 安德倚天剑 的帖子

如果你上次登录过,默认是在密码上的.

如果你有N多号需要登录,可以无视我的代码.....


gototop
 

回复: VB代码谁能看懂?



引用:
原帖由 鬼鬼小猫咪 于 2010-2-25 15:48:00 发表
别的工具不能做吗?

先定时

到时自动运行kartrider.exe

然后等待登录窗口,直到登录窗口显示.

然后模拟键盘输入帐号密码即可


使用易语言能简单点
思路是这样的

两个文本型变量
用户名=“。。。”
密码=“。。。”

运行:“KaritRider.exe“
计时器定时35秒
之后
复制变量 用户名的值
模拟键盘 Ctrl+V
复制变量 密码值
模拟键盘 Tab
模拟键盘 Ctrl+V
模拟键盘 Enter
计时器定时60秒
模拟键盘 Alt+F4
销毁()
gototop
 

回复: VB代码谁能看懂?



引用:
原帖由 鬼鬼小猫咪 于 2010-2-25 15:53:00 发表
最简单的,用AUITV3,相信聪明的楼主一看就看明白了.

Opt("WinWaitDelay",100)
Opt("WinTitleMatchMode",4)
Opt("WinDetectHiddenText",1)
Opt("MouseCoordMode",0)
Run('kartrider.exe')

帮我解释一下
Options函数里面设置的常量是什么意思?
WinWait函数是啥?
Send函数恐怕是SendKeys函数吧?

我想错了似乎,Send的参数写上{。。。}就是发送按键,写上普通字符串就是模拟键盘键入他们,不对吧?似乎是Keys.Enter呢,模拟键盘键入我只会SendKeys(Keys.。。。)
最后编辑安德倚天剑 最后编辑于 2010-02-25 16:03:23
gototop
 

回复 12F jmbt 的帖子

Opt("WinWaitDelay",100)
Opt("WinTitleMatchMode",4)
Opt("WinDetectHiddenText",1)
Opt("MouseCoordMode",0)
Run('kartrider.exe')
Sleep(5000)
WinWait("Login","开始游戏!")
If Not WinActive("Login","开始游戏!") Then WinActivate("Login","开始游戏!")
WinWaitActive("Login","开始游戏!")
Sleep(50)
Send("zhanghao")
Sleep(50)
Send("{TAB}")
Send("mima")
Send("{enter}")
Sleep(50000)
Send("{ALT}"+"{F4}")


....



gototop
 

回复 13F 安德倚天剑 的帖子

额..我也不知道,本猫电脑盲.......

好像前面不写那些东西也可以的.


gototop
 

回复:VB代码谁能看懂?

啊啊啊啊
不要了不要了,无限制的SR我不要了
这程序太难写了
gototop
 

回复 16F 安德倚天剑 的帖子

找你朋友或者好友帮你登吧.唉.


gototop
 

回复 17F 鬼鬼小猫咪 的帖子

嗯,谢谢了
gototop
 

回复:VB代码谁能看懂?

原文的注释写的很不错了。。

那些API要是不懂的话,查msdn。。
gototop
 

回复 16F 安德倚天剑 的帖子

有无限SR?
gototop
 
123   2  /  3  页   跳转
页面顶部
Powered by Discuz!NT