当前位置： 移动技术网 > IT编程>开发语言>Asp > asp读取xml文件

asp读取xml文件

2017年12月12日  | 移动技术网IT编程  | 我要评论
复制代码 代码如下:
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

您可能感兴趣的文章:

如对本文有疑问， 点击进行留言回复！！

相关文章:

验证码：
最近更新的文章
大家感兴趣的文章
移动技术网