VBS教程:属性-FreeSpace 属性


FreeSpace 属性

返回指定的驱动器或网络共享对于用户的可用空间大小。只读。

object.FreeSpace

object 应为 Drive 对象的名称。

说明

FreeSpace 属性与 AvailableSpace 属性返回的值基本相同。对于支持限额的计算机系统来说,这两个属性返回的值有所差异。

以下代码举例说明如何使用 FreeSpace 属性:

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



相关阅读:
ASP教程:ASP关于数组的应用技巧
PHP html标签正则替换并可自定义正则规则
undefined==null引发的两者区别与联系
php配置,链接access数据库
IE及firefox下获取及设置样式值的代码
ajax readyState的五种状态详解
图形化的FreeBSD 5.1工作站
AJAX教程(17):把XML文件显示为HTML表格
JQuery 国际象棋棋盘 实现代码
CSS模型教程:boxes,borderes,margins和padding
SQL Server日志文件总结及充满处理方式
jQuery之网页换肤实现代码
asp下经常用到的代码
Linux中的Screen命令使用技巧详解
快速导航

Copyright © 2016 phpStudy |