易语言QQpost加好友源码
以下是部分代码 .版本 2 .支持库 spec GetQq (主动添加QQ) QQ空间页面 ＝ 编码_Utf8到Ansi (网页_访问_对象 (“https://user.qzone.qq.com/” ＋ 被添加QQ, , , Cookie)) realname ＝ 文本_取出中间文本 (QQ空间页面, “ownerProfileSummary=[” ＋ #引号, #引号, , ) 调试输出 (realname) G_TK ＝ 计算G_tk (文本_取出中间文本 (Cookie, “skey=”, “;”, , )) qzonetoken ＝ 文本_取出中间文本 (QQ空间页面, “return ” ＋ #引号, #引号) 提交信息 ＝ “sid=0&ouin=” ＋ 被添加QQ ＋ “&uin=” ＋ 主动添加QQ ＋ “&fuin=” ＋ 被添加QQ ＋ “&m%2F” ＋ 被添加QQ 编码_Utf8到Ansi (网页_访问_对象 (“ ＋ “&g_tk=” ＋ G_TK, 1, 提交信息, Cookie, , ))
下载地址:https://6yunpan.pipipan.com/fs/17009107-360084105
