开发学院WEB开发ASP ASP常用函数 储存单位转换函数:FormatFileSize() 阅读

ASP常用函数 储存单位转换函数:FormatFileSize()

 2009-06-04 10:42:29 来源:WEB开发网   
核心提示:程序代码<%'功能:储存单位转换函数Function FormatFileSize(iSize) Dim aUnits, I aUnits = Array("B", "KB", "MB", "GB", "TB&q
程序代码
<%
'功能:储存单位转换函数
Function FormatFileSize(iSize)
   Dim aUnits, I
   aUnits = Array("B", "KB", "MB", "GB", "TB", "PB", "EB", "ZB", "YB")
   I = Log(Abs(iSize)) \ 7
   If I > UBound(aUnits) Then I = UBound(aUnits)
   FormatFileSize = FormatNumber(iSize / (1024 ^ I), 2, -1) & " " & aUnits(I)
End Function
%>

Tags:ASP 常用 函数

编辑录入:爽爽 [复制链接] [打 印]
[]
  • 好
  • 好的评价 如果觉得好,就请您
      0%(0)
  • 差
  • 差的评价 如果觉得差,就请您
      0%(0)
赞助商链接