QQ群成员批量提取工具源码+奇易浏览框模块

skey ＝ 分割文本2 (全_cookies, “skey=@”, “;”)
bkn ＝ 到文本 (获得GTK (“@” ＋ skey))
调试输出 (skey, bkn)
调试输出 (全_cookies)
清除数组 (群_uin)
清除数组 (群_name)
' 这里不建议把获取群成员和获取群列表放到一起，进行获取群成员如果太多次数必定会被限制，建议做避免处理。

return_text ＝ 编码_utf8到gb2312 (到文本 (网页_访问_对象 (“http://qun.qzone.qq.com/cgi-bin/get_group_list?groupcount=4&count=4&callbackFun=_GetGroupPortal&uin=&g_tk=” ＋ bkn, , , 全_cookies)))  ' 获取群信息
取所有文本中间 (return_text, 群_uin, “groupid” ＋ #引号 ＋ “:”, “,”)
取所有文本中间 (return_text, 群_name, “groupname” ＋ #引号 ＋ “:” ＋ #引号, #引号)
超级列表框1.全部删除 ()
.如果真 (取数组成员数 (群_uin) ＝ 取数组成员数 (群_name))
    .计次循环首 (取数组成员数 (群_uin), index)
        容器 ＝ 超级列表框1.插入表项 (, 到文本 (超级列表框1.取表项数 () ＋ 1), , , , )
        超级列表框1.置标题 (容器, 1, 群_name [index])
        超级列表框1.置标题 (容器, 2, 群_uin [index])
    .计次循环尾 ()