VBScript フォルダ存在確認

'確認したいフォルダのパス
PATH = "C:\temp" 'ここに確認したいフォルダのパスを指定

'FileSystemObjectの作成
Set oFS = CreateObject("Scripting.FileSystemObject")

' FolderExistsメソッドでフォルダの存在を確認
If oFS.FolderExists(PATH) Then
	MsgBox "フォルダ '" & PATH & "' は存在します。"
Else
	MsgBox "フォルダ '" & PATH & "' は存在しません。"
End If

'オブジェクトを解放
Set oFS = Nothing