asp 生成XML - Web 开发 / ASP
原XML文件;
<?xml version="1.0" encoding="utf-8" ?>
<dataroot>
<news>
<new>
<title>新闻标题1</title>
<shortdesc><![CDATA[sinker.cn flash片]]></shortdesc>
<date>1</date>
<link>http://www.sinker.cn</link>
</new>
<new>
<title>新闻标题2</title>
<shortdesc><![CDATA[sinker.cn flash片]]></shortdesc>
<date>1</date>
<link>http://www.sinker.cn</link>
</new>
</news></dataroot>
下面是我做的生成像上面那个XML内容的xml.asp文件;代码如下:
<% @language="VBScript" @codepage="65001"%>
<%
Option Explicit
Response.contentType="news/xml"
dim conn,connstr,rs,sql
connstr="provider=Microsoft.Jet.OLEDB.4.0;data source="&Server.MapPath("Data-2007/sou596#zuoyun.mdb")&";"
set conn=Server.CreateObject("ADODB.Connection")
set rs=Server.CreateObject("ADODB.RecordSet")
conn.open connstr
sql="select top 6 * from news order by ID desc"
rs.open sql,conn,1,1
Response.Write("<?xml version='1.0' encoding='utf-8'?><dataroot><news>")
%>
<%
do while not rs.eof
Response.Write("<new><titl
相关问答:
txt 和XML 格式相应
不借助DataSet
导入读取TXT文件
然后直接写入XML(同一文件,不同数据,递增原数据没有被覆盖情况下增加数据.)
教个要点或最好是有个代码提示的
过路好汉 帮个忙撒^^
不会,帮楼主 ......
asp虚拟主机实现伪静态的方法:
1、 重写url参数
Step1: 建立前台文件index.asp,修改url参数形式。由于读取数据库中的记录不是专题的重点,故直接给出:
<!--#include file="config.asp" -->
&l ......
Private Sub Command1_Click()
Dim MyString() As String
Open "a.xml" For Binary As #1 ' 打开刚创建的文件。
ReDim MyString(LOF(1) - 1)
Put #1, , MyRecord ' 读入所有字符到变量中 ......
Microsoft JET Database Engine '80040e07'
标准表达式中数据类型不匹配。
\wwwroot\update.asp, line 20
--------------------------------------------------------------------------------
Ho ......
大家好!我是一个学生,现在是学ASP的不知道怎么回事,我自己是用CMS做过网站 代码也能看懂一点 现在想买本书,想法有很多,就是想买ASP的 又看到大家说ASP以后没有NET前景好,我又想再去买本ASP.NET的 我知道有这样的想法 ......