主頁(yè) > 知識(shí)庫(kù) > vbs xmldom初次實(shí)戰(zhàn)獲取QQ簽名的代碼

vbs xmldom初次實(shí)戰(zhàn)獲取QQ簽名的代碼

熱門(mén)標(biāo)簽:外呼系統(tǒng)說(shuō)話聲音小怎么辦 上海辦理400電話選號(hào) 企業(yè)400電話辦理價(jià)錢(qián)低 外呼系統(tǒng)群 龍巖400電話申請(qǐng) 機(jī)器人打電銷(xiāo)適用于美業(yè)嗎 天津智能外呼系統(tǒng)排名 智云億呼電話機(jī)器人 墨西哥地圖標(biāo)注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根結(jié)點(diǎn)名字是:"  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 

標(biāo)簽:麗水 黃山 鄂爾多斯 承德 阜新 青島 錫林郭勒盟 齊齊哈爾

巨人網(wǎng)絡(luò)通訊聲明:本文標(biāo)題《vbs xmldom初次實(shí)戰(zhàn)獲取QQ簽名的代碼》,本文關(guān)鍵詞  vbs,xmldom,初次,實(shí)戰(zhàn),獲取,;如發(fā)現(xiàn)本文內(nèi)容存在版權(quán)問(wèn)題,煩請(qǐng)?zhí)峁┫嚓P(guān)信息告之我們,我們將及時(shí)溝通與處理。本站內(nèi)容系統(tǒng)采集于網(wǎng)絡(luò),涉及言論、版權(quán)與本站無(wú)關(guān)。
  • 相關(guān)文章
  • 下面列出與本文章《vbs xmldom初次實(shí)戰(zhàn)獲取QQ簽名的代碼》相關(guān)的同類(lèi)信息!
  • 本頁(yè)收集關(guān)于vbs xmldom初次實(shí)戰(zhàn)獲取QQ簽名的代碼的相關(guān)信息資訊供網(wǎng)民參考!
  • 推薦文章