HTMer

研究互联网络和电脑应用技术的IT技术网。 (勤奋+智慧→理想)

« Vista SP1本周三发布 XP SP3或下周发布去掉IE7启动时的"自定义您的设置"方法 »

ASP显示剩余磁盘空间函数

    有时候我们在用ASP编写程序的时候,可能需要了解当前服务器上剩余磁盘空间的情况,以便我们存放更多的东西到服务器上。这个时候可能就需要用到ASP显示剩余磁盘空间函数了。请看下面具体的函数代码及调用方法。 

<%
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 = s
End Function
'下面是调用ASP显示剩余磁盘空间函数的方法,假设要显示D盘的剩余磁盘空间
response.write ShowFreeSpace("D:\")
%>


欢迎转载,转载请注明:转载自HTMer [ http://www.htmer.com/ ]

本文链接地址:http://www.htmer.com/article/152.htm

发表评论:

◎欢迎参与讨论,请在这里发表您的看法、交流您的观点。

HTMer , Powered By Z-Blog, 苏ICP备08003082号

本站采用创作共用版权协议, 要求署名、非商业用途和保持一致. 转载本站内容必须也遵循“署名-非商业用途-保持一致”的创作共用协议.
HTM|HTML|ASP|PHP|JSP|Mysql|SQL|Dreamweaver|Flash|Fireworks|Photoshop|SEO Copyright www.HTMer.com. Some Rights Reserved. English Version