给你个函数，调用方式，lens代表你想取得的字符长度，一个汉字等于2个字符，一个英文字母代表一个字符，比如20就是10个汉字，调用方式和函数如下lt%lens=20% lt%=gotTopicrs_newsquotTITLEquot，lens% lt function got。

do while not rs2eof topnews=topnews+quot quotrs2quotleftnews_title，8quotquotquotrs2movenext loop end if rs2close set rs2=nothing 试试。

lt%=leftrsquotsubjectquot，15%哦 你只是想多出来的才加啊 那就用这个函数 Function LenStrTheStr，LengthIf LenTheStrLength then TmpStr=LeftTheStr，15TmpStr=TmpStrquotquotLenStr=TmpStr Else LenStr。

lt% if lenrsquotnews_titlequotlt=25 then responseWritetrimrsquotnews_titlequot else responseWriteleftrsquotnews_titlequot，25quotquot end if% 这种格式写。

Content2=quotvar mylinks=#39quot 链接地址 Content3=quotvar texts=#39quot 解释文字 循环开始 Do while Not rsImgeof and Gslt=4 Links = quotViewasp？ID=quotrsImgquotidquotquotquot 设定links的值 Title=TrimrsImgquot。

先用len函数判断，然后截取字符，用到的函数有 right，left，mid等。

= ReplacestrContent， quotltquot， quotltquotCutStr=replacestrContent，chr10，quotquotEnd Function 引用方法是lt% =CutStrmzwords，100% 这个函数可以对英文与中文字符正确识别并截取只要left无法正常中文和英文字数。

1，首先把图片统一处理方便管理也就是把名称改成自己一看就明白的，2，然后数据库access中导入图片的链接地址注意地址是相对于asp文件的相对路径，我写成这样的格式 3，至于对图片的修饰，为了便于统一处理。

首先你必须要有一款Rich TextBox，不是微软自带的那个噢，一般可以选择FCKEditor 其次呢，数据类型呢就是nText类型，图片不用担心，这些FCKEditor有上传图片的按钮，你要做的就是把FCKEditor内容保存到数据库最后就是在后台。

朋友你给的代码不全，就猜着来给你说说吧，希望能帮助你，祝福你在定义时少了i，应加上，如Dim n， i 在分页列表时，“ 转”加入如下 lt%for i = 1 to n% ltoption value=quotlt%=i%quot lt%if cintCurr。

使用left函数就可以了 lt%=leftrsquotcontentquot，100% 后面的100就是要显示的字符数。

本人刚研究出来，用的是datalist ltaspDataList ID=quotDataList1quot runat=quotserverquot ltItemTemplate lt%#DataBinderEvalContainerDataItem， quotBiaoTiquot % nbsp nbsp nbsp nbsp nbsp nbsp nbsp nbsp nbs。

AutoLink = quotnewasp？id=quotrs_newsquotidquotquotquotEnd If ResponseWrite quotquotcutstrrs_newsquottitlequot，13quotquotVbCrLf ltmarquee lt%rs_newsmovenext i=i+1 if i=5then exit do loop rs_newsclose %。

改为 sql=quotupdate news set hits=hits+1 where id=quotcintrequestquotidquot其次，现在你的代码运行后是个什么情况也没有个说明然后，在文章调用的sql语句后我只看到你调出了文章标题title，没有其它字段的读出，是不。

function showTitleo var span = ochildNodes1 = quotblockquot function hiddenTitleo var span = ochildNodes1 = quotquot 以下是完整代码lt！DOCTYPE html。

我给你个思路，用这篇文章的sql语句上面修改下，上一篇当前id1 下一篇当前id+1。

lta href=quotpageDefaultasp？ID=lt%=adoRSquotIDquot%quotlt%=leftadoRSquottitlequot，20% lt% if count mod 2 =0 then % lt% end if % lt adoRSmovenext loop adoRSclose lta href=quotpageDefault。

% 你不能照搬我这个，具体还要讲数据库那段的代码放到上面来，或者他是在其他的ASP里写的数据库那段代码，我写的rsquottitlequot 这个title是新闻标题 你要改成和数据库对应的标签哈 完全不懂 就很麻烦。