婷婷综合国产,91蜜桃婷婷狠狠久久综合9色 ,九九九九九精品,国产综合av

主頁 > 知識庫 > 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簽名的代碼的相關信息資訊供網民參考！
    • 推薦文章
    主站蜘蛛池模板： 仪征市| 乌拉特前旗| 天门市| 汨罗市| 巩义市| 池州市| 牙克石市| 吉林省| 城固县| 沙洋县| 夏津县| 彰化县| 碌曲县| 巴彦淖尔市| 大厂| 阜南县| 无极县| 福建省| 武汉市| 克拉玛依市| 广平县| 财经| 七台河市| 佳木斯市| 莱芜市| 灯塔市| 灌云县| 鄂托克前旗| 珲春市| 深圳市| 上犹县| 柘荣县| 新龙县| 广灵县| 金昌市| 道真| 集安市| 信阳市| 简阳市| 久治县| 千阳县|