VBScript: フォルダの存在をチェックする FolderExists

VBScriptでフォルダが存在するかどうかをチェックする場合は、 ファイルシステムオブジェクトのFolderExistsメソッドを使用します。

FolderExistsメソッドの書式は次の通りです。

書式
ファイルシステムオブジェクト.FolderExists(フォルダパス)

戻り値は、フォルダが存在する場合は「True」、 存在しない場合は「False」です。
フォルダパスについては絶対パス、相対パスのどちらかを指定します。

次のサンプルコードは、 フォルダ「d:\test\vbs\sample」が存在するかどうかをチェックし、 if文で処理を分岐させています。

'フォルダパス
strPath = "d:\test\vbs\sample"

'ファイルシステムオブジェクト作成
Set objFS = CreateObject("Scripting.FileSystemObject")

If objFS.FolderExists(strPath) Then
	'フォルダが存在する場合の処理
	WScript.Echo "OK"
Else
	'フォルダが存在しない場合の処理
	WScript.Echo "NG"
End If

現在ディレクトリ（カレントフォルダ）内にあるフォルダを指定する場合は、 次のようにフォルダ名だけでも大丈夫です。

strPath = "sample"
VBScript入門