VB6的FolderExists功能有时会失败

时间:2013-10-21 11:33:09

标签: vb6 nfs

我的批处理程序十年来一直没有任何问题。 我用新的NFS替换了NFS(网络文件系统)。 在那之后,它已经变得每月失败一次或两次。 (该计划每天工作三次)

以下是导致上述问题的摘录。 尽管文件夹路径确实存在,但FolderExists()偶尔也不会返回true。

Function foo(path)
    Set objFileSystem = CreateObject("Scripting.FileSystemObject")

    If objFileSystem.FolderExists(path) Then
        ' do something
    End If

有人可以给我任何建议吗?

这是操作系统信息。

Windows Server 2003
Service Pack2

1 个答案:

答案 0 :(得分:0)

可能由于某种原因,驱动器目前尚未准备好进行访问。 您可以使用FSO检查此操作,方法是从GetDrive方法获取Drive对象并检查IsReady属性。 更多信息:http://msdn.microsoft.com/en-us/library/x681abd9(v=vs.84).aspx