Access: проверка на существование

[Decaz]

Перерыл кучу мануалов и инфы в инете, но ничего толкового не нашёл... Есть код для добавления новых записей в таблицу, а точнее регистрации пользователей:

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

Private Sub Command2_Click()
rs.Open "SELECT Login, Password, Name From Auth", cn, adOpenKeyset, adLockOptimistic
rs.AddNew
rs.Fields("Login") = Text2.Text
rs.Fields("Password") = Text3.Text
rs.Fields("Name") = Text4.Text
rs.Update
rs.Close
End Sub

Надо, чтобы шла проверка на существование записей с таким же Login или Name, помогите пожалуйста...

[tyomitch]

Может, просто повесить на поле в таблице ограничение уникальности?
Тогда в программе не потребуется ни строчки кода для этой проверки.

[Decaz]

Может, просто повесить на поле в таблице ограничение уникальности?
Тогда в программе не потребуется ни строчки кода для этой проверки.

Спасибо! А как вывести ошибку о совпадении в виде MsgBox'а вместо программной ошибки и чтобы программа не завершалась?

[VVitafresh]

Decaz, ну знаешь, основы нужно учить: On Error Statement

А по сути первого вопроса почитай ветку http://bbs.vbstreets.ru/viewtopic.php?t=23995 -- может почерпнеш для себя идеи.

[Decaz]

Спасибо за помощь!

[Al Khamid]

90

[Nicky]

http://bbs.vbstreets.ru/viewtopic.php?p=6599411&highlight=#6599411