本机QQ登录实例可获取群成员软件

易语言 2020-02-13 15:08:39

本机QQ登录实例可获取群成员软件

.计次循环首 (Num, i)
成员 = Json.取通用属性 (“mems[” + 到文本 (i - 1) + “].nick”)
QQ号 = Json.取通用属性 (“mems[” + 到文本 (i - 1) + “].uin”)
性别 = Json.取通用属性 (“mems[” + 到文本 (i - 1) + “].g”) ' 0=男 1=女 255=未知
.如果真 (性别 = “0”)
性别 = “男”
.如果真结束
.如果真 (性别 = “1”)
性别 = “女”
.如果真结束
.如果真 (性别 = “255”)
性别 = “未知”
.如果真结束
Q龄 = Json.取通用属性 (“mems[” + 到文本 (i - 1) + “].qage”)
入群时间 = Json.取通用属性 (“mems[” + 到文本 (i - 1) + “].join_time”)
入群时间 = 时间_时间戳转文本 (入群时间)
最后发言 = Json.取通用属性 (“mems[” + 到文本 (i - 1) + “].last_speak_time”)
最后发言 = 时间_时间戳转文本 (最后发言)
索引 = 超级列表框_群成员.插入表项 (, , , , , )
超级列表框_群成员.置标题 (索引, 0, 到文本 (索引 + 1))
超级列表框_群成员.置标题 (索引, 1, 成员)
超级列表框_群成员.置标题 (索引, 2, QQ号)
超级列表框_群成员.置标题 (索引, 3, 性别)
超级列表框_群成员.置标题 (索引, 4, Q龄)
超级列表框_群成员.置标题 (索引, 5, 入群时间)
超级列表框_群成员.置标题 (索引, 6, 最后发言)
数据保存 = 数据保存 + 成员 + “----” + QQ号 + “----” + 性别 + “----” + Q龄 + “----” + 入群时间 + “----” + 最后发言 + #换行符
.计次循环尾 ()
.如果真 (透明标签_假装是个选择框.标题 = “[√]自动导出”)
写到文件 (群号_ + “.txt”, 到字节集 (数据保存))