asp下实现格式化文件大小以MB显示的函数

% ''****************************** ''函数:FormatFileSize(l1) ''参数:l1,字节数 ''作者:阿里西西 ''日期:2007/7/12 ''描述:格式化文件大小样式 ''示例:%=FormatFileSize(l1)% ''****************************** functionFormatFileSize(l1) diml2,l3 l3=formatnumber(l1,0,true) ifl11048576then

作者: 来源: 时间: 17-11-23 15:26:27

<%
''******************************
''函数:FormatFileSize(l1)
''参数:l1,字节数
''作者:阿里西西
''日期:2007/7/12
''描述:格式化文件大小样式
''示例:<%=FormatFileSize(l1)%>
''******************************
function FormatFileSize(l1)
 dim l2,l3
 l3=formatnumber(l1,0,true)
 if l1>1048576 then
 l2="("&formatnumber(l1/1048576,0,true)&" MB) "&l3
 else
  if l1>1024 then
   l2="("&formatnumber(l1/1024,0,true)&" KB) "&l3
  else
   l2=formatnumber(l1,0,true)
  end if
 end if
 llI=l2
end function
%>
11
22
33
隐藏区块

会员注册

本功能为预留功能,暂不支持注册 ^_^

Login

社交帐号登陆

使用以下任意帐号可登陆本站

Close section
Close

联系我们

关于5UCMS 您有任何需求 均可以留言给我们