首  页
站长信箱
868搜索
网站登录
免费计数器
免费留言本
IP来源查询
网站技术教程
网站流量统计
文章探索:   分类:    关键字:  
    什么?你还在找兼职?上兼客吧,现在兼客吧平台太火了,知名度和诚信度也很高,注册就送0.5元现金,满3元就能提现,马上到账了!最低3元就能提现,大家可以注册下试试!注册地址:http://www.jiankeba.com/computeryc1688
  + 栏目导航
  + 相关文章
用ASP生成XML数据文档(RSS订阅..
asp添加xml节点问题
Asp.net+Xml实现无数据库论坛(..
Asp.net+Xml实现无数据库论坛(..
Asp.net+Xml实现无数据库论坛(..
js添加、修改、删除xml节点例子
ASP.NET查找XML节点的几个方法
使用ASP添加xml节点功能
使用asp修改xml中的节点
ASP历遍XML节点与字节点之简单..
ASP向xml文件中的添加节点
ASP遍历XML节点
asp修改xml节点属性
小白ajax定时更新xml数据练习
Ajax核心:XMLHTTP组件相关技术..
远程获取内容,并将内容存在本..
xmlhttp组件获取远程文件并筛选..
XMLHTTP对象及其方法
把HTML表单提交的数据转化成XML..
利用XMLHTTP无刷新添加数据之Po..
Js+Xml:不刷新页面获取对应网址..
xml(元标记语言)学习基础一
Java语言编程中更新XML文档的常..
简析JAVA中的XML编程
XML及其技术指南
XML教程(2)--XML元素与XML属性..
XML教程(1)--严格的语法
从XML到Java代码的数据绑定之一
神奇的XML--突破CGI权限的约束
基于XML的数据库总体分析

技术教程 -> XML教程 ->  
ASP向xml文件中的添加节点
来源:转载   人气:2780   录入时间:2008/12/29


    <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
   <HTML>
   <HEAD>
    <TITLE> 向xml中添加新节点 </TITLE>
    <META NAME="Generator" CONTENT="EditPlus">
    <META NAME="Author" CONTENT="">
    <META NAME="Keywords" CONTENT="">
    <META NAME="Description" CONTENT="">
    <style>
    body {font-size:12px;}
    </style>
   </HEAD>
   
   <BODY>
   <!--#include file="top.asp"-->
   <%
   addok=request("addok")
   If addok="" Or IsNull(addok) Then
   %>
    <form name="form1" method="post" action="?addok=add">
    网站名:<input type="text" name="site" size="30" >
   
    网 址:<input type="text" name="url" size="40">
   
    <input type="submit" value="提交"> <input type="reset" value="重置">
    </form>
   <%
   End If
   If addok="add" then
    site=request("site")
    url=request("url")
    strSourceFile = Server.MapPath("./") & "\test.xml"
   ''获取XML文件的路径这里根据你的虚拟目录不同而不同
   Set objXML = Server.CreateObject("Microsoft.XMLDOM")
   ''创建XML对像
   objXML.load(strSourceFile)
   ''把XML文件读入内存中
   Set objRootlist = objXML.documentElement.selectSingleNode("root")
   ''选取<root>节点
   if objRootlist.hasChildNodes then
   ''判断<NewList>是否有子节点(因为如果是每一次<root>是没有子节点的, 如果不加判断在第一次运得时就会报错
   id = objRootlist.lastchild.firstchild.text+1
   ''这里获得将要插入子节点的ID号,其ID号为<root>的最后一个子节点(lastchild)的第一个子节点(firstchild)
   ''的ID号加1(这里我们按照关系型数据库的ID号来递增)
   else
   ''如是没有字子节点则是第一次留言ID号设为1
   id=1
   end If
   brstr=chr(13)&chr(10)&chr(9)
   XMLnode=brstr&"<list>"&vbnewline & _
    "<id>"&id&"</id>"&vbnewline & _
   "<name>"&site&"</name>"&vbnewline & _
   "<url>"&url&"</url>"&vbnewline & _
   "<time>"&Replace(Replace(Now(),"上午 ",""),"下午 ","")&"</time>"&vbnewline & _
   "</list>"&vbnewline&vbnewline
   
    ''根据得到的数据建立XML片段
   set objXML2=Server.CreateObject("Microsoft.XMLDOM")
   ''建立一个新XML对像
   objXML2.loadXML(XMLnode)
   ''把XML版片段读入内存中
   set rootNewNode=objXML2.documentElement
   ''获得objXML2的根节点
   objRootlist.appendChild(rootNewNode)
   ''把XML片段插入到test.xml中
   objXML.save(strSourceFile)
   ''存储test.xml文件(因为不存储test.xml只在内存中更新了)
   set objXML=nothing
   set objXML2=nothing
   Response.Redirect("index.asp")
   response.end
   End If
   %>
   </BODY>
   </HTML>
   
   test.xml中的内容是
   <?xml version="1.0" encoding="gb2312"?>
   <site>
   <root>
    <list>
    <id>0</id>
    <name>新浪</name>
    <url>http://www.sina.com.cn</url>
    <time>2007-11-1 10:10:10</time>
    </list>
   </root>
   </site>
   



| 网站转让 | 站长信箱 | 网站登录 | 技术教程 | 免费计数器 | 免费留言本 | 868流量统计 | 好帮手网站营销 |
地址:广东省阳江市  联系电话:13725641179 杨先生
Copyright 2004-2019 868资源网- 版权所有    粤ICP备05007330号