asp显示字符长度限制

Question

<%
set rs=server.CreateObject("adodb.recordset")
strsql="select top 6 * from "& db_EC_News_Table &" where E_bigclassid=104 order by newsid desc"
rs.open strsql,conn,1,1
for i=1 to rs.recordcount
datetime="<font class=newsdate>["& Month(rs("UpdateTime")) &"-"& Day(rs("UpdateTime")) &"]</font>"
%>

<td width="40%"><a class="tj" target="_blank" href="E_ReadNews.asp?NewsId=<%=rs("newsid")%>"><font size="2"><font size="2">·</font></font><%=rs("Title")%></td><td><%=datetime%></td>
<%
if i mod 2=0 then
response.Write("</tr><tr>")
end if
rs.movenext
next
rs.close
set rs=nothing
%>

以上是源代码，我想实现 title这个字段只显示20个字符。

Answer 1

1、Left 函数，可从字符串的左侧返回指定数目的字符

例子：

txt="This is a beautiful day!"
response.write Left(txt,11)

输出结果：

This is a b

2、Right函数，返回从字符串右侧开始指定数目的字符。  

例子：

txt="This is a beautiful day!"
response.write Right(txt,10)

输出结果：

tiful day!

3、Mid函数，可从字符串中返回指定数目的字符。

语法：Mid(string,start[,length])

参数说明

string 必需的。从其中返回字符的字符串表达式。如果字符串包含 Null，则返回 Null。 

start 必需的。规定起始位置。如果设置为大于字符串中的字符数目，则返回空字符串("")。    

length 可选的。要返回的字符数目。如果省略或 length 超过文本的字符数（包括 start 处的字符），将返回字符串中从 start 到字符串结束的所有字符。

例子1：

dim txt
txt="This is a beautiful day!"
response.write Mid(txt,1)

输出结果：

This is a beautiful day!

例子2：

dim txt
txt="This is a beautiful day!"
response.write Mid(txt,2,11)

输出结果：

his is a be

 4、其他辅助的字符串处理函数：

InStr函数，返回字符串在另一字符串中首次出现的位置。检索从字符串的第一个字符开始。

InStrRev函数，返回字符串在另一字符串中首次出现的位置。检索从字符串的最末字符开始。

Len函数，返回字符串中的字符数目。

LTrim函数，删除字符串左侧的空格。

RTrim函数，删除字符串右侧的空格。

Trim函数，删除字符串左侧和右侧的空格。

Replace函数，使用另外一个字符串替换字符串的指定部分指定的次数。

Space函数，返回由指定数目的空格组成的字符串。

StrComp函数，比较两个字符串，返回代表比较结果的一个值。

String函数，返回包含指定长度的重复字符的字符串。

StrReverse函数，反转字符串。

UCase函数，把指定的字符串转换为大写。

LCase函数，把指定的字符串转换为小写。

Answer 2

left（要截取的字符串，要截取的长度）’从左边开始截取指定长度的字符
right（要截取的字符串，要截取的长度）’从右边开始截取指定长度的字符
MID(要截取的字符串,开始截取的位置, 要截取的长度)从任意位置开始截取指定长度的字符
将
<%=rs("Title")%>
改为
<%=left(rs("Title"),20)%>

Answer 3

<%
set rs=server.CreateObject("adodb.recordset")
strsql="select top 6 * from "& db_EC_News_Table &" where E_bigclassid=104 order by newsid desc"
rs.open strsql,conn,1,1
for i=1 to rs.recordcount
datetime="<font class=newsdate>["& Month(rs("UpdateTime")) &"-"& Day(rs("UpdateTime")) &"]</font>"
%>

<td width="40%"><a class="tj" target="_blank" href="E_ReadNews.asp?NewsId=<%=rs("newsid")%>"><font size="2"><font size="2">·</font></font><%=left(rs("Title"),20)%></td><td><%=datetime%></td>
<%
if i mod 2=0 then
response.Write("</tr><tr>")
end if
rs.movenext
next
rs.close
set rs=nothing
%>

Answer 4

将<%=rs("Title")%>替换为：
<% if len(rs("title"))>20 then response.write left(rs("Title"),20)
else
response.write rs("Title")
end if
%>