1

これは最も基本的なことのようです。グーグルにはたくさんの例がありますが、それらはすべて私のコードに入れて、同じ結果を得ています。

私はその言語に特有の何かが欠けていると信じています、そしてそれは本当にイライラしています。

与えられた

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

（すべてが正しく調光されます）

pathName $の前とDIR呼び出しの直前にmsgboxを配置しましたが、テストに到達すると失敗します。特定のシナリオでdirが存在しないことは知っていますが、dirを見つけられなかったときにスクリプトがクラッシュしないように、エラーをトラップしたいと思います。

DIR (path,16) DIR$(path,16) DIR (path$,16) DIR$(path$,16)ATTR_DIRECTORYキーワードと同様に試しました。

Lotusscriptでディレクトリの存在を適切に確認するにはどうすればよいですか？

4

1 に答える 1

9

ディレクトリが存在しない場合、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

于 2012-10-27T04:31:07.507 に答える