网创优客建站品牌官网
为成都网站建设公司企业提供高品质网站建设
热线:028-86922220
成都专业网站建设公司

定制建站费用3500元

符合中小企业对网站设计、功能常规化式的企业展示型网站建设

成都品牌网站建设

品牌网站建设费用6000元

本套餐主要针对企业品牌型网站、中高端设计、前端互动体验...

成都商城网站建设

商城网站建设费用8000元

商城网站建设因基本功能的需求不同费用上面也有很大的差别...

成都微信网站建设

手机微信网站建站3000元

手机微信网站开发、微信官网、微信商城网站...

建站知识

当前位置:首页 > 建站知识

VBS属性FreeSpace的用法-创新互联

这篇文章主要讲解了“VBS属性FreeSpace的用法”,文中的讲解内容简单清晰,易于学习与理解,下面请大家跟着小编的思路慢慢深入,一起来研究和学习“VBS属性FreeSpace的用法”吧!

成都创新互联公司是专业的津市网站建设公司,津市接单;提供成都网站制作、网站建设、外贸网站建设,网页设计,网站设计,建网站,PHP网站建设等专业做网站服务;采用PHP框架,可快速的进行津市网站开发网页制作和功能扩展;专业做搜索引擎喜爱的网站,专业的做网站团队,希望更多企业前来合作!

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  &"
"    s = s & "可用空间:" & FormatNumber(d.FreeSpace/1024, 0)     s = s & "KB"ShowFreeSpace = sEnd Function

感谢各位的阅读,以上就是“VBS属性FreeSpace的用法”的内容了,经过本文的学习后,相信大家对VBS属性FreeSpace的用法这一问题有了更深刻的体会,具体使用情况还需要大家实践验证。这里是创新互联网站建设公司,,小编将为大家推送更多相关知识点的文章,欢迎关注!


当前标题:VBS属性FreeSpace的用法-创新互联
文章URL:http://bjjierui.cn/article/hhocd.html

其他资讯