Access 2000 VBA - Dir() 错误的文件名或编号答案

【问题标题】：Access 2000 VBA - Dir() Bad File Name Or NumberAccess 2000 VBA - Dir() 错误的文件名或编号
【发布时间】：2011-12-05 11:01:04
【问题描述】：

我有一个场景，不在域中的用户试图打开网络上的文件。尝试使用 Dir() 函数确定路径是否存在。这是我的代码的样子...

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

我收到运行时错误 Bad file name or number (error number 52)。

【问题讨论】：

在这种情况下，我认为你最好使用 FileSystemObject - VBScript 与 VBA msdn.microsoft.com/en-us/library/ch28h2s7(v=VS.85).aspx非常相似

【解决方案1】：

是的，dir() 在错误/不可访问的 unc 上会导致运行时错误，这与本地文件的行为不同。

您可以将其包装在错误处理程序中或使用GetFileAttributes API 并查找目录属性标志（内置 getattr() 对此不起作用）。

【讨论】：

【解决方案2】：

暂时，如果用户不介意mapping a network drive，他可以用你的代码打开文件。

【讨论】：

【解决方案3】：

尝试以下步骤。

现在运行/调试您的应用程序。它应该工作！

【讨论】：