Очистить соединение с базой данных через DAO.Database в VBA - PullRequest
Новая
       31

Очистить соединение с базой данных через DAO.Database в VBA

0 голосов
/ 14 декабря 2018

Я устанавливаю соединение ODBC с базой данных Oracle в VBA, используя драйвер DAO, однако последний подключенный пользователь к базе данных сохраняется в течение некоторого времени, и он перезаписывает новые заданные учетные данные.Ниже приведен фрагмент кода, связанный с этой проблемой.Есть ли способ обновить или обновить объект базы данных? 

dim DB as DAO.Database    
dim DBName as String
          dim Datenbank_BuildConnectionString  as String
                DBName = "TNS database"

            Datenbank_BuildConnectionString = "ODBC" & _
                                                    ";DSN=" & "database name" & _
                                                    ";Uid=" & "adada" & _
                                                    ";Pwd=" & "password"

            Set DB = DAO.Workspaces(0).OpenDatabase(DBName, dbDriverNoPrompt, True, Datenbank_BuildConnectionString)


             Call DB.Close
              Set DB = Nothing

С уважением,

...