Я новичок в VBA. У меня проблема с отображением правильного сообщения всякий раз, когда пользователь вводит неправильное имя пользователя и пароль. В настоящее время мы получаем сообщение об ошибке ниже, и пользователи путаются с этим.
frmDBConnect: errorHandlerErr.Description = ODBC - соединение с 'DB2T-XX'
Не удалось.
Пожалуйста, смотрите мой код. Когда я ввожу неправильное имя пользователя или пароль, db становится ничем (db = ничто), но всякий раз, когда существует действительное имя пользователя и пароль, db содержит данные, и я могу войти на следующий экран
Я полагаю, что db не должен становиться ничем, только если база данных не существует, а имя пользователя и пароль неверны.
Любая помощь здесь будет оценена.
lConnect = "ODBC;DSN=" & sDB2SubSystem & ";UID=" & UID & ";PWD=" & PWD & ";SERVER=" & sDB2SubSystem
Set ws = DBEngine.Workspaces(0)
Set db = ws.OpenDatabase("", False, True, lConnect)