ASP常用函数 储存单位转换函数:FormatFileSize()
作者:Eve Cole
更新时间:2009-06-26 18:09:25
程序代码
<%
'功能: 存储单位转换函数
函数格式文件大小(iSize)
暗淡单位,我
aUnits = Array("B", "KB", "MB", "GB", "TB", "PB", "EB", "ZB", "YB")
I = Log(Abs(iSize)) 7
如果 I > UBound(aUnits) 则 I = UBound(aUnits)
FormatFileSize = FormatNumber(iSize / (1024 ^ I), 2, -1) & " " & aUnits(I)
结束功能
%>