Ответить на сообщение
Вернуться к теме
Вы отвечаете на сообщение:
ник: AlexSyr
Я там забыл (как всегда) заполнить рекордсет перед поиском. :)
With Me.cmb1 If .Recordset Is Nothing Then .SetFocus .Dropdown Else .Requery End If End With With Me.cmb1.Recordset .FindFirst .Fields(1).Name & " Like '*" & Me.txt1 & "*'" If Not .NoMatch Then MsgBox "Есть :) " & .Fields(1) Else MsgBox "Нету :(" End If End With
Ваше имя:
Пароль:
Сообщение:
Прикрепить:
Для вставки смайлов в текст щелкните по значку.