ASP一个关于取字符串长度的问题

来源：百度知道 编辑：UC知道 时间：2024/05/22 07:13:52
本来我是用cutstr取固定长度的,今天不知怎么了,老出错.我是这样写的
<%=cutstr(rs("content"),20)
提示:类型不匹配: 'cutstr'

不知道该怎么解决?

我一般用
<%
if len(rs("content"))>20 then
response.write(left(rs("content"),19)&"...")
else
response.write(rs("content"))
end if
%>
来代替CutStr函数,从来不出错,呵

CutStr函数参数说明:str,待截取的原字符串;gtype,截取方向,1为左,0为右;lennum为截取长度
当str的长度不超过lennum时，不执行截取,如超过，则截取，并在输出的字符串尾加上"..."

Public Function CutStr(Str, Gtype, LenNum)
Dim P_Num
Dim i, X
If StrLen(Str) <= LenNum Then
CutStr = Str
Else
P_Num = 0
X = 0
Do While Not P_Num > LenNum - 2
X = X + 1
If Asc(Mid(Str, X, 1)) < 0 Then
P_Num = Int(P_Num) + 2
Else
P_Num = Int(P_Num) + 1
End If
If Gtype = 1 Then
CutStr = Left(Trim(Str), X) & "..."
Else
CutStr