<%function jianshao (str,no)
if len(str) > no then
jianshao =left(str,no-2)&"..."
else
jianshao = str
end if
end function
%>                                                                                                                                                                                                                                                                
