设为首页设为首页
 添加收藏添加收藏
 进入音乐版音 乐 版
  汉南在线网页设计Asp动态程序

asp读取xml文件
作  者:匿名
关键字:ASP技术应用



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


来源:网络
阅读:4
日期:2008-11-14

【 双击滚屏 】 【 收藏 】 【 打印 】 【 关闭 】 【 字体: 】 
上一篇:ASP操作XML文件的完整实例
下一篇:ASP同一站点不同编码程序出现乱码解决办法

  >> 相关文章
 
  ·ASP操作XML文件的完整实例
  ·ASP操作XML文件的方法和实现
  ·根据IP实现网址跳转
  ·ASP随机生成密码的方法
  ·asp获取随机密码
  ·ASP生成随机密码
  ·ASP随机产生用户密码
  ·用ASP制作随机密码生成器
授权使用:汉南在线 http://www.hzwz.net/(2008-2009)   
Copyright (c) 2002-2007 汉南在线. All Rights Reserved . 
经营许可证:陕ICP备05000109号 Powered by:汉南在线