对记录集出现的一些问题的总结

  1.set rs =nothing和rs.close的异同点

setrs=nothing是清空对象 ，要将对象从内存中完全删除，可将对象变量设置为 Nothing。

rs.close  是关闭对象， 使用 Close方法可关闭   Connection   对象或 Recordset对象以便释放所有关联的系统资源。关闭对象并非将它从内存中删除，可以更改它的属性设置并且在此后再次打开。

联系实际：拿一个装了水的瓶子比喻：set rs=nothing就是把水倒掉，当你要喝时它已经没有了，只能再一次的装水才可以；而rs.close是将水杯的盖子盖住，当你想喝水时，只要打开盖子就可以了，水还是存在的。

 2.

Public Function ExecuteSQL(ByVal SQL As String, MsgString As String) As adodb.Recordset   

'执行SQL语句,注意理解函数返回值是一个记录集

Dim cnn As adodb.Connection

Dim rst As adodb.Recordset

Dim sTokens() As String

 

On Error GoTo ExecuteSQL_error       '错误处理

sTokens = Split(SQL)

Set cnn = New adodb.Connection

cnn.Open ConnectString

 

If InStr("INSERT,DELETE,UPDATE", UCase$(sTokens(0))) Then         '判断传入的SQL语句是以insert ,delete,update 开头的吗？

    cnn.Execute SQL                                                                              '若是，则执行语句      insert,delete,update语句不用打开记录集操作，直接使用cnn.execute即可。

    MsgString = sTokens(0) & "query successful"

Else                                                                                                       '若不是，则执行查询语句

   Set rst = New Recordset

   rst.Open Trim$(SQL), cnn, adOpenKeyset, adLockOptimistic        '将查询结果放在记录集中

   Set ExecuteSQL = rst

   MsgString = "查询到" & rst.RecordCount & "条记录"

End If

 

在这个位置不能关闭记录集rst或释放rst的空间

 

ExecuteSQL_Exit:

Set rst = Nothing

Set cnn = Nothing

Exit Function

 

ExecuteSQL_error:

MsgString = "查询错误" & Err.Description

Resume ExecuteSQL_Exit

End Function

ExecuteSQL这个记录集是rst的缓存对象，所以当rst的变动会影响到ExecuteSQL这个记录集，如rst.close；而set rst=nothing后,rst就从实际对象中分离出来了，而通过rst对象创建的对象都将被孤立。这些已缓存对象的任何属性依然可用

3.

通过记录集的操作：

记录集是一个对象：有它自身的方法，常见的有addnew,update,delete,open,close,find,move等

并没有select这样的方法，所以不能直接查询；要想查询就等用open方法，和sql查询语句。

刚开始学的时候有一个误区：认为任何操作都要先打开记录集。

 

通过connection对象的操作：

connection对象的方法有：open，close，execute

 

·Execute方法

该方法用于执行SQL语句。根据SQL语句执行后是否返回记录集，该方法的使用格式分为以下两种：

一．执行SQL查询语句时，将返回查询得到的记录集。用法为：

Set 对象变量名=连接对象.Execute("SQL 查询语言")

Execute方法调用后，会自动创建记录集对象，并将查询结果存储在该记录对象中，通过Set方法，将记录集赋给指定的对象保存，以后对象变量就代表了该记录集对象。

二．执行SQL的操作性语言时(如：delete，update等)，没有记录集的返回。此时用法为：

连接对象.Execute "SQL 操作性语句" [, RecordAffected][, Option]

·RecordAffected 为可选项，此出可放置一个变量，SQL语句执行后，所生效的记录数会自动保存到该变量中。通过访问该变量，就可知道SQL语句队多少条记录进行了操作。

·Option 可选项，该参数的取值通常为adCMDText，它用于告诉ADO，应该将Execute方法之后的第一个字符解释为命令文本。通过指定该参数，可使执行更高效。