【書式】
FileSystemObject.DriveExists(drivespec)
指定したドライブが存在するかどうかを調べます。存在する場合はTrueを返します。。
引数drivespecには存在を調べるドライブ名またはパス名を指定します。
FDやCD-ROMドライブのようなリムーバブルドライブの場合、ドライブの準備ができていなくてもドライブが存在すればTrueが返ります。ドライブの準備ができているかどうかを調べるにはDriveオブジェクトのIsReadyプロパティを使います。
Sub test9()
''Dドライブが存在するかどうか調べます
Dim FSO As Object
Set FSO = CreateObject("Scripting.FileSystemObject")
If FSO.DriveExists("E") Then
MsgBox "Eドライブが存在します"
Else
MsgBox "Eドライブは存在しません"
End If
Set FSO = Nothing
End Sub