开源post多线程获取QQ群成员工具源码

ID ＝ 超级列表框1.取标题 (超级列表框1.现行选中项, 1)
地址 ＝ “http://qun.qzone.qq.com/cgi-bin/get_group_member?uin=” ＋ 编辑框1.内容 ＋ “&groupid=” ＋ ID ＋ “&random=” ＋ 时间_取随机时间戳 () ＋ “0&g_tk=” ＋ 全局key
返回信息 ＝ 编码_Utf8到Ansi (网页_访问_对象 (地址, 0, , 登陆成功ck))
' 调试输出 (返回信息) ' 取群成员
正则.创建 (#常量3, 返回信息)
.计次循环首 (正则.取匹配数量 (), i)
name ＝ 正则.取匹配文本 (i)
name ＝ 子文本替换 (name, #常量4, “”, , , 真)
name ＝ 子文本替换 (name, #引号 ＋ “,” ＋ #引号, “”, , , 真)
超级列表框2.插入表项 (, , , , , )
超级列表框2.置标题 (i － 1, 0, name)
.计次循环尾 ()
i ＝ 0
name ＝ “”
正则.创建 (#常量5, 返回信息)
.计次循环首 (正则.取匹配数量 (), i)
name ＝ 正则.取匹配文本 (i)
name ＝ 子文本替换 (name, #常量6, “”, , , 真)
name ＝ 子文本替换 (name, “}”, “”, , , 真)
超级列表框2.置标题 (i － 1, 1, name)
.计次循环尾 ()