检查LotusScript是否存在目录

时间:2012-10-27 00:24:27

标签: file-io lotusscript

这似乎是最基本的东西。谷歌上有很多例子,所有这些例子都放在我的代码中并得到了相同的结果。

我相信我错过了语言特有的东西,而且真的很烦人。

鉴于

pathName$ = "..\..\images\" + artID + "\" + artNum + "\"
    dirTest$ = "..\..\images\" + artID + "\"
    If Dir$(pathName$ , ATTR_DIRECTORY) = "" Then
        MsgBox "No Dir"
    Else
        MsgBox "Dir Found!"
    End If

(everthing正确调暗)

我已经把msgbox放在pathName $之前,就在DIR调用之前,但是当它进入测试时失败了。我知道dir在某些情况下不存在这个事实,但是我想捕获错误,而不是因为找不到dir而导致脚本崩溃。

我尝试了DIR (path,16) DIR$(path,16) DIR (path$,16) DIR$(path$,16)以及ATTR_DIRECTORY关键字。

如何在Lotusscript中优雅地检查目录的存在?

1 个答案:

答案 0 :(得分:8)

如果目录不存在,Dir $命令将生成运行时错误代码76。因此,您可以通过在代码中添加On Error 76 Resume Next来捕获运行时错误:

pathName$ = "..\..\images\" + artID + "\" + artNum + "\"
dirTest$ = "..\..\images\" + artID + "\"
On Error 76 Resume Next
If Dir$(pathName$ , ATTR_DIRECTORY) = "" Then
    MsgBox "No Dir"
Else
    MsgBox "Dir Found!"
End If

灵感:http://searchdomino.techtarget.com/tip/Finding-files-and-directories-with-LotusScript