如何限制td内输出字数?

yangcookie 2010-01-05 05:26:34
如何限制<td>内输出50字
...全文
267 7 打赏 收藏 转发到动态 举报
写回复
用AI写文章
7 条回复
切换为时间正序
请发表友善的回复…
发表回复
tobaski 2012-02-07
  • 打赏
  • 举报
回复
简单就行 ,
hebhd 2010-01-06
  • 打赏
  • 举报
回复
无聊寂寞型~~~
wxb0903 2010-01-06
  • 打赏
  • 举报
回复
[Quote=引用 2 楼 yan11cn 的回复:]
这个用vbscript函数很简单呀,比如你要输出记录集rs中 field字段的前50个字符:
HTML code<td><%=left(rs("field"),50)%></td>
当然上面的rs("field")也可以是其他字符串,字符串变量
[/Quote]
这样就可以啦!
_老吴 2010-01-06
  • 打赏
  • 举报
回复
2楼的可以的
后浪 2010-01-05
  • 打赏
  • 举报
回复
给你个函数
'**************************
'函数名: Cut_String
'参 数: s_strsrc: 字符串
'参 数: length: 限定长度
'参 数: points: true为有"...",false为无
'返 回: String
'作 用: 截断字符串
'**************************
function cut_string(byval s_strsrc, byval i_length, byval b_points)
dim x, y, i, txt
if trim(s_strsrc) = "" or isnull(s_strsrc) then
cut_string = ""
exit function
end if
txt = Replace(Replace(Replace(Replace(s_strsrc," "," "),""",Chr(34)),">",">"),"<","<")
x = len(txt)
y = 0
if x >= 1 then
for i = 1 to x
if asc(mid(txt, i, 1)) < 0 or asc(mid(txt, i, 1)) > 255 then '如果是汉字
y = y + 2
else
y = y + 1
end if

if y >= i_length then
if b_points then
txt = left(txt, i) & "..."
else
txt = left(txt, i)
end if
exit for
end If
next
cut_string = txt
else
cut_string = ""
end If
end function
yan11cn 2010-01-05
  • 打赏
  • 举报
回复
这个用vbscript函数很简单呀,比如你要输出记录集rs中 field字段的前50个字符:

<td><%=left(rs("field"),50)%></td>

当然上面的rs("field")也可以是其他字符串,字符串变量
plcc123 2010-01-05
  • 打赏
  • 举报
回复
用js 控制 定义一个函数
function chk()
if 字数****

28,391

社区成员

发帖
与我相关
我的任务
社区描述
ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
社区管理员
  • ASP
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧