寻找OpenDatabase()的解释

时间:2019-01-25 16:35:45

标签: vba ms-access

我是VBA的新手。当用户输入错误的用户名和密码时,我遇到了显示正确消息的问题。目前,我们收到以下错误消息,用户对此感到困惑。

  

frmDBConnect:errorHandlerErr.Description = ODBC-连接到'DB2T-XX'   失败。

请参阅我的代码。发生的事情是,每当我输入错误的用户名或密码db时,db都不会变为(db = nothing),但是只要有有效的用户名和密码,db就会有数据,并且我能够登录到下一个屏幕

我猜想db仅在提供的数据库不存在的情况下才应该变为空,而在用户名和密码错误的情况下才应该变为

这里的任何帮助将不胜感激。

lConnect = "ODBC;DSN=" & sDB2SubSystem & ";UID=" & UID & ";PWD=" & PWD & ";SERVER=" & sDB2SubSystem
Set ws = DBEngine.Workspaces(0)
Set db = ws.OpenDatabase("", False, True, lConnect)

0 个答案:

没有答案