gTreeSour.Open "SELECT [" & Table & "].[" & gId & "], [" & Table & "].[" & gField & "], [" & Table & _
"].[" & LName & "], [" & Table & "].[" & RName & "] FROM [" & Table & "] ORDER BY [" & Table & "].[" & LName & "]", _
CurrentProject.Connection, adOpenKeyset, adLockOptimistic
gTreeSour.Find Format(gLName) & " > " & Format(L) & " AND " & Format(gRName) & " < " & Format(R)

' Это не работает, видимо find может только по равенству искать. как мне сделать запрос на выборку по уже сущ. рекордсету gTreeSour, чтоб не обращаться лишний раз к серверу? или возможно можно что-то сделать с find?

А ну да поясняю:
Dim gTreeSour As New ADODB.recordset
Dim gField, gId, gParent, gLName, gRName As String 'Названия различных полей в таблицах
Dim L,R as Integer ' Значения для поиска

К сожелению формировать сразу запрос нельзя.., на счет фильтра? это как?

To Vsevolod:
Так как ты написал не работает.

Всем большое спасибо, сделал через find а после него проверку на второе условие, так как рекордсет удобно упорядочен то после первого же несовпадения второго условия выхожу, функция была рекурсивная, еще раз всем большое спасибо!!!!!!!!!