QQ空间送礼物自动引流软件源码

可以利用QQ空间送礼物实现引流，为广大用户提供一种全新的引流方式，操作比较简单适合绝大多数用户使用。

效率高：以最高效的外链形式为QQ空间引流。

无副作用：利用最新完全正规的挂接外链的方法引流，没有任何副作用和限制。

真实性：所有流量均为真实的。

自动化程度高：软件实现完全自动化。
skey ＝ “@” ＋ 文本_取出中间文本 (cookie, “skey=@”, “;”)
uin ＝ 文本_取出中间文本 (cookie, “uin=o0”, “;”)
gtk ＝ 计算GTK (skey)
调试输出 (gtk, skey, uin)
str ＝ 到文本 (网页_访问_对象 (“https://user.qzone.qq.com/” ＋ uin, , , 到文本 (cookie)))
str ＝ 编码_utf8到gb2312 (str)
token ＝ 文本_取出中间文本 (str, “window.g_qzonetoken = (function(){ try{return ” ＋ #引号, #引号)
调试输出 (token)
str ＝ 到文本 (网页_访问_对象 (“https://h5.qzone.qq.com/proxy/domain/r.qzone.qq.com/cgi-bin/tfriend/friend_show_qqfriends.cgi?uin=” ＋ uin ＋ “&follow_flag=0&groupface_flag=0&fupdate=1&g_tk=” ＋ gtk ＋ “&qzonetoken=” ＋ token, , , 到文本 (cookie)))
str ＝ 编码_utf8到gb2312 (str)
' 调试输出 (str)
正则.创建 (#常量1, str)
调试输出 (str)
.计次循环首 (正则.取匹配数量 (), i)
qq ＝ 正则.取子匹配文本 (i, 1)
加入成员 (array, qq)
' *** 缩略程序块 ***
' name ＝ 正则.取子匹配文本 (i, 2)
' n ＝ 超级列表框1.插入表项 (, , , , , )
' 超级列表框1.置标题 (n, 0, 到文本 (n ＋ 1))
' 超级列表框1.置标题 (n, 1, qq)
' 超级列表框1.置标题 (n, 2, name)
.计次循环尾 ()
sum ＝ 取数组成员数 (array)