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

首頁 > 編程 > VBScript > 正文

VBS教程:屬性-FreeSpace 屬性

2019-10-26 17:55:16
字體:
來源:轉載
供稿:網友

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
發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表

圖片精選

主站蜘蛛池模板: 繁昌县| 西和县| 昭苏县| 河曲县| 娄底市| 石河子市| 进贤县| 林周县| 丰台区| 集安市| 广安市| 云龙县| 郴州市| 宜兴市| 承德市| 黄平县| 仁怀市| 高唐县| 清河县| 醴陵市| 曲靖市| 永州市| 吉木萨尔县| 灵川县| 宜良县| 东源县| 威远县| 遵义县| 始兴县| 咸丰县| 抚州市| 河西区| 庆云县| 遵义市| 屯留县| 乐昌市| 松阳县| 桐庐县| 巴彦县| 广南县| 成都市|