当前位置: 首页 > 图文教程 > 网络编程 > ASP > 将Recordset作为XML保存

ASP
发送带附件的HTML格式邮件例程
调用winzip命令行对上传的多个文件打包压缩
怎样做自己的二级域名(之一)
怎样做自己的二级域名(之二)
怎样做自己的二级域名(之三)
从新浪提取上海天气的vbs
列出服务器上的打印机
2栏分页显示(附显示的形式[1][2])
2栏分页显示(附显示的形式前页,后页)
购物车范例(购物车页面 )
购物车范例(处理页面)
GB码和BIG5码的互换技术
在ASP中改善动态分页的性能
利用ASP实现对表的分页浏览(上)
利用ASP实现对表的分页浏览(下)
ASP后台快速调用Mysql 数据库
网络寻呼机数据库版发送消息tomessage.asp
网络寻呼机数据库版处理发送消息SubmitMessage.asp
网络寻呼机数据库版显示消息showmessage.asp
网络寻呼机数据库版显示历史消息history.asp

ASP 中的 将Recordset作为XML保存


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-11-03   浏览: 153 ::
收藏到网摘: n/a

 

微软使得将ActiveX数据对象(ADO)的Recordset作为XML在ADO 2.1里保存成为可能。这对于将Recordset保存在客户计算机上用于脱机使用很有用处。如果你希望通过可扩展样式表语言转换(XSLT)来操控Recordset的数据,那么这一能力也是很有用的。

 
要将Recordset作为XML来保存,就要调用Save方法,并将目标文件及adPersistXML标志进行传递:

Dim rst As Recordset

Set rst = New Recordset
rst.ActiveConnection = "PROVIDER=SQLOLEDB;DATA SOURCE=SQLServer;" & _
                       "Initial Catalog=pubs;Integrated Security=SSPI"
rst.CursorLocation = adUseClient
rst.Open "Select * from authors where au_lname = 'Smith'"
rst.SaveApp.Path & "\recordset.xml", adPersistXML
rst.Close

如果所指定的文件命已经存在,那么对Save方法的调用就会导致一个运行错误。

要打开已经保存的Recordset,就要将文件名传递给Recordset的Open方法。设置ActiveConnection属性能够让你将Recordset保存会数据库里:

Dim rst As Recordset

Set rst = New Recordset
rst.CursorLocation = adUseClient
rst.OpenApp.Path & "\recordset.xml"
rst.ActiveConnection = "PROVIDER=SQLOLEDB;DATA SOURCE=SQLServer;" & _
                       "Initial Catalog=pubs;Integrated Security=SSPI"

MsgBoxrst.RecordCount