如何使用 VBScript 在 ASP 中创建不连续的 ADO 记录集

 ASP 的原则之一是尽快释放 ADO 对象，从而释放这些对象所使用的系统资源。ADO 非连接记录集这一功能允许记录集在没有活动连接时也能存在；这可以节省数据库服务器资源并提高伸缩性。ADO 非连接记录集要求使用客户端游标，这可以通过将 Connection 对象的 CursorLocation 属性设置为 adUseClient 来实现。

下面的示例代码使用 Microsoft OLEDB Provider for SQL Server (SQLOLEDB) 连接到随 SQL Server 安装一起提供的 Northwind 示例数据库。要运行这些示例，需修改连接字符串和 SELECT 语句以适应您的环境。另外，还要为 ADO 常量的 Include 文件设置正确的路径。

VBScript 中的非连接记录集

<script type="text/javascript">loadTOCNode(3, 'moreinformation');</script>

<%@Language="VBScript"%>
<!-- Include file for VBScript ADO Constants -->
<!--#include File="adovbs.inc"-->
<%
	' Connection string.
	strCon = "Provider=sqloledb;Data Source=myServer;Initial Catalog=Northwind;User Id=myUser;Password=myPassword"
		   
	' Create the required ADO objects.
	Set conn = Server.CreateObject("ADODB.Connection")
	Set rs = Server.CreateObject("ADODB.recordset")
		   
	' Open the connection.
	conn.Open strCon
	
	' Retrieve some records.
	strSQL = "Select * from Shippers"
	rs.CursorLocation = adUseClient
	rs.Open strSQL, conn, adOpenStatic, adLockOptimistic

	' Disconnect the recordset.
	Set rs.ActiveConnection = Nothing
		
	' Release the connection.
	conn.Close

	' Check the status of the connection.
	Response.Write("<BR> Connection.State = " & conn.State)

	Set conn = Nothing
	
	' Use the diconnected recordset here.

	' Release the recordset.
	rs.Close
	Set rs = Nothing
%>
				

另附: ActiveConnection&CursorType 说明

看见很多的初学者对于数据库的操作有一些问题，以及参数，作为过来人，我对于这方面也吃过很多的苦头（我也是菜鸟一个嘛），希望能与大家一起分享。

recordset.Open Source,ActiveConnection,CursorType,LockType,Options

Source
Recordset对象可以通?齋ource属性来连接Command对象。Source参数可以是一个Command对象名称、一段SQL命令、一个指定的数据表名称或是一个Stored Procedure。假如省略这个参数，系统则采用Recordset对象的Source属性。

ActiveConnection
Recordset对象可以通过ActiveConnection属性来连接Connection对象。这里的ActiveConnection可以是一个Connection对象或是一串包含数据库连接信息（ConnectionString）的字符串参数。

CursorType
Recordset对象Open方法的CursorType参数表示将以什么样的游标类型启动数据，包括adOpenForwardOnly、adOpenKeyset、adOpenDynamic及

adOpenStatic，分述如下：
常数 常数值 说明
adOpenForwardOnly 0 缺省值，启动一个只能向前移动的游标（Forward Only）。
adOpenKeyset 1 启动一个Keyset类型的游标。
adOpenDynamic 2 启动一个Dynamic类型的游标。
adOpenStatic 3 启动一个Static类型的游标。

2.
以上几个游标类型将直接影响到Recordset对象所有的属性和方法，以下列表说明他们之间的区别。
Recordset属性 1 2 3 4
AbsolutePage 不支持 不支持 可读写 可读写
AbsolutePosition不支持 不支持 可读写 可读写
ActiveConnection可读写 可读写 可读写 可读写
BOF 只读 只读 只读 只读
Bookmark 不支持 不支持 可读写 可读写
CacheSize 可读写 可读写 可读写 可读写
CursorLocation 可读写 可读写 可读写 可读写
CursorType 可读写 可读写 可读写 可读写
EditMode 只读 只读 只读 只读
EOF 只读 只读 只读 只读
Filter 可读写 可读写 可读写 可读写
LockType 可读写 可读写 可读写 可读写
MarshalOptions 可读写 可读写 可读写 可读写
MaxRecords 可读写 可读写 可读写 可读写
PageCount 不支持 不支持 只读 只读
PageSize 可读写 可读写 可读写 可读写
RecordCount 不支持 不支持 只读 只读
Source 可读写 可读写 可读写 可读写
State 只读 只读 只读 只读
Status 只读 只读 只读 只读
AddNew 支持 支持 支持 支持
CancelBatch 支持 支持 支持 支持
CancelUpdate 支持 支持 支持 支持
Clone 不支持 不支持
Close 支持 支持 支持 支持
Delete 支持 支持 支持 支持
GetRows 支持 支持 支持 支持
Move 不支持 支持 支持 支持
MoveFirst 支持 支持 支持 支持
MoveLast 不支持 支持 支持 支持
MoveNext 支持 支持 支持 支持
MovePrevious 不支持 支持 支持 支持
NextRecordset 支持 支持 支持 支持
Open 支持 支持 支持 支持
Requery 支持 支持 支持 支持
Resync 不支持 不支持 支持 支持
Supports 支持 支持 支持 支持
Update 支持 支持 支持 支持
UpdateBatch 支持 支持 支持 支持

3.
其中NextRecordset方法并不适用于Microsoft Access数据库。
LockType
Recordset对象Open方法的LockType参数表示要采用的Lock类型，如果忽略这个参数，那么系统会以Recordset对象的LockType属性为预设值。LockType参数包含adLockReadOnly、adLockPrssimistic、adLockOptimistic及adLockBatchOptimistic等，分述如下：

4.常数 常数值 说明
adLockReadOnly 1 缺省值，Recordset对象以只读方式启动，无法运行AddNew、Update及Delete等方法
adLockPrssimistic 2 当数据源正在更新时，系统会暂时锁住其他用户的动作，以保持数据一致性。
adLockOptimistic 3 当数据源正在更新时，系统并不会锁住其他用户的动作，其他用户可以对数据进行增、删、改的操作。
adLockBatchOptimistic 4 当数据源正在更新时，其他用户必须将CursorLocation属性改为adUdeClientBatch才能对数据进行增、
删、改的操作。 
 

注意，记录集是通过将ActiveConnection 属性设置为 Nothing 断开连接的。