控制输出字符长度的函数.asp

来自「较为详细的介绍了asp自定义的各种函数,方便asp的各种开发.」· ASP 代码 · 共 17 行

<%
sub leftstr(all,max,dian)
'all是所有字符
'max是所允许输出的最大字符数
'dian是输出点的数量
'输出字符数为max-dian
if len(all)>max-dian then 
   response.write left(all,max-dian)
   for i=1 to dian
      response.write "."
   next
else
   response.write all
end if
end sub
leftstr "aaaaadfdghfjg",10,3
%>