如果你有一个建立好的recordset但是你还需要另一个recordset可能

两者之间只差一个条件，这时候我们就不要建立两个recordset了

我们只需要利用Filter 属性就可以实现这个目的

Dim objRS, objFilter ' As ADODB.Recordset

Dim dcnDB ' As ADODB.Connection

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

dcnDB.Open "Some connection string"

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

objRS.Open "SELECT * FROM tblOrders", dcnDB, adOpenStatic

objRS.Filter = "CustomerName Like %Smith%"

Set objFilter = objRS