国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁 > 編程 > VBScript > 正文

VBS教程:屬性-FreeSpace 屬性

2020-07-26 12:13:32
字體:
來源:轉載
供稿:網友

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
發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
主站蜘蛛池模板: 连山| 大冶市| 乐亭县| 沛县| 太保市| 长岛县| 南平市| 金塔县| 南康市| 黎平县| 漠河县| 沈丘县| 郴州市| 鄂州市| 博爱县| 辽源市| 滦平县| 安塞县| 鲁山县| 城固县| 汾西县| 桃源县| 河津市| 舒城县| 兴山县| 建湖县| 日土县| 大同市| 丽水市| 姜堰市| 长顺县| 武陟县| 乌拉特后旗| 广州市| 长春市| 香港 | 同仁县| 睢宁县| 闵行区| 牟定县| 大化|