看不懂的asp网站代码?

下面是一个format.asp文件的代码,不懂有什么用?看不懂什么意思?哪位好心人帮我看看.先谢谢了!~~~~~~~
<%
function cutstr(str,strlen,more,url)
if len(str)>strlen then
str=left(str,strlen) & "......"
end if
if (len(str)>strlen) and more then
str=str+"   [url="+url+"]点这里查看详情[/url]"
end if
cutstr=str
end function

function strLength(str)
ON ERROR RESUME NEXT
dim WINNT_CHINESE
WINNT_CHINESE = (len("论坛")=2)
if WINNT_CHINESE then
dim l,t,c
dim i
l=len(str)
t=l
for i=1 to l
c=asc(mid(str,i,1))
if c<0 then c=c+65536
if c>255 then
t=t+1
end if
next
strLength=t
else
strLength=len(str)
end if
if err.number<>

看不懂的asp网站代码? ASP代码看不懂 asp问题，一段代码，看不懂！！ 关于asp中灌水的代码看不懂,望高手帮忙! 这段asp的模糊查询代码我看不懂 asp.net的代码看不懂 哪高手来解释一下哦 用户在线答题的网站asp代码 ASP网站的代码 怎么运行 ASP网站代码错误 求asp网站代码