Find on a Recordset

[abenitez77]

I want to search a recordset for a value. I tried this below, but doesn't return the results. It always returns only the first row. The recordset only seems to have 1 row before the Find as well. I am connecting to a SQL Server database.

' Connection Creation -----------------------------------------------------------------
Set Connection2 = CreateObject("ADODB.Connection")

sServer = "ATL20AS8500SQ01"
sDBName = "AS_Projects"
ConnectionString = _
"Provider=SQLOLEDB;" & _
"Data Source=" + sServer + ";" & _
"Initial Catalog=" + sDBName + ";" & _
"Integrated Security=SSPI"

Connection2.Open ConnectionString

tSQL = "Select BannerID, Banner FROM XLSBanner"
Set rsB = Connection2.Execute(tSQL)

rsB.Find "Banner = '" & strBanner & "'"
tmp = rsB(0)
If rsB.NoMatch Then
MsgBox "no match"
End If