|
|
最新版的QQ也能取
| 窗口程序集名 | 保 留 | 保 留 | 备 注 | | 窗口程序集_启动窗口 | | | |
| 变量名 | 类 型 | 静态 | 数组 | 备 注 | | 账号数组 | QQ账号信息 | | 0 | | 数量 | 整数型 | | | | i | 整数型 | | |
数量 = 取本地QQ账号 (账号数组 ) 计次循环首 (数量, i ) 输出调试文本 (“QQ:” + 账号数组 [i ].uin + “ 昵称:” + 账号数组 [i ].昵称 ) 计次循环尾 ()| 变量名 | 类 型 | 静态 | 数组 | 备 注 | | 随机数 | 整数型 | | | | 随机数文本 | 文本型 | | | | 请求URL | 文本型 | | | | 协议头 | 文本型 | | | | 响应文本 | 文本型 | | | | 起始位置 | 整数型 | | | | 结束位置 | 整数型 | | | | 标志文本 | 文本型 | | | | JSON文本 | 文本型 | | | | json | 类_json | | | | 成员总数 | 整数型 | | | | i | 整数型 | | | | 临时账号 | QQ账号信息 | | | | uin类型 | 整数型 | | | | uin文本 | 文本型 | | | | tmp | 文本型 | | | 置随机数种子 ()随机数 = 取随机数 (1000000000, 2000000000 )随机数文本 = 到文本 (随机数 ) 请求URL = “https://localhost.ptlogin2.qq.com:4301/pt_get_uins?callback=ptui_getuins_CB&pt_local_tk=-” + 随机数文本 协议头 = “Referer: https://ui.ptlogin2.qq.com/” + #换行符 + “Cookie: pt_local_token=-” + 随机数文本 响应文本 = 到文本 (网页_访问_对象 (请求URL, 0, , , , 协议头, , , , , , , , , , , , , )) 如果真 (响应文本 = “”) 输出调试文本 (“请求失败,请确认QQ已运行并登录!”) 返回 (0 ) 标志文本 = “var var_sso_uin_list=”起始位置 = 寻找文本 (响应文本, 标志文本, , 假) 如果真 (起始位置 = -1 ) 标志文本 = “var var_sso_uin_list =” 起始位置 = 寻找文本 (响应文本, 标志文本, , 假) 如果真 (起始位置 = -1 ) 输出调试文本 (“未找到 var_sso_uin_list,接口可能已变更”) 返回 (0 ) 起始位置 = 起始位置 + 取文本长度 (标志文本 )结束位置 = 寻找文本 (响应文本, “;”, 起始位置, 假) 如果真 (结束位置 = -1 ) 输出调试文本 (“JSON结束符未找到”) 返回 (0 )JSON文本 = 取文本中间 (响应文本, 起始位置, 结束位置 - 起始位置) 如果真 (json. 解析 (JSON文本, , ) = 假) 返回 (0 ) 成员总数 = json. 成员数 ()重定义数组 (账号列表, 假, 0 ) 计次循环首 (成员总数, i )  uin类型 = json. 取类型 (“[” + 到文本 (i - 1 ) + “].uin”)  判断 (uin类型 = 2 )   uin文本 = json. 取通用属性 (“[” + 到文本 (i - 1 ) + “].uin”, ) 判断 (uin类型 = 6 )   tmp = json. 取通用属性 (“[” + 到文本 (i - 1 ) + “].uin”, )   如果真 (取文本长度 (tmp ) ≥ 2 )     uin文本 = 取文本中间 (tmp, 2, 取文本长度 (tmp ) - 2 )     uin文本 = “”   如果真 (uin文本 ≠ “”)  临时账号.uin = uin文本   临时账号.昵称 = json. 取通用属性 (“[” + 到文本 (i - 1 ) + “].nickname”, 真)    临时账号.昵称 = 文本_替换 (临时账号.昵称, , , , #引号, “”, , , , , , , , )  加入成员 (账号列表, 临时账号 )  计次循环尾 ()返回 (取数组成员数 (账号列表 ))
|
|