2

フォルダ内に任意の名前のファイルが存在するかどうかを確認するにはどうすればよいですか? サブフォルダーも無視したい。

ありがとう。

編集:

私はそれを持っていると思いますが、貢献も大歓迎です...

If Folder.Files.Count > 0 Then
   'Do something
4

2 に答える 2

5

私はあなたがそれを持っていると思います、ほとんどそれはです

Const PATH = "C:\Path\to\folder"
dim fso: set fso = CreateObject("Scripting.FileSystemObject")
dim folder: set folder = fso.getFolder(PATH)
if folder.files.Count <> 0 then
    'do something
end if

パスが有効でFolderExists()あるかどうかを確認するgetFolder(PATH)か、パスが存在しない場合はエラーをキャッチすることをお勧めします。コレクションにはサブフォルダーは含まれfilesていません。

于 2011-07-20T11:40:42.457 に答える
1

Filesystem Object (FSO)を見てください。FileExists()やなどのメソッドを実行しFolderExists()ます。

于 2011-07-20T09:00:31.297 に答える