机场云商是近两年比较火爆的葫芦娃平台 都是需要进行十名后才可以参与 由于平台用户日积过多
导致部分小伙伴十名进行不了 所以分享代码如下 供大家参考 是需要hook 微信进行实现把code取出来的
.版本 2
.支持库 spec
打开并注入 (编辑框1.内容, “wechat.exe”, 取运行目录 () + “\WeChatEx.dll”, 0)
.子程序 _按钮1_被单击
取code ()
.子程序 取code
.局部变量 json, zyJsonValue
.局部变量 cilent, 整数型
json.创建 (, , , , )
json.置文本 (“Appid”, “wx88c590140de89f92”)
cilent = 微信句柄id
.如果真 (cilent = 0)
信息框 (“请先在软件启动登录微信!”, 0, , )
返回 ()
.如果真结束
服务端发送 (g_Sever, cilent, 到字节集 (json.到文本 (, , , )), )
.子程序 服务器回调
.参数 服务指针, 整数型, , 便于分辨服务端,"服务端创建"返回的指针。
.参数 客户句柄, 整数型, , 便于分辨客户端,客户端的socket。
.参数 事件类型, 整数型, , 1、客户进入 2、数据到达 3、客户断开,#etcp_ 常量。
.参数 封包地址, 整数型, , 通用取数据参数一。
.参数 封包长度, 整数型, , 通用取数据参数二。
.参数 服务总数, 整数型, , 该服务端的客户数量。
.局部变量 Index, 整数型
.局部变量 json, zyJsonValue
.局部变量 resp, 文本型
.局部变量 name, 文本型
.局部变量 qcode, 文本型
.如果真 (事件类型 = 1)
微信句柄id = 客户句柄
返回 ()
.如果真结束
.如果真 (事件类型 = 3)
信息框 (“请重新启动微信”, 0, , )
返回 ()
.如果真结束
.如果真 (事件类型 = 2)
resp = 到文本 (指针到字节集 (封包地址, 封包长度))
json.解析 (resp, , , , )
.如果真 (json.取文本 (“code”) ≠ “”)
qcode = json.取文本 (“code”)
code = qcode
编辑框_日志.加入文本 (“获取Code成功 Code:” + code + #换行符)
调试输出 (code)
返回 ()
.如果真结束
.如果真 (json.取文本 (“Name”) ≠ “”)
name = json.取文本 (“Name”)
返回 ()
.如果真结束
.如果真结束
.子程序 __启动窗口_创建完毕
编辑框1.内容 = 取文本注册项 (#现行用户, “Software\Tencent\WeChat\InstallPath”, )