プロが教える店舗&オフィスのセキュリティ対策術

VB6でフォルダの有無を確認したいのですが、どうすればよいのでしょうか?Dir関数ではだめなようです。

A 回答 (1件)

dir関数を使うのであれば、


Dir(FoldPath & "\*.*", vbDirectory)
FldName = Dir(FoldPath & "\*.*", vbDirectory)
Do Until FldName = ""
If FldName <> "." And FldName <> ".." And ((GetAttr(FoldPath & "\" & FldName) And vbDirectory) = vbDirectory) Then
.........
見たいにできたと思います。
    • good
    • 0
この回答へのお礼

確かにできました。
ありがとうございました。

お礼日時:2006/02/28 08:45

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!