ÔOÖûò·µ»ØÖ¸¶¨òŒ„ÓÆ÷µÄ¾íÃû¡£×x/Œ‘¡£
object.VolumeName [= newname]
ÏÂÃæµÄ´ú´aÕfÃ÷ÁË VolumeName ŒÙÐÔµÄÓ÷¨£º
[JScript] function SpaceReport(drvPath) { var fso, d, s; fso = new ActiveXObject("Scripting.FileSystemObject"); d = fso.GetDrive(fso.GetDriveName(drvPath)); s = "Drive " + drvPath + " - "; s +=d.VolumeName
+ "<br>"; s += "Total Space£º"+ d.TotalSize/1024 + " Kbytes <br>"; s += "Free Space£º " + d.FreeSpace/1024 + " Kbytes"; return(s); } [VBScript] 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
AvailableSpace ŒÙÐÔ | DriveLetter ŒÙÐÔ | DriveType ŒÙÐÔ | FileSystem ŒÙÐÔ | FreeSpace ŒÙÐÔ | IsReady ŒÙÐÔ | Path ŒÙÐÔ | RootFolder ŒÙÐÔ | SerialNumber ŒÙÐÔ | ShareName ŒÙÐÔ | TotalSize ŒÙÐÔ
‘ªÓÃÓÚ£ºDrive Œ¦Ïó