Сравнение данных

[dimt]

Помогите начинающему.
Существует база mdb, управление data,на форме text-овое поле для ввода информации, command для запроса.
Как сделать так чтобы при вводе уже существующего значения выдавалось сообщение об ошибке и затем все возвращалось в исходное состояние. При вводе же оригинального значения оно записывалось в базу?
Заранее благодарен.

[FaKk2]

Пишешь SQL команду "SELECT * FROM имя_таблицы WHERE имя_столбца='" & text1.text & "'"
Запускаешь, и проверяешь свойство RecordsCount (или CountRecords, не помню ) если равно нулю, то такого значения в базе нет. Если не равно нулю, то что то там есть

[ta_gena]

Используй метод Find:
With Recordset
.MoveFirst
.Find "FieldName = '" & Text1.Text & "'"
If .EOF Then
'Добавляем новую запись
Else
'Сообщаем о наличии такой записи
End If
End With

[dimt]

Спасибо большое.
Вроде что-то начало получаться.