авторCurrentProject.Path
относительно данной функции вопрос. Почему в одном месте программы он указывает путь, а во втором нет. переменная объявлена в паблике. Кто может подсказать в чём дело?

Shocker.Pro,

Public sDir As String


Private Sub Form_Open(Cancel As Integer)
sDir = CurrentProject.Path
DoCmd.Restore
End Sub

в блоке обработчика:
Open sDir & "\out.txt" For Output As #2


Хотя, в другом месте всё нормально. Как полагается, показывает путь к проекту

Shocker.Pro,
автора этот код находится на форме, на той же где объявлена переменная?

я же специально написал подробно. она объявлена как паблик в самом начале:
Option Compare Database
Public sDir As String

а код находится в обработчике.
авторOption Explicit используется?
Нет.
авторпочему не писать Open CurrentProject.Path & "\out.txt" For Output As #2
Может быть. Тогда можно было ещё и полный путь написать. Только вопрос в другом. Почему в одном sub'e работает, а во втором нет. Интересно же.

Shocker.Pro,

Думаю, что дело в заглючивании самой формы, когда во время отладки возникали ошибки во втором обработчике. Всё поменял, закрыл форму, снова открыл и по новой записал точно также, как и было. Вуаля! Заработало.

Спасибо за отклик.

Shocker.Pro,

авторВ ТОЙ ЖЕ ЛИ ФОРМЕ обработчик, что и объявлена переменная?
В той же форме.

Возможно я и вправду зря пренебрегаю Option Explicit.

Воспользовался вашим сообщением из другой темы:
авторКак включить:
Tools => Options => Editor => Require Variable Declaration
Включите этот флажок и Option Explicit будет появляться автоматически во всех новых модулях/формах/классах (в старых не появится, нужно будет прописать вручную)