Access 2000 VBA - неправильное имя или номер файла ()

Question

У меня есть сценарий, когда пользователь, не входящий в домен, пытается открыть файл, находящийся в сети.Попытка определить, существует ли путь, используя функцию Dir ().Вот как выглядит мой код ...

If Len(Dir("\\xx\xxxxx\Shared\Virtual Machine\_Testing\Update\", vbDirectory)) > 0 Then Return True

Я получаю ошибку во время выполнения Неверное имя файла или номер (ошибка номер 52).

Answer 1

Да, dir() в плохом / недоступном unc вызывает ошибку времени выполнения, в отличие от поведения локального файла.

Вы можете либо обернуть его в обработчике ошибок, либо использовать GetFileAttributes API и посмотреть флаг атрибута каталога (встроенный getattr () для этого не подойдет).

Answer 2

Пока пользователь не возражает против сопоставления сетевого диска , он может открыть файл с вашим кодом таким, какой он есть.