FileSystemObjectオブジェクト - GetDriveNameメソッド


【書式】

FileSystemObject.GetDriveName(path)

ドライブを表す文字を返します。

引数pathにはドライブ名を含むパスを指定します。指定するパスは実在しなくてもかまいません。たとえば、存在しない「G:\tanaka\toru」を指定すると、\から左の「G:」を返します。パスとして認識できない「tanaka_toru」のような文字列を指定すると、""を返します。

DriveオブジェクトDriveLetterプロパティが返すのは「C」のようなアルファベットですが、GetDriveNameメソッドは「C:」とコロンも含むので注意してください。
Sub test15()
    Dim FSO As Object
    Set FSO = CreateObject("Scripting.FileSystemObject")
    ''C:を返します
    MsgBox FSO.GetDriveName("C:\")
    Set FSO = Nothing
End Sub