Поиск по БД

[alex2006]

Всем доброго времени суток! Я еще только начинаю писать базы данных на VB и неожиданно для себя столкнулся с такой проблемой: есть БД написанная на Access, при попытке запустить поиск по определенному критерию выпадает следующая ошибка:
Run-time error '3464'. Data type mismatch in criteria expression. То есть как бы несоответствие типа данных критерию, хотя и в базе у меня тип данных стоит текстовый, и в запросе я поставил тип string. Вообще код следующий:

Код: Выделить всё


Dim strCompare As String
strCompare = "[Телефон]=" + Text1.Text
FrmMain!Data1.Recordset.MoveFirst
FrmMain!Data1.Recordset.FindFirst strCompare
FrmSearch.Hide


Требуется по введенному номеру телефона отыскать нужную запись в базе. Может кто подскажет, что я неправильно делаю? Заранее благодарен.

[VVitafresh]

Попробуй так:

Код: Выделить всё

strCompare = "[Телефон]='" & Text1.Text & "'"

[alex2006]

Огромное спасибо! Проблема решена.

[Andrey Fedorov]

Попробуй так:

Код: Выделить всё

strCompare = "[Телефон]='" & Text1.Text & "'"

А теперь попробуй ввести в это поле: 8'888888

[alibek]

А теперь попробуй ввести в это поле: 8'888888

Ну что ты так сразу человека в омут бросаешь

[Andrey Fedorov]

А теперь попробуй ввести в это поле: 8'888888

Ну что ты так сразу человека в омут бросаешь

Да просто указываю на одну из типичных ошибок. Рано или поздно это дело вылезет, лучше если сразу поймет...

[VVitafresh]

А теперь попробуй ввести в это поле: 8'888888

Ну это уж Text1_Validate пусть обрабатывает.