通过MSXML2自动获取QQ个人头像及在线情况(给初学者)

不知道大家对MSXML2.XMLHTTP是不是很熟悉,不过它的功能可以说是达到了极点.你可以通过它把别人的网站都"搬回来",呵呵,吹牛啦!!
今天我就用它从腾讯网站获取一个QQ号码的头像,在线情况(人家隐身了我也没办法).当然大家也可以获取QQ的昵称,所在地等.具体实现方法如下:
先建立两个函数,用来处理一个URL


代码如下:

<% 
function getHTTPPage(url) 
dim http 
set http=createobject("MSXML2.XMLHTTP") 
Http.open "GET",url,false 
Http.send() 
if Http.readystate<>4 then  
exit function 
end if 
getHTTPPage=bytes2BSTR(Http.responseBody) 
set http=nothing 
if err.number<>0 then err.Clear  
end function 
'''''''以下处理字符 
Function bytes2BSTR(vIn) 
dim strReturn 
dim i,ThisCharCode,NextCharCode 
strReturn = "" 
For i = 1 To LenB(vIn) 
ThisCharCode = AscB(MidB(vIn,i,1)) 
If ThisCharCode < &H80 Then 
strReturn = strReturn & Chr(ThisCharCode) 
Else 
NextCharCode = AscB(MidB(vIn,i+1,1)) 
strReturn = strReturn & Chr(CLng(ThisCharCode) * &H100 + CInt(NextCharCode)) 
i = i + 1 
End If 
Next 
bytes2BSTR = strReturn 
End Function 
%>

这两个函数你可以收藏起来,用处大得不得了.
大家可以先看看这个地址http://friend.qq.com/cgi-bin/friend/oicq_find?oicq_no=5292816
(QQ是本人的,我每天都很忙,请大家自觉,呵呵,讨论问题非常欢迎)
以下我们就通过腾讯的好友查找来获取信息,
<%
function qqhead(qq)
url="http://friend.qq.com/cgi-bin/friend/oicq_find?oicq_no="&qq
content=getHTTPPage(url)
if len(content)>6360 then '如果QQ无效,做一些处理,避免错误发生.
content=replace(mid(content,instr(content,"http://img.tencent.com"),38),"""","")
qqhead="<a href='http://friend.qq.com/cgi-bin/friend/user_show_info?ln="&qq&"' target='_blank'><img src='"&content&"' title='QQ:"&qq&"' border='0'></a>"
else
qqhead=""
end if
end function
'OK了,大功告成了.现在大家只要调用就行了.
response.write qqhead(5292816)
如果QQ头像是彩色的,说明好友在线,灰的就是不在线.
%>

大家可以到http://www.okwest.net/books看看效果.呵呵.

(0)

相关推荐

  • 通过MSXML2自动获取QQ个人头像及在线情况(给初学者)

    不知道大家对MSXML2.XMLHTTP是不是很熟悉,不过它的功能可以说是达到了极点.你可以通过它把别人的网站都"搬回来",呵呵,吹牛啦!! 今天我就用它从腾讯网站获取一个QQ号码的头像,在线情况(人家隐身了我也没办法).当然大家也可以获取QQ的昵称,所在地等.具体实现方法如下: 先建立两个函数,用来处理一个URL 复制代码 代码如下: <%  function getHTTPPage(url)  dim http  set http=createobject("MSX

  • php获取QQ头像并显示的方法

    本文实例讲述了php获取QQ头像并显示的方法.分享给大家供大家参考.具体分析如下: 最近看到博客留言的头像有点别扭,因为游客的头像都是同一个头像,看着不是很舒服.虽然现在绝大多数的主题集成了Gavatar头像功能,先不说gavatar被墙的问题,我自己现在都没弄个gavatar头像. 因为我登陆了几次,连接速度巨慢,所以我就放弃了,当然留言插件也不胜枚举,比如现在比较火的多说,但对于没有注册多说的朋友,头像仍是个问题,对于多说的社交账号绑定,我测试多次,QQ,人人这些主流平台的绑定经常出错,而且

  • 批处理自动登录QQ小结及相关讨论

    转载自 葬祭在骷髅最终编辑 LJ_SunTB原理及使用方法: 代码: start "" "C:\Program Files\Tencent\QQ\qq.exe" /start QQUIN:843875648 PWDHASH:4Z1c1a8DeNoF9j+JHHRnrw== /stat:40引用: 10:上线登陆 40:隐身登陆 41:上线登陆 QQUIN和PWDHASH必须使用大写字母 原理:QQ在传输密码的时候,先做一次MD5加密,再做一次BASE64变换,这样可

  • springboot对接第三方微信授权及获取用户的头像和昵称等等

    大家好,我是小铁,铁铁最近太忙了.一直再不停的敲啊敲. 今天来点第三方的干货(微信授权) 底下的这张图是微信授权的流程图. 1.流程图 2.发送请求 讲一下:微信授权分为两种,一种是静默授权,另一种是非静默授权.具体的话可以看一下微信授权文档微信官方文档 看着这么多的字,不光你烦,小铁看着也是烦的很啊. 我大概的说一下,授权有两种授权方式 1)静默授权,大概的意思就是说,你只能拿code换openid 剩下的都换不了(scope=snsapi_base)并且自动跳转到回调页面(给用户的感觉是直接

  • php版微信自动获取收货地址api用法示例

    本文实例讲述了php版微信自动获取收货地址api用法.分享给大家供大家参考,具体如下: 微信公众平台现在是越来越强大了,我们可以通过各种api接口来与平台对接获取对应的数据了,下面来看一个由php实现的微信自动获取收货地址api程序,具体如下. 关于接口的说明我就不介绍了,在官方可以看到下面只看处理程序. public function get_address_api() { $APPID=C('APPID'); $SCRETID=C('SCRETID'); if (!isset($_GET['

  • php模拟用户自动在qq空间发表文章的方法

    本文实例讲述了php模拟用户自动在qq空间发表文章的方法.分享给大家供大家参考.具体分析如下: 我们这里是一个简单的利用php来模拟登录后再到QQ空间发送文章的一个简单的程序,有需要的朋友可以参考,或改进可以给我意见,代码如下: 复制代码 代码如下: <?php //模拟get post请求函数 /* 函数说明: 功能:请求方式可以get,post,可以发送的cookie,保存的cookiefile文件 参数:$url-----请求url    $referer---来源url    $post

  • Android如何获取QQ与微信的聊天记录并保存到数据库详解

    前言 提前说明下:(该方法只适用于监控自己拥有的微信或者QQ ,无法监控或者盗取其他人的聊天记录.本文只写了如何获取聊天记录,服务器落地程序并不复杂,不做赘述.写的仓促,有错别字还请见谅.) 为了获取黑产群的动态,有同事潜伏在大量的黑产群(QQ 微信)中,干起了无间道的工作.随着黑产群数量的激增,同事希望能自动获取黑产群的聊天信息,并交付风控引擎进行风险评估.于是,我接到了这么一个工作-- 分析了一通需求说明,总结一下: 能够自动获取微信和 QQ群的聊天记录 只要文字记录,图片和表情包,语音之类

  • 有趣的Python图片制作之如何用QQ好友头像拼接出里昂

    在本篇博客中,我们将实现两个功能: 将所有头像合并为大图 将所有头像以某个模板合成大图 同样,先给上所有运行效果图: 代码实现 1.代码所需库 import requests,codecs,re,urllib,os,random,math from PIL import Image import numpy as np import cv2 as cv 2.代码讲解 本篇博客就不再讲解如何获取好友头像了,需要的可以参考这篇博文: python爬虫-从QQ邮箱获取好友信息并爬取头像 现在,我们已经

  • Python 将 QQ 好友头像生成祝福语的实现代码

    本文我们来看一下如何使用 Python 将 QQ 好友头像拼成"五一快乐"四个字.我们可以将整个实现过程分为两步:爬取 QQ 好友头像.利用好友头像生成文字. 爬取头像 爬取 QQ 好友头像我们需要借助于 QQ 邮箱,首先我们从浏览器上登录 QQ 邮箱,之后按 F12 键打开开发者工具并用鼠标选中 Network 选项,如下图所示: 再接着我们按 F5 键刷新一下网页,然后在 Filter 中输入 laddr_lastlist ,如下图所示: 我们再点 Name 下的链接,点击之后右侧

  • Python如何自动获取目标网站最新通知

    不管是一名学生,亦或是一名员工,我们都需要时刻注意学校或公司网站的通知,尽量做到即时获取最新消息. 大部分博客或数据资源网站都会有自己的RSS提示系统,便于将网站的最新信息及时推送给需要的用户,而用户也可以通过RSS阅读器来即时地获取到目标网站的最新内容. 由于学校或公司网站服务对象的特殊性和局限性,一般不会建立自己的RSS系统. 作为优秀的人儿,我们可以建立自己的RSS提示系统. 这里介绍了如何使用Python和常用的计算机小程序来构建一个RSS提示系统,做到定时自动检测目标网站发布的通知,并

随机推荐