Добро пожаловать в форум, Guest >> Войти | Регистрация | Поиск | Правила | | В избранное | Подписаться | ||
Все форумы / Microsoft Access |
![]() ![]() |
l-evgene Member Откуда: Москва Сообщений: 243 |
Здравствуйте. Обнаружил, что одна из баз Access не желает признавать объектную переменную типа Database. Выдает compile error. А вот в таком виде запускается без проблем: Public Sub прок() Dim strСообщение As String Dim prp As Property 'Dim db As Database 'Set db = CurrentDb On Error Resume Next For Each prp In CurrentDb.Properties strСообщение = prp.Name strСообщение = strСообщение & ":* " & prp.Value Debug.Print strСообщение Next prp End Sub Access 2016. Сама база давнишняя, скорее всего преобразована из более старой версии. У кого-нибудь было такое? К сообщению приложен файл. Размер - 18Kb |
19 авг 19, 14:35 [21952541] Ответить | Цитировать Сообщить модератору |
4d_monster Member Откуда: Москва Сообщений: 1613 |
l-evgene, У вас просто не хватает ссылки на библиотеку DAO. |
19 авг 19, 14:39 [21952546] Ответить | Цитировать Сообщить модератору |
Akina Member Откуда: Зеленоград, Москва, Россия Сообщений: 20871 |
Объявите её явно как Dim db As DAO.Database Хотя в именно показанном коде отдельная переменная нафиг не нужна, разумнее воспользоваться блоком With. |
19 авг 19, 15:04 [21952563] Ответить | Цитировать Сообщить модератору |
l-evgene Member Откуда: Москва Сообщений: 243 |
Akina, спасибо, получилось |
19 авг 19, 17:30 [21952718] Ответить | Цитировать Сообщить модератору |
Все форумы / Microsoft Access | ![]() |