asp将数据库中的信息存储至XML文件中
作者:佚名 来源:中国软件 时间:2007-09-19 12:54:00
将数据库中的信息存储至XML文件中:save.asp
<!-- #include file="adovbs.inc" -->
<%
’ Constants file included above.
’ 如果文件存在则删除
Dim objFSO
Set objFSO = Server.CreateObject("Scripting.FileSystemObject")
If objFSO.FileExists(Server.MapPath("db_xml.xml")) Then
objFSO.DeleteFile Server.MapPath("db_xml.xml")
End IF
Set objFSO = Nothing
’变量声明
Dim cnnXML ’ ADO connection
Dim rstXML ’ ADO recordset
’创建数据连接对象
Set cnnXML = Server.CreateObject("ADODB.Connection")
’ 这是连接access数据库的例子:
’cnnXML.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" _
’ & Server.MapPath("db_scratch.mdb") & ";"
’ 下面以Sqlserver为例子讲解:
cnnXML.Open "Provider=SQLOLEDB;Data Source=10.2.1.214;" _
& "Initial Catalog=samples;User Id=samples;Password=password;" _
& "Connect Timeout=15;Network Library=dbmssocn;"
Set rstXML = Server.CreateObject("ADODB.Recordset")
Set rstXML = cnnXML.Execute("SELECT * FROM scratch ORDER BY id;")
Response.Write "<p>Saving data as XML...</p>" & vbCrLf
’ 保存至xml格式.
rstXML.Save Server.MapPath("db_xml.xml"), adPersistXML
’ 关闭对象、释放资源
rstXML.Close
Set rstXML = Nothing
cnnXML.Close
Set cnnXML = Nothing
Response.Write "<p>XML file written...</p>" & vbCrLf
Response.Write "<p>Click <a href=""db_xml.xml"">here</a> to view the file.</p>" & vbCrLf
%>
标签:xml,数据库
![](/images/zang.png)
![](/images/jiucuo.png)
猜你喜欢
ASP中Utf-8与Gb2312编码转换乱码问题的解决方法 页面编码声明
2012-11-30 20:45:55
ASP连接MSSQL的错误: 拒绝访问
2008-11-23 20:40:00
asp 采集程序常用函数分析
2011-03-16 11:03:00
人性化网页设计技巧
2007-10-15 13:02:00
taobao cdn的缓存?
2009-09-19 17:21:00
SQL Server 2005日志文件损坏的处理方法
2008-12-02 14:36:00
WSC脚本部件技术:利用Javascript编写ActiveX控件
2008-05-05 13:13:00
简单方法实现网页自动适应任何分辨率任何窗口大小
2008-09-13 19:28:00
使用Canal实现PHP应用程序与MySQL数据库的实时数据同步
2023-05-25 01:54:39
![](https://img.aspxhome.com/file/2023/0/55260_0s.png)
在Asp程序中取得表单所有内容的方法
2010-04-24 16:07:00
Oracle数据库的备份及恢复策略研究
2010-07-16 12:54:00
如何清除Vbscript惹出来的中文乱码?
2010-01-18 20:50:00
查看Oracle的执行计划一句话命令
2010-07-16 13:02:00
在Internet Explorer中正确使用MSXML
2009-02-22 18:41:00
JavaScript能判定两个function等价吗?
2009-08-13 14:45:00
三条asp语句搞定路径
2007-10-22 13:30:00
IE6下的CSS BUG枚举
2010-06-11 10:45:00
XML 在使用中产生的二十个热点问题
2008-05-29 11:07:00
DreamWeaver制作会移动的广告条
2008-02-03 11:34:00
mysql5.58的编译安装
2011-01-29 16:26:00