如果你有一個建立好的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