asp读取xml文件和记数

时间:2021-03-17 人气:1

想了解asp读取xml文件和记数的相关内容吗，在本文为您仔细讲解的相关知识和一些Code实例，欢迎阅读和指正，我们先划重点：asp读取xml文件和记数，下面大家一起来学习吧。

if isnumeric(id)=false then exit sub
 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 
    xml.childNodes.item(9).text=xml.childNodes.item(9).text+1  '' 显示次数加 1 
    objXML.save(strSourceFile) 
Set xml=nothing 
Set objXML =nothing

加载全部内容