Función de conversión de unidad de almacenamiento de funciones comunes de ASP: FormatFileSize()
Autor：Eve Cole
Fecha de actualización：2009-06-26 18:09:25
程序代码
<%
'功能:储存单位转换函数
Formato de funciónTamaño de archivo (iSize)
Unidades tenues, yo
aUnidades = Matriz("B", "KB", "MB", "GB", "TB", "PB", "EB", "ZB", "YB")
I = Iniciar sesión(Abs(iTamaño)) 7
Si I > UBound(aUnits) Entonces I = UBound(aUnits)
FormatFileSize = FormatNumber(iSize / (1024 ^ I), 2, -1) & " " & aUnits(I)
Función final
%>
