Выполнить поиск записи в форме

[Познающий]

Всем доброго времени суток. работаю на Accesse 2003 и столкнулся с действительно труднодостижимой проблемой: у меня есть форма пользователя где есть одна кнопка, которая осуществляет параметрический запрос на выборку по нику и паролю (введите ник, пароль). В результате - таблица. А как сделать чтоб открылась форма или в текущей форме отобразилась именно этого пользователя запись?
а то запросом как-то несерьезно =(

[Teslenko_EA]

Познающий, "..как сделать чтоб .. в текущей форме отобразилась именно этого пользователя запись?..", самым простым способом может быть подключение Вашего запроса к форме в качестве источника записей:

Private Sub Кнопка0_Click()
Const sQ0 = "select f0, f1, f2 from tbl where f1 = '", sQ1 = "' , f2 = '"
Me.RecordSource = sQ0 & Поле0 & sQ1 & Поле1 & "'"
Me.Поле2.Value = Me.Recordset(0)
End Sub

Евгений.

[AdrenalinE]

Евгений, Вы не могли бы пояснить что делает последняя строка в процедуре? Me.Поле2.Value = Me.Recordset(0)
Recordset содержит все записи "таблицы", которая является DataSource для формы?

[Teslenko_EA]

AdrenalinE, команда "..Me.RecordSource = ..." подключает в качестве источника не таблицу, а SQL конструкцию. "..Recordset содержит все записи.." да действительно, но заданным условием отбора все это одна запись.
Евгений.

[AdrenalinE]

Понял, спасибо.
З.Ы. Насчет SQL-конструкции, я поэтому и написал слово "таблица" в кавычках.

[Познающий]

жалко( не могу понять синтаксис написанного

Private Sub <имя кнопки>_Click()
Const sQ0 = "select f0, f1, f2 from tbl where f1 = '", sQ1 = "' , f2 = '"
Me.RecordSource = sQ0 & Поле0 & sQ1 & Поле1 & "'" '2 и 3я строка непонятно. пытался заменить на свои данные ничего не получилось
Me.Поле2.Value = Me.Recordset(0) 'а что за поле2?
End Sub

[AdrenalinE]

Если учетные записи грамотно созданы, то можно использовать Environ("username") и вообще ничего не вводить.