У меня есть несколько простых VBA для импорта таблиц из нескольких баз данных Oracle.У меня есть одна запись ODBC, и я подключаюсь к разным базам данных, используя разные учетные данные.
Код моей базы данных передачи прост:
DoCmd.TransferDatabase acImport, "ODBC", "ODBC;DNS=source;UID=user;PWD=pass;", acTable, "SomeRemoteTable", "MyLocalTable", True
Этот код работает, но когдаЯ запускаю ту же команду с другим пользователем / pass сразу после этой команды я получаю эту ошибку:
Run-time error '3011': The Microsoft Jet database engine could not find the object 'SomeRemoteTable'. Make sure the object exists and that you spell its name and the path name correctly.
Вот подвох:
DNS, пользовательучетные данные и имена таблиц верны.Если я открою доступ и прокомментирую либо строку, то любая передача будет выполнена успешно.Однако после запуска одной команды другая не будет работать до тех пор, пока Access не будет закрыт и вновь открыт.
Я предполагаю, что должен быть способ закрыть первое соединение, прежде чем переходить к следующему.У кого-нибудь есть идеи, что я могу попробовать?