<%
'******************************
'函數：FormatFileSize(l1)
'參數：l1,字節數
'作者：阿里西西
'日期：2007/7/12
'描述：格式化文件大小樣式
'示例：<%=FormatFileSize(l1)%>
'******************************
functionFormatFileSize(l1)
diml2,l3
l3=formatnumber(l1,0,true)
ifl1>1048576then
l2="("&formatnumber(l1/1048576,0,true)&"MB)"&l3
else
ifl1>1024then
l2="("&formatnumber(l1/1024,0,true)&"KB)"&l3
else
l2=formatnumber(l1,0,true)
endif
endif
llI=l2
endfunction
%>