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)
終了機能
%>
