| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 2114 人关注过本帖
标题:[求助]response.write中字数怎样限制长度??
只看楼主 加入收藏
gmqq
Rank: 1
等 级:新手上路
帖 子:18
专家分:0
注 册:2006-11-2
收藏
 问题点数:0 回复次数:6 
[求助]response.write中字数怎样限制长度??
是一个搜索文件的源码:

问题所在:Response.Write "<td width=""300"" height=""55"" align=""center"">"&rs("content")&"</a></td>"

content是产品简介,但字数显示长度却无法限制,我试着这们写了一下:

response.write (left(rs("content"),87))
response.write ("...")

但是不行,所以请大家邦一下,感谢

Response.Write "<td width=""145"" height=""55"">&nbsp;<a href=""../Html/"&Rs("ID")&".html"" target=""_blank"">"&Rs("Title")&" <font color=red>"&keyword&"</font> </a></td>"
Response.Write "<td width=""300"" height=""55"" align=""center"">"&rs("content")&"</a></td>"
Response.Write "<td width=""80"" height=""25"" align=""center"">"&Rs("CLASSID")&" </a></td>"
Response.Write "<td width=""50"" height=""25"" align=""center""><Font Color=#FF0000>"&Rs("hits")&" </a></td>"
Response.Write "<td width=""160"" height=""145"" align=""name""strlen=""40"">"&Rs("name")&"</a></td>"


[此贴子已经被作者于2006-11-17 18:21:54编辑过]

搜索更多相关主题的帖子: response write 字数 长度 
2006-11-17 18:21
yms123
Rank: 16Rank: 16Rank: 16Rank: 16
等 级:版主
威 望:209
帖 子:12488
专家分:19042
注 册:2004-7-17
收藏
得分:0 

用len函数求长度判断,mid函数截取。
if len(rs("content"))>87 Then
response.write (mid(rs("content"),1,87))
response.write ("...")
else
response.write (rs("content"))
end if

2006-11-17 19:21
gmqq
Rank: 1
等 级:新手上路
帖 子:18
专家分:0
注 册:2006-11-2
收藏
得分:0 
感谢回答,不过还是没有解决啊

你的写法是对的,但显示的时候会跳出框架外显示,
和我写的:
response.write (left(rs("content"),87))
response.write ("...")
是一样的结果

问题是一定在要在指定框架内显示,

Response.Write "<td width=""300"" height=""55"" align=""center"">"&rs("content")&"</a></td>"

请在邦一下,感谢

如果可以请加我QQ:393195095

[此贴子已经被作者于2006-11-17 19:42:02编辑过]

2006-11-17 19:33
yms123
Rank: 16Rank: 16Rank: 16Rank: 16
等 级:版主
威 望:209
帖 子:12488
专家分:19042
注 册:2004-7-17
收藏
得分:0 

Response.Write "<td width=300 height=55 align=center >"
if len(rs("content"))>87 Then
response.write (mid(rs("content"),1,87))
response.write ("...")
else
response.write (rs("content"))
end if
response.write "</a></td>"
这样写不就在框架内了吗?

2006-11-17 19:45
gmqq
Rank: 1
等 级:新手上路
帖 子:18
专家分:0
注 册:2006-11-2
收藏
得分:0 
感谢版主,此问题搞定,还有个问题,请在帮忙看看,谢谢了

问题:怎样让搜索时,让一句话中只是关健变红,其它字不变红?

这个读出的标题:Response.Write "<td width=""145"" height=""55"">&nbsp;<a href=""../Html/"&Rs("ID")&".html"" target=""_blank""><font color=red>"&Rs("Title")&"</font> </a></td>"

我加入<font color=red>出现整个标题都变红了,请问我的语法错在那里?
2006-11-17 19:58
yms123
Rank: 16Rank: 16Rank: 16Rank: 16
等 级:版主
威 望:209
帖 子:12488
专家分:19042
注 册:2004-7-17
收藏
得分:0 

用Replace函数对搜索关键词过滤
比如
Replace([带有搜索关键词的字符串变量],[要寻找的搜索关键词变量],[替换后的搜索关键词])
用法
<html>
<head>
<title>关键词示范</title>
</head>
<body>
<%
Dim Str
Str="这里有需要变红的红色字体"
Response.write "源内容:"&Str
Str=Replace(Str,"红","<font color=red>红</font>")
Response.write "替换后的内容:"&Str
%>
</body>
</html>
将上面的网页代码保存为ASP文件执行后看效果。

2006-11-17 20:41
gmqq
Rank: 1
等 级:新手上路
帖 子:18
专家分:0
注 册:2006-11-2
收藏
得分:0 
按照你的提示,我进行了关健字的替换,不过却显示不出来,请问错在那里?
Response.Write "<td width=""145"" height=""55"">&nbsp;<a href=""../Html/"&Rs("ID")&".html"" target=""_blank"">"(&Rs("Title")&" ,""&keyword&"","<font color=red>"&keyword&"</font>")</a></td>"


错误类型:
Microsoft VBScript 编译器错误 (0x800A03EA)
语法错误
/vod/so/go.asp, line 97, column 112
Response.Write "<td width=""145"" height=""55"">&nbsp;<a href=""../Html/"&Rs("ID")&".html"" target=""_blank"">"(&Rs("Title")&" ,""&keyword&"","<font color=red>"&keyword&"</font>")</a></td>"

[此贴子已经被作者于2006-11-17 21:52:20编辑过]

2006-11-17 21:26
快速回复:[求助]response.write中字数怎样限制长度??
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.015144 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved