|
5精币
.版本 2
.子程序 _按钮_添加联系人_被单击
.局部变量 Json, 类_json
.局部变量 Data, 字节集
Json.清除 ()
Json.置属性 (“v1”, 编辑框_v1.内容)
Json.置属性 (“v2”, 编辑框_v2.内容)
Json.置属性 (“verifyContent”, “验证内容也就是备注_” + 文本_取随机数字 (2))
Json.置属性 (“verifyUserOpCode”, 编辑框_verifyUserOpCode.内容) ' 【1关注公众号 此时scene填88】 2是添加,3是同意添加
Json.置属性 (“scene”, 编辑框_scene.内容) ' 来源:2通过搜索邮箱;3通过VX号搜索;5通过朋友验证消息7通过朋友验证消息(可回复);12通过QQ好友添加;13通讯录添加;14通过群来源;15通过搜索手机号;16通过朋友验证消息;17通过名片分享;22通过摇一摇打招呼方式;25通过漂流瓶;30通过二维码方式
Json.置属性 (“token”, 编辑框_token.内容)
Json.解析 (编码_Utf8到Ansi (网页_访问 (g_ServerUrl + #CMD_获取设置添加好友包 + #CMD_KEY, 1, , , , , , , 编码_Ansi到Utf8 (Json.取xx文本 ())))) ' 获取业务xx包
LOG (取程序名称 (1) + “ > ” + Json.取xx文本 ())
.如果 (Json.取属性数值 (“code”) = 0)
Data = 网页_访问 (Json.取通用属性 (“url”), 1, , , , , , , _Hex2Bin8 (Json.取通用属性 (“packet”))) ' 请求TX业务
.如果 (Data ≠ { } 且 Data [1] = 191) ' VX服务端返回的xx就已经异常了,无需解析xx包
Json.清除 ()
Json.置属性 (“data”, _Bin2Hex8 (Data))
Json.置属性 (“token”, 编辑框_token.内容)
Json.解析 (编码_Utf8到Ansi (网页_访问 (g_ServerUrl + “-” + #CMD_获取设置添加好友包 + #CMD_KEY, 1, Json.取xx文本 ()))) ' 解析业务结果
LOG (取程序名称 (1) + “ > ” + Json.取xx文本 ())
.否则
LOG (取程序名称 (1) + “ > [VX服务端返回的xx就已经异常了,无需解析xx包]”)
.如果结束
.否则
LOG (取程序名称 (1) + “ > [VX返回异常,这通常是请求参数或参数名不合法]”)
这是说明。有没有大牛知道怎么写自动通过好友添加
|
最佳答案
查看完整内容
你看下他有个文档,里面是所有事件的post地址,按照文档写就行了
|