从SQL中读取数据并保存到XML文件中，给个例子#99
如何从SQL数据库中读取数据并保存到XML文件中
答案:3 悬赏:70
解决时间 2021-04-28 00:15
- 提问者网友：℡她的他i☆
- 2021-04-27 03:09
最佳答案
- 二级知识专家网友：木子香沫兮
- 2021-04-27 04:22
用asp读取数据库SQL
保存到HTML，试试导出行不
全部回答
- 1楼网友：输掉的尊严
- 2021-04-27 06:02
public void updateXml(string quyu) { XmlDocument document = new XmlDocument(); DataSet ds=flash.quyuSearch(quyu); string text = null; int count = ds.Tables[0].Rows.Count; for(int i=0;i<count;i++) { text+="<item item_url="+"'admin/upLoad/"+ds.Tables[0].Rows[i]["imgUrl"].ToString()+"'"+" link="+"'http://"+ds.Tables[0].Rows[i]["link"].ToString()+"'"+" />"; } text = text.Replace("&","&"); document.LoadXml(@"<bcaster>" + text + "</bcaster>"); string path = "~/flash/" + quyu + ".xml"; document.Save(HttpContext.Current.Server.MapPath(path)); ds.Dispose(); ds = null; }
- 2楼网友：懂得ㄋ、沉默
- 2021-04-27 04:30
asp的
<!--#include file="conn.asp"-->
<%
Dim sSQL
dim rs
dim sCrLf
dim sXmlClear
dim sRssHead
dim sRssEnd
sCrLf = chr(13)&chr(10) '回车+换行
sXmlClear = sXmlClear & "<?xml version='1.0' encoding='GB2312'?>" & sCrLf
sRssHead = "<rss version='2.0'>" & sCrLf
sRssHead = sRssHead & "<channel>" & sCrLf
sRssHead = sRssHead & "<title> Hi </title>" & sCrLf
sRssHead = sRssHead & "<description>Look</description>" & sCrLf
sRssHead = sRssHead & "<link>See It</link>" & sCrLf
sRssHead = sRssHead & "<language>zh-cn</language>" & sCrLf
sRssHead = sRssHead & "<docs>Why100000.COM News Center</docs>" & sCrLf
sRssHead = sRssHead & "<generator>Rss Generator By WWW.shangyusoft.COM</generator>" & sCrLf
sRssEnd = "</channel></rss>"
Response.CharSet="gb2312" '数据集
Response.ContentType="text/xml" '数据流格式定义
'输出：
Response.write sXmlClear
Response.write sRssHead
OpenData
sSQL="select * from c_news"
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open sSQL, Conn,1,1
if not (rs.eof and rs.bof) then
do while not rs.eof
listinfo=listinfo & "<item>" & sCrLf
listinfo=listinfo &"<title> " & rs("c_title") & " </title>" & sCrLf
listinfo=listinfo &"<link> " & " http://www.shangyusoft.com/" & rs("c_content") & " </link>" & sCrLf
listinfo=listinfo &"<author> " & rs("c_relation") & " </author>" & sCrLf
listinfo=listinfo &"<pubDate> " & rs("c_time") & " </pubDate>" & sCrLf
listinfo=listinfo &"</item>" & sCrLf & sCrLf
rs.movenext
loop
end if
rs.close
set rs=nothing
Response.write sRssEnd
body=sXmlClear&sRssHead&listinfo&sRssEnd
writexml "A.xml",body
function writexml(filename,bodytext)
Set fso = Server.CreateObject("Scripting.FileSystemObject")
Set fout = fso.CreateTextFile(Server.MapPath(filename),true)
fout.WriteLine bodytext
fout.close
end function
%>
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
点此我要举报以上问答信息！
大家都在看
推荐信息