|
|
取不到 浪费点
.版本 2
.支持库 spec
.子程序 获取本机登录QQ
.局部变量 局_网址, 文本型
.局部变量 局_结果, 字节集
.局部变量 局_返回, 文本型
.局部变量 随机数, 整数型
.局部变量 JSON, 类_json
.局部变量 i, 整数型
.局部变量 QQ号, 文本型
.局部变量 昵称, 文本型
置随机数种子 ()
随机数 = 取随机数 (1000000000, 2000000000)
局_网址 = “https://localhost.ptlogin2.qq.com:4301/pt_get_uins?callback=ptui_getuins_CB&pt_local_tk=-” + 到文本 (随机数)
局_结果 = 网页_访问_对象 (局_网址, 0, , “pt_local_token=-” + 到文本 (随机数), , “Referer: https://ui.ptlogin2.qq.com/”, , , , , , , , , , , )
局_返回 = 到文本 (编码_编码转换对象 (局_结果))
局_返回 = 文本_取出中间文本 (局_返回, “var var_sso_uin_list=”, “;”, , )
JSON.解析 (局_返回)
.计次循环首 (JSON.成员数 (“”), i)
QQ号 = JSON.取通用属性 (“[” + 到文本 (i - 1) + “].uin”)
昵称 = JSON.取通用属性 (“[” + 到文本 (i - 1) + “].nickname”)
调试输出 (“QQ号 ” + QQ号, “昵称 ” + 昵称)
.计次循环尾 ()
|
|