ASP生成XML的一个例子

原创 2007年10月08日 22:37:00
<!--#include file="../conn.asp"--> 
<?xml version="1.0"  encoding="GB2312"?> 
<%    Response.ContentType ="text/html" %> 
<%    
    
dim xmlDoc,root,pi,childNode,childNode_1,childNode_2,childNode_3 
    
dim rs,sql,temp,i,path 
    
dim forum_Name,forum_class_info,forum_class_num 
     
    
'Set xmlDoc = CreateObject("Msxml2.DOMDocument.4.0") 
    Set xmlDoc=Server.CreateObject ("Microsoft.XMLDOM"
    
Set rs=Server.CreateObject ("adodb.recordset"

    
'生成根节点 
    Set root=xmlDoc.createNode("element","forum_collect",""
    xmlDoc.appendChild(root) 
    
Set childNode=xmlDoc.createNode("element","forum_info",""
    root.appendChild (childNode) 
     
    
Set pi = xmlDoc.createProcessingInstruction("xml""version=""1.0"" encoding=""GB2312"""
    xmlDoc.insertBefore pi, root 
   
     
    
'生成论坛根节点 
    sql="Select top 1 forum_info From [config] order by id" 
    rs.Open sql,conn,
1,1 
    temp
=Instr(rs(0),","
    forum_Name
=Left(rs(0),temp-1
    rs.Close ()  
    
Set childNode_1=xmlDoc.createNode("element","forum_name",""
    childNode_1.text 
= forum_Name 
    childNode.appendChild (childNode_1)     
     
    sql
="Select id,[class] From [class] order by orders ,id" 
    rs.Open sql,conn,
1,1 
    forum_class_info
=rs.GetRows () 
    forum_class_num
=UBound(forum_class_info,2
    rs.Close () 
     
    
for i=0 to forum_class_num 
        
Set childNode_1=xmlDoc.createNode("element","forum_class",""
        childNode.appendChild (childNode_1)         
        
Set childNode_2=xmlDoc.createNode("element","forum_class_name",""
        childNode_2.text 
= forum_class_info(1,i) 
        childNode_1.appendChild (childNode_2) 
         
        sql
="Select boardid,boardtype From board Where [class]="&forum_class_info(0,i) 
        rs.Open sql,conn,
1,1 
        
while rs.EOF =false 
            
Set childNode_2=xmlDoc.createNode("element","forum_list",""
            childNode_1.appendChild (childNode_2)    
            
Set childNode_3=xmlDoc.createNode("element","forum_list_name",""
            childNode_3.text 
= rs(1
            childNode_2.appendChild (childNode_3)     
            
Set childNode_3=xmlDoc.createNode("element","forum_list_id",""
            childNode_3.text 
= rs(0
            childNode_2.appendChild (childNode_3) 
            rs.MoveNext ()       
        
wend 
        rs.Close () 
    
next      
     
    path
=Server.MapPath ("forumList.xml"
    Response.Write(xmlDoc.xml)   
    xmlDoc.save (path) 
%
>  
 

asp生成xml文件

  • maskice
  • maskice
  • 2015-11-24 11:56:05
  • 822

asp.net生成.xml文件的两种方法

方式一:直接使用DataSet [c-sharp] view plaincopy SqlConnection conn = new SqlConne...
  • liuay
  • liuay
  • 2015-02-12 10:08:17
  • 560

asp读写xml(有用,保存在自己博客中以后就不用去找了)

asp读写xml由于XML(可扩展标记语言:eXtensible Markup Language)真正的平台无关性,它正在逐渐成为数据传输的主要介质。XML是一种自描述的语言,数据本身就已经包含了元数...
  • fangfeng335
  • fangfeng335
  • 2010-03-10 20:13:00
  • 1491

ASP生成XML的一个例子

!--#include file="../conn.asp"--> ?xml version="1.0"  encoding="GB2312"?> %    Response.ContentType ...
  • cncco
  • cncco
  • 2007-10-08 22:37:00
  • 958

asp.net 生成 xml 文件

方式一:直接使用DataSetSqlConnection conn = new SqlConnection();conn.ConnectionString = "Server=127.0.0.1;Us...
  • bruceluo92
  • bruceluo92
  • 2009-09-29 21:06:00
  • 3250

asp 创建和读取xml文件

using System; using System.Collections.Generic; using System.Linq; using System.Web; using System.We...
  • lz37025
  • lz37025
  • 2017-01-06 11:51:33
  • 893

asp在服务器端获取网页生成的xml文件,并解析

 回帖id(pid)Dim pidpid=Request.QueryString("pid")Dim returnurl  preurl = Server.URLEncode(request.Serv...
  • xssh913913
  • xssh913913
  • 2007-08-22 18:24:00
  • 672

asp.net 生成xml文件 与 asp生成xml文件

一、asp.net 生成xml文件 二、asp 生成xml文件 1、写好asp文件后IIS部署下即可使用 2、conn.asp为连接数据库配置主文件 3、如果不部署添加个配置文件web.config也...
  • f10_s
  • f10_s
  • 2013-09-10 16:11:47
  • 1607

<em>asp</em>.net 数据库<em>生成XML</em>文件

将数据库的表<em>生成XML</em>文件 立即下载 上传者: 选择 时间: 2008-10-26 综合评分: 0 积分/C币:3 <em>asp</em>.net生成,读取,写入xml文件 立即下载 上传者: jac-...
  • 2018年04月14日 00:00

wxh生成google xml地图的asp源码.rar

  • 2007年01月29日 20:47
  • 7KB
  • 下载
收藏助手
不良信息举报
您举报文章:ASP生成XML的一个例子
举报原因:
原因补充:

(最多只允许输入30个字)