WebBrowser控件登录12306订票小助手--抓验证码图片、API关闭弹窗，更新0.53版

xmyjk · 发表于 2012-1-20 12:49

本帖最后由 xmyjk 于 2012-1-20 12:56 编辑

liucqa 发表于 2012-1-20 12:46
哦，忘记说了

输入顺序是先输入用户名和密码。然后再输入验证码。

另外，提个建议，用户过多的时候，会有个提示框，看看能不能不用手工处理，弹出后几秒钟后，让它自动关闭，然后继续运行登录。

liucqa · 发表于 2012-1-20 12:51

本帖最后由 liucqa 于 2012-1-20 12:52 编辑

xmyjk 发表于 2012-1-20 12:49
另外，提个建议，用户过多的时候，会有个提示框，看看能不能不用手工点击确定，弹出后几秒钟后，让它自动 ...

嘿嘿，你说的这个本来就是API定时器干的活，只是有的时候定时器会自己停下来。问题就出在验证码错误和用户多这两个信息检测的前后顺序上

不过，一般概率不大，先凑合用用。你注意看左边的状态提示信息，定时器停止的时候，提示STOP

xmyjk · 发表于 2012-1-20 12:59

本帖最后由 xmyjk 于 2012-1-20 13:00 编辑

liucqa 发表于 2012-1-20 12:51
嘿嘿，你说的这个本来就是API定时器干的活，只是有的时候定时器会自己停下来。问题就出在验证码错误和用户 ...

呃，你是说程序可以自行关闭？可是，我运行你的程序好好好多次了，那个用户过多的提示，从来没有正常被关闭也。。。。都是我手工关闭的。。。呃，其他人会吗？

我这里计时器没有STOP阿，还在转，就是那个用户过多提示也还在，没有关闭掉。

xmyjk · 发表于 2012-1-20 13:05

liucqa 发表于 2012-1-20 12:51
嘿嘿，你说的这个本来就是API定时器干的活，只是有的时候定时器会自己停下来。问题就出在验证码错误和用户 ...

如图，你看看

liucqa · 发表于 2012-1-20 13:56

本帖最后由 liucqa 于 2012-1-20 13:56 编辑

xmyjk 发表于 2012-1-20 13:05
如图，你看看

呵呵，俺忘了改，关闭窗口是针对IE9的提示的，不好意思。

一会给改成IE7的

liucqa · 发表于 2012-1-20 14:05

本帖最后由 liucqa 于 2012-1-20 14:20 编辑

更新v0.5版，更新内容：
1、没有输入用户名和密码之前，不能输入验证码
2、优化用户多和验证码错误提示
3、兼容低版本IE（俺没测试，如果还不能关闭弹出来的窗口，请修改下面几句，把标题改成一样的就行，然后告诉我一声）

CoseMSG模块 KillCaption(0) = "Microsoft Internet Explorer" '要关闭的窗口标题，默认添加

UserForm1模块
SetKillCaption "Windows Internet Explorer;来自网页的消息;安全警报;安全警告;脚本错误" '设置要拦截的窗口标题，有什么奇怪窗口标题都加在这里，用分号隔开

xmyjk · 发表于 2012-1-20 14:11

liucqa 发表于 2012-1-20 14:05
更新v0.5版，
1、没有输入用户名和密码之前，不能输入验证码
2、优化用户多和验证码错误提示

你发现没，今天网站改版了，即使提示用户过多，验证码同时变化了，也就是，一个验证码不能用好几次了。

liucqa · 发表于 2012-1-20 14:12

xmyjk 发表于 2012-1-20 14:11
你发现没，今天网站改版了，即使提示用户过多，验证码同时变化了，也就是，一个验证码不能用好几次了。

是呀，昨天就改了，所以我才加上验证码读取，这样眼睛不用左右看了

liucqa · 发表于 2012-1-20 14:19

本帖最后由 liucqa 于 2012-1-20 14:32 编辑

12306 submit提交-推荐IE8 v0.52.rar (120.86 KB, 下载次数: 970)

更新0.52版，修改1处bug

3、兼容低版本IE（俺没测试，如果还不能关闭弹出来的窗口，请修改下面几句，把标题改成一样的就行，然后告诉我一声）

CoseMSG模块 KillCaption(0) = "Microsoft Internet Explorer" '要关闭的窗口标题，默认添加

UserForm1模块
SetKillCaption "Windows Internet Explorer;来自网页的消息;安全警报;安全警告;脚本错误" '设置要拦截的窗口标题，有什么奇怪窗口标题都加在这里，用分号隔开

如果程序中途中断，可能会在后台留下Excel进程，请按ctrl-shift-ESC 杀掉进程即可

liucqa · 发表于 2012-1-20 14:28

liucqa 发表于 2012-1-20 14:12
是呀，昨天就改了，所以我才加上验证码读取，这样眼睛不用左右看了

哈哈，昨晚调试，我的用户也不小心被锁了

今天我的程序能在出现密码错误弹窗的时候停下来了。不过我发现网站可能还是有问题，在密码正确的时候submit，也偶尔报密码不能为空，或者密码错误。点背的话连续3次就锁了

		自动登录	找回密码
密码			免费注册

WebBrowser控件登录12306订票小助手--抓验证码图片、API关闭弹窗，更新0.53版

点评

点评

点评