最新国产好看的视频,伊人天堂AV在线,国产Aaaaaa视频,蜜臀视频在线观看一区,人妻av色图,密臀久久久精品影片,青青视频免费观看毛片,久草在线观看视,国产三级精品色情在线

VBS教程:屬性-FreeSpace 屬性

 更新時間:2006年11月16日 00:00:00   作者:  

FreeSpace 屬性

返回指定的驅(qū)動器或網(wǎng)絡(luò)共享對于用戶的可用空間大小。只讀。

object.FreeSpace

object 應(yīng)為 Drive 對象的名稱。

說明

FreeSpace 屬性與 AvailableSpace 屬性返回的值基本相同。對于支持限額的計算機(jī)系統(tǒng)來說,這兩個屬性返回的值有所差異。

以下代碼舉例說明如何使用 FreeSpace 屬性:

Function ShowFreeSpace(drvPath)    Dim fso, d, s    Set fso = CreateObject("Scripting.FileSystemObject")    Set d = fso.GetDrive(fso.GetDriveName(drvPath))    s = "驅(qū)動器 " & UCase(drvPath) & " - "     s = s & d.VolumeName  &"<BR>"    s = s & "可用空間:" & FormatNumber(d.FreeSpace/1024, 0)     s = s & "KB"ShowFreeSpace = sEnd Function

相關(guān)文章

最新評論

洪洞县| 特克斯县| 锦州市| 平凉市| 当涂县| 南川市| 姜堰市| 鸡东县| 图木舒克市| 巴东县| 迁安市| 年辖:市辖区| 浮山县| 中卫市| 镇赉县| 富川| 瓦房店市| 宾阳县| 师宗县| 柳河县| 兰溪市| 西华县| 榆林市| 湖南省| 姚安县| 淮滨县| 牟定县| 区。| 奉节县| 济源市| 大庆市| 西平县| 新化县| 抚顺县| 微山县| 营山县| 内丘县| 建宁县| 怀安县| 彩票| 新田县|