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
相关问答:
C# code:
SqlConnection conn = CsDB.sqlcon();
SqlDataAdapter da = new SqlDataAdapter("select fwCoding from bjmuma_fwCoding where OrderNumber='" + Order + & ......
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 ......
我有两个dropdownlist都绑好了值,想选中一个dropdownlist中的值,然后在另一个dropdownlist中选中相应的一项。
不是从新绑定第二个dropdownlist,是在已经绑好的值当中选中一个。
我想用js写
求助
你可以把drop ......
O O O O O O
|.......| |........| |.......|
| | |
O O ......