0514-86177077

9:00-17:00（工作日）

主页 > 知识库 > vbs xmldom初次实战获取QQ签名的代码

vbs xmldom初次实战获取QQ签名的代码
热门标签：外呼系统说话声音小怎么办 上海办理400电话选号 企业400电话办理价钱低 外呼系统群 龙岩400电话申请 机器人打电销适用于美业吗 天津智能外呼系统排名 智云亿呼电话机器人 墨西哥地图标注app
'/*=========================================================================   
' * Intro       用XMLDOM分析QQ签名文档   
' * FileName    QQ_QianMing.vbs   
' * Author      yongfa365   
' * Version     v2.0   
' * Email       yongfa365[at]qq.com    

' * MadeTime    2008-01-22 20:55:25   
' * LastModify  2008-02-22 20:55:25   
' *==========================================================================*/   

Set Doc = CreateObject("Microsoft.XMLDOM")   
Doc.async = False  
Doc.load("http://e.cnc.qzone.qq.com/cgi-bin/cgi_emotion_indexcount.cgi?uin=64049027")   
Set root = Doc.documentElement   
Set node = root.childNodes.nextNode()   
Wscript.Echo "共"  node.text  "条签名信息"  

Set Doc = CreateObject("Microsoft.XMLDOM")   
Doc.async = False  
Doc.load("http://e.cnc.qzone.qq.com/cgi-bin/cgi_emotion_indexlist.cgi?uin=64049027emotionarchive=-1")   
Set root = Doc.documentElement   
Wscript.Echo "XML根结点名字是："  root.nodeName   
Set node = root.childNodes.nextNode()   

For nodei = 0 To node.childNodes.Length -1   
    Set NowNode = node.childNodes(nodei)   
    msg = msg  vbCrLf  "id"  ":"  NowNode.Attributes.getNamedItem("id").text   
    '    msg = msg  vbCrLf  "id"  ":"  NowNode.getAttribute("id")   
    msg = msg  vbCrLf  "title"  ":"  NowNode.selectSingleNode("title").text   
    msg = msg  vbCrLf  "pubDate"  ":"  NowNode.selectSingleNode("pubDate").text   
    '    msg = msg  vbCrLf   NowNode.childNodes(0).nodeName  ":"  NowNode.childNodes(0).text   
    '    msg = msg  vbCrLf   NowNode.childNodes(1).nodeName  ":"  NowNode.childNodes(1).text   
Next  
Wscript.Echo msg 

标签：丽水 黄山 鄂尔多斯 承德 阜新 青岛 锡林郭勒盟 齐齐哈尔

巨人网络通讯声明：本文标题《vbs xmldom初次实战获取QQ签名的代码》，本文关键词  vbs,xmldom,初次,实战,获取,；如发现本文内容存在版权问题，烦请提供相关信息告之我们，我们将及时沟通与处理。本站内容系统采集于网络，涉及言论、版权与本站无关。
  • 相关文章
  • 下面列出与本文章《vbs xmldom初次实战获取QQ签名的代码》相关的同类信息！
  • 本页收集关于vbs xmldom初次实战获取QQ签名的代码的相关信息资讯供网民参考！
    • 推荐文章

    上一篇：VBS脚本使用WMI操作注册表的代码第1/2页

    下一篇：VBS破坏性应用代码

    Copyright © 1999-2012 诚信 合法 规范的巨人网络通讯始建于2005年

    苏ICP备15040257号-8

    产品关键词： vbs xmldom初次实战获取QQ签名的代码 vbs,xmldom,初次,实战,获取,