Sets or returns the volume name of the specified drive. Read/write.
Syntax
object.VolumeName [= newname]
The VolumeName property has these parts:
Part
Description
object
Required. Always the name of a Drive object.
newname
Optional. If provided, newname is the new name of the specified object.
Remarks
The following code illustrates the use of the VolumeName property:
Function ShowVolumeInfo(drvpath)
Dim fso, d, s
Set fso = CreateObject("Scripting.FileSystemObject")
Set d = fso.GetDrive(fso.GetDriveName(fso.GetAbsolutePathName(drvpath)))
s = "Drive " & d.DriveLetter & ": - " & d.VolumeName
ShowVolumeInfo = s
End Function