如何把Recordset转换成彩色的XML文件

栏目: 编程语言 · 发布时间: 6年前

内容简介:如何把Recordset转换成彩色的XML文件

<%@ codepage="65001" %>

<!-- #INCLUDE FILE="ADOVBS.INC" -->

<%

Response.ContentType = "text/xml"

' 如果不在 adovbs.inc ,则设置一个常量.

 

Set Con = Server.CreateObject( "ADODB.Connection" )

Con.Open "Provider=sqloledb;UID=sa;DATABASE=Pubs"

' 建立数据库连接,如到SQL.

 

Set RS = Server.CreateObject( "ADODB.Recordset" )

' 建立并打开Recordset.

RS.ActiveConnection = Con

RS.CursorType = adOpenStatic

RS.Open "select * from titles"

 

Response.Write "<?xml version='1.0' encoding='ISO-8859-1'?>" & vbCRLF

' 发送给Response对象.

RS.Save Response, adPersistXML

%>

[1]


以上就是本文的全部内容,希望对大家的学习有所帮助,也希望大家多多支持 码农网

查看所有标签

猜你喜欢:

本站部分资源来源于网络,本站转载出于传递更多信息之目的,版权归原作者或者来源机构所有,如转载稿涉及版权问题,请联系我们

在线

在线

王坚 / 中信出版集团股份有限公司 / 2016-9-1 / CNY 58.00

互联网成为基础设施,数据成为生产资料,计算成为公共服务。 移动互联网带来的真正影响,是人们的大部分时间都消耗在在线社会上了。 50多万年前的关键词是光明与黑暗,50多年前的关键词是数字和模拟,而今天的关键词是在线与离线。 移动互联网是比传统互联网在线程度更深的互联网。手机操作系统一旦做到了在线就会带来绝佳的用户体验。苹果手机不仅淘汰了传统手机,而且带来了一个新的时代。 对于......一起来看看 《在线》 这本书的介绍吧!

HTML 编码/解码
HTML 编码/解码

HTML 编码/解码

MD5 加密
MD5 加密

MD5 加密工具

RGB HSV 转换
RGB HSV 转换

RGB HSV 互转工具