VolumeName Property

---

Description

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

---