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

<% ‘****************************** ‘函数：FormatFileSize(l1) ‘参数：l1,字节数 ‘作者：阿里西西 ‘日期：2007/7/12 ‘描述：格式化文件大小样式 ‘示例： ‘****************************** function FormatFileSize(l1)  dim l2,l3  l3=formatnumber(l1,0,true)  if l1>1048576 then  l2=”(“&format