asp讀取xml檔案

來源:互聯網
上載者:User
xml strSourceFile = Server.MapPath(dataxml&"/Advertisement/"&id&"/adv.xml")
    Set objXML =Server.CreateObject("Microsoft.XMLDOM")  '建立一個XML對像
     objXML.load(strSourceFile)  '把XML檔案讀入記憶體     
    Set xml=objXML.documentElement.selectSingleNode("Advertisement")  '選取節點 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
        if advertvirtualvalue>=1 then
        xml.childNodes.item(3).text=2
        objXML.save(strSourceFile)
        end if
    end if
 Set xml=nothing
Set objXML =nothing


相關文章

Beyond APAC's No.1 Cloud

19.6% IaaS Market Share in Asia Pacific - Gartner IT Service report, 2018

Learn more >

Apsara Conference 2019

The Rise of Data Intelligence, September 25th - 27th, Hangzhou, China

Learn more >

Alibaba Cloud Free Trial

Learn and experience the power of Alibaba Cloud with a free trial worth $300-1200 USD

Learn more >

聯繫我們

該頁面正文內容均來源於網絡整理,並不代表阿里雲官方的觀點,該頁面所提到的產品和服務也與阿里云無關,如果該頁面內容對您造成了困擾,歡迎寫郵件給我們,收到郵件我們將在5個工作日內處理。

如果您發現本社區中有涉嫌抄襲的內容,歡迎發送郵件至: info-contact@alibabacloud.com 進行舉報並提供相關證據,工作人員會在 5 個工作天內聯絡您,一經查實,本站將立刻刪除涉嫌侵權內容。