Изменения в кодировании MSAccess VBA - PullRequest
Новая
       60

Изменения в кодировании MSAccess VBA

0 голосов
/ 18 февраля 2019

Я кодирую в MSAccess с Win95 дней.За эти годы эти приложения были обновлены до последних версий MSAccess.Я предполагаю, что изменение произошло через некоторое время после Access 2003.

Я уверен, что это тривиальный вопрос, но я не могу найти ответ в документации онлайн.

ВВ старые времена мои Модули выглядели так: 

    Option Compare Database

    Private Sub PrintReports_Click()
    Dim db As Database
    Dim rs As Recordset
        Set db = CurrentDb
        Set rs = db.OpenRecordset("Classes", dbOpenDynaset)
...

Где Classes - это обычно таблица или запрос в моей базе данных.Это продолжает работать в старых базах данных, которые были преобразованы в последнюю версию.

Когда я пытаюсь создать новую базу данных, используя приведенный выше код, я получаю ошибку 13, ошибка несоответствия типов, без объяснения того, чтонеправильно и как это исправить.

Итак, 2 вопроса: почему он работает на старых базах, но не на вновь созданных, и как правильно открывать и ссылаться на мои таблицы в моем коде VBA?

Спасибо за вашу помощь, Дэн

1 Ответ

0 голосов
/ 18 февраля 2019

Попробуйте проверить "Ссылки", не пропало ли что-нибудь. Также объявите БД следующим образом 

Dim db As DAO.Database
...