Приветствую вас, коллеги!
По следам обсуждения потерь глобальных переменных пытаюсь организовать связь с mde файлом, содержащим модуль, в коем описаны глобальные переменные. Для этого взял в helpе функцию, передаю ей строку с именем базы (без пути). Эту mde-шку поместил в один с основной базой каталог.
Сообщает, что не может найти файл
access 2000, windows 98, mdb
функция
Function ReferenceFromFile(strFileName As String) As Boolean
Dim ref As Reference

On Error GoTo Error_ReferenceFromFile
Set ref = References.AddFromFile(strFileName)
ReferenceFromFile = True

Exit_ReferenceFromFile:
Exit Function

Error_ReferenceFromFile:
MsgBox Err & ": " & Err.Description
ReferenceFromFile = False
Resume Exit_ReferenceFromFile
End Function
вызов: ReferenceFromFile("bibl.mde")
Можно, конечно, руками прописать в references, но не знаю, как потом оттуда убрать (если потребуется)

Currentproject.path работает и в acc2000
спасибо