时间:2021-05-23
提供对磁盘驱动器或网络共享的属性的访问。
以下代码举例说明如何使用 Drive 对象访问驱动器的属性:
Function ShowFreeSpace(drvPath)Dim fso, d, s Set fso = CreateObject("Scripting.FileSystemObject") Set d = fso.GetDrive(fso.GetDriveName(drvPath)) s = "驱动器 " & UCase(drvPath) & " - " s = s & d.VolumeName & "<BR>" s = s & "可用空间: " & FormatNumber(d.FreeSpace/1024, 0) s = s & "KB"ShowFreeSpace = sEnd Function声明:本页内容来源网络,仅供用户参考;我单位不保证亦不表示资料全面及准确无误,也不保证亦不表示这些资料为最新信息,如因任何原因,本网内容或者用户因倚赖本网内容造成任何损失或损害,我单位将不会负任何法律责任。如涉及版权问题,请提交至online#300.cn邮箱联系删除。
Drives属性返回由本地机器上所有Drive对象组成的Drives集合。object.Drivesobject应为FileSystemObject对象的名称。
RootFolder属性返回一个Folder对象,表示指定驱动器的根文件夹。只读。object.RootFolderobject应为Drive对象的名称。说明使
GetDrive方法返回与指定的路径中驱动器相对应的Drive对象。object.GetDrivedrivespec参数object必选项。应为FileSyst
在众多文本编辑器中,Microsoft的Word是功能很强大的。况且XPPRO本身支持VBS调用Word文档对象,那么使用VBS是最好不过的了。思路如下:VBS
AvailableSpace属性返回指定的驱动器或网络共享对于用户的可用空间大小。object.AvailableSpaceobject应为Drive对象的名称