База MS SQL + Access 2000

Здравствуйте ...есть вопрос

Есть таблица1 -> по ней форма1 -> поле1

По двйному клику в поле1 должна открываться форма2 <- таблица2 (в которой есть поле2 = поле1)

Так вот хочу, чтобы при двойном клике в поле1, форма2 открывалась на записи в котором поле2=поле1

++++++++++++++++++++++++++++++

В обычном mdb варианте я делал:

Dim NumberZapisi As Double
Dim ZapisNaidena As Double
Dim Flag As Byte
Dim db As Database
Dim rs As DAO.Recordset

Set db = CurrentDb()

Set rs = db.OpenRecordset("21_PriemMateriala", dbOpenDynaset)

rs.MoveFirst
NumberZapisi = 0
Flag = 0
Do Until (rs.EOF) Or (Flag = 1)
NumberZapisi = NumberZapisi + 1
If (rs!NumberM = NumberM) Then
Flag = 1
ZapisNaidena = NumberZapisi
End If
rs.MoveNext
Loop

rs.Close
db.Close

DoCmd.GoToRecord acDataForm, "ClientsPrice", acGoTo, ZapisNaidena
End Sub


+++++++++++++++++++++++++++++++++++++++

Но все это как-то скучно ... и не очень быстро как я понимаю ...

В общем как все это дело сделать на базе запроса ? Если возможно ....

Спасибо.

НА сколько я понимаю ... это фильтр

... но мне не нужно отфильтровывать данные

Кстати друзья ... к слову о фльтрах в adp проекте ...

фильтр срабатывает на уровне сервера или клиента ?

Тоесть после применения фильтра по сетке гуляют туды-сюды данные ...

Спасибо

Перерыл весь форум но так и не дошло как использовать этот ServerFilter

Хочу открыть форму2 из формы1 так чтобы

в форме2 сработал фильтр по: поле2 = поле1


.... по нажатию кнопки в форме1

КнопкаНажата()
Что тут писать?.ServerFilter = "Поле2 = " & Поле1
DoCmd.OpenForm "Форма2"
ЭндКнопкаНажата


Спасибо.

Спасибо за совет .. в общем сделал так

на открытие формы повесил след.. код

Private Sub Form_Open(Cancel As Integer)
Me.ServerFilter = "ClientsId=" & Me.OpenArgs
Me.Refresh
End Sub

... в том случае если форма открывается самостоятельно сделал

Private Sub Form_Open(Cancel As Integer)
Me.ServerFilter = ""
Me.Refresh
If Me.OpenArgs <> "Null" Then
Me.ServerFilter = "ClientsId=" & Me.OpenArgs
Me.Refresh
End If
End Sub

Громоздко как-то ... никто что-нить покрасивее не предложит ?

Спасибо :)