.版本 2 .程序集 qqLogin .程序集变量 pt_local_token, 文本型 .程序集变量 cookie, 文本型 .子程序 _初始化, , , 当基于本类的对象被创建后，此方法会被自动调用 cookie ＝ “” .子程序 _销毁, , , 当基于本类的对象被销毁前，此方法会被自动调用 .子程序 _init, 整数型, 公开, 初始化函数 编码_Utf8到Ansi (网页_访问_对象 (“http://xui.ptlogin2.qq.com/cgi-bin/xlogin?proxy_url=http%3A//qzs.qq.com/qzone/v6/portal/proxy.html&daid=5&&hide_title_bar=1&low_login=0&qlogin_auto_login=1&no_verifyimg=1&link_target=blank&appid=549000912&style=22&target=self&s_url=http%3A%2F%2Fqzs.qq.com%2Fqzone%2Fv5%2Floginsucc.html%3Fpara%3Dizone&pt_qr_app=%E6%89%8B%E6%9C%BAQQ%E7%A9%BA%E9%97%B4&pt_qr_link=http%3A//z.qzone.com/download.html&self_regurl=http%3A//qzs.qq.com/qzone/v6/reg/index.html&pt_qr_help_link=http%3A//z.qzone.com/download.html”, , , , cookie, , , , , , , , , , , )) pt_local_token ＝ 文本_取出中间文本 (cookie, “pt_local_token=”, “;”, , ) 返回 (0) .子程序 getQQList, 文本型, 公开, 获取本机登录QQ列表 返回 (编码_Utf8到Ansi (网页_访问_对象 (“http://localhost.ptlogin2.qq.com:4300/pt_get_uins?callback=ptui_getuins_CB&r=0.” ＋ 时间_取现行时间戳 () ＋ “&pt_local_tk=” ＋ pt_local_token, , , cookie, , , , , , , , , , , , ))) ' 获取登录QQ列表 .子程序 doLogin, 文本型, 公开, 登录 .参数 u, 文本型 .局部变量 location, 文本型 .局部变量 str, 文本型 网页_访问_对象 (“http://localhost.ptlogin2.qq.com:4300/pt_get_st?clientuin=” ＋ u ＋ “&callback=ptui_getst_CB&r=0.” ＋ 时间_取现行时间戳 () ＋ “&pt_local_tk=” ＋ pt_local_token, , , cookie, , , location, , 真, , , , , , , ) ' 登录 str ＝ 编码_Utf8到Ansi (网页_访问_对象 (“http://ptlogin2.qq.com/jump?clientuin=” ＋ u ＋ “&keyindex=9&pt_aid=549000912&daid=5&u1=http%3A%2F%2Fqzs.qq.com%2Fqzone%2Fv5%2Floginsucc.html%3Fpara%3Dizone&pt_local_tk=” ＋ pt_local_token ＋ “&pt_3rd_aid=0&ptopt=1&style=40”, , , cookie, , , location, , 真, , , , , , , )) ' 授权 网页_访问_对象 (“http” ＋ 文本_取出中间文本 (str, “http”, “',”, , ), , , cookie, , , location, , 真, , , , , , , ) ' 授权 返回 (str) .子程序 getCookie, 文本型, 公开, 获取cookie 返回 (cookie)