asp讀取xml文件和記數(shù)
復(fù)制代碼 代碼如下:if isnumeric(id)=false then exit sub
strSourceFile = Server.MapPath(dataxml&"/Advertisement/"&id&"/adv.xml")
Set objXML =Server.CreateObject("Microsoft.XMLDOM") "創(chuàng)建一個(gè)XML對(duì)像
objXML.load(strSourceFile) "把XML文件讀入內(nèi)存
Set xml=objXML.documentElement.selectSingleNode("Advertisement") "選取節(jié)點(diǎn) Advertisement
ADid=xml.childNodes.item(0).text
ADname=xml.childNodes.item(1).text
ADintro=xml.childNodes.item(2).text
ADact=xml.childNodes.item(3).text
ADclass=xml.childNodes.item(4).text
Pids=xml.childNodes.item(5).text
Picid=xml.childNodes.item(6).text
ADurl=xml.childNodes.item(7).text
ADwindow=xml.childNodes.item(8).text
ADshow=xml.childNodes.item(9).text
ADshows=xml.childNodes.item(10).text
ADclick=xml.childNodes.item(11).text
ADclicks=xml.childNodes.item(12).text
ADtime=xml.childNodes.item(13).text
ADstoptime=xml.childNodes.item(14).text
ADstarttime=xml.childNodes.item(15).text
ADxslei=xml.childNodes.item(16).text
ADcss=xml.childNodes.item(17).text
Picurl=xml.childNodes.item(18).text
ADipkg=xml.childNodes.item(19).text
xml.childNodes.item(9).text=xml.childNodes.item(9).text+1 "" 顯示次數(shù)加 1
objXML.save(strSourceFile)
Set xml=nothing
Set objXML =nothing
相關(guān)文章:
1. Java 生成帶Logo和文字的二維碼2. Android自定義控件實(shí)現(xiàn)方向盤效果3. 解決在Vue中使用axios POST請(qǐng)求變成OPTIONS的問題4. XHTML 1.0:標(biāo)記新的開端5. Vue為什么要謹(jǐn)慎使用$attrs與$listeners6. springcloud alibaba nacos linux配置的詳細(xì)教程7. SpringBoot整合MybatisPlus的教程詳解8. python 實(shí)現(xiàn)圖片修復(fù)(可用于去水印)9. python中的socket實(shí)現(xiàn)ftp客戶端和服務(wù)器收發(fā)文件及md5加密文件10. 怎樣才能用js生成xmldom對(duì)象,并且在firefox中也實(shí)現(xiàn)xml數(shù)據(jù)島?
