易语言QQ验证模块

Question

你们有么》

Answer 1

现在QQ的网页登陆全是GET包MD5加密：.版本 2
.支持库 internet
.支持库 script
.支持库 iconv.程序集 窗口程序集1.子程序 _按钮1_被单击.如果 (编辑框1.内容 ≠ “” 且 编辑框2.内容 ≠ “” 且 编辑框3.内容 ≠ “”)
信息框 (登录 (), 0, )
图片框1.图片 ＝ HTTP读文件 (“ http://captcha.qq.com/getimage?aid=15000101&uin=” ＋ 编辑框1.内容)
.否则
信息框 (“请输入号-密-验证码”, 0, ).如果结束
.子程序 登录, 文本型
.局部变量 脚本组件, 脚本组件
.局部变量 加密后的值, 文本型
.局部变量 返回文件, 字节集
.局部变量 返回文本, 文本型脚本组件 ＝ 脚本组件1
脚本组件.执行 (#JScript)
加密后的值 ＝ 脚本组件.运行 (“md5_3”, 编辑框2.内容)
加密后的值 ＝ 脚本组件.运行 (“md5”, 加密后的值 ＋ 到大写 (编辑框3.内容))返回文件 ＝ HTTP读文件 (“ http://ptlogin2.qq.com/login?u=” ＋ 编辑框1.内容 ＋ “&p=” ＋ 加密后的值 ＋ “&verifycode=” ＋ 编辑框3.内容 ＋ “&=on&aid=15000101&u1=http%3A%2F%2Fimgcache.qq.com%2Fqzone%2Fv5%2Floginsucc.html%3Fpara%3Dizone&ptredirect=1&h=1&from_ui=1&dumy=&fp=loginerroralert”)
返回文本 ＝ 到文本 (编码转换 (返回文件, #编码_UTF_8, #编码_GB18030, )).如果 (寻找文本 (返回文本, “。”, , 假) ＞ -1)
返回文本 ＝ 取文本中间 (返回文本, 1, 倒找文本 (返回文本, “。”, , 假) ＋ 1)
.否则
返回文本 ＝ 取文本中间 (返回文本, 1, 倒找文本 (返回文本, “！”, , 假) ＋ 1)
.如果结束
返回文本 ＝ 取文本中间 (返回文本, 倒找文本 (返回文本, “'”, , 假) ＋ 1, 取文本长度 (返回文本) － 倒找文本 (返回文本, “'”, , 假))
返回 (返回文本).子程序 _编辑框1_内容被改变图片框1.图片 ＝ { }
.如果真 (编辑框1.内容 ≠ “”)
图片框1.图片 ＝ HTTP读文件 (“ http://captcha.qq.com/getimage?aid=15000101&uin=” ＋ 编辑框1.内容)
编辑框3.内容 ＝ “”
.如果真结束

Answer 2

建立 两个编辑框和一个按钮 编辑框1（是输入账号的地方） 编辑框2（是输入密码的地方） 按钮1（登录用的） 然后把下面代码复制进去就行了！-----------------------------（这是分割线，不要复制，复制下面的就行了）-------------------------------- .版本 2
.支持库 internet.程序集 窗口程序集1.子程序 _按钮1_被单击
.局部变量 邮件提示, 文本型
.如果 (连接发信服务器 (“smtp.qq.com”, 25, 编辑框1.内容, 编辑框2.内容, ))
信息框 (“恭喜您通过验证！”, 16, “连接成功”)
返回 ()
.否则
信息框 (“账号或密码错误！”, 16, “连接失败”)
断开发信服务器 ()
返回 ()
.如果结束

Answer 3

没有

Answer 4

直接网页抓包，抓QQ空间登陆的包就行了。、不然也可以连接发信服务器（）。。如果都不想的话，找我要现成的模块。