給你個(gè)函數(shù)，調(diào)用方式，lens代表你想取得的字符長(zhǎng)度，一個(gè)漢字等于2個(gè)字符，一個(gè)英文字母代表一個(gè)字符，比如20就是10個(gè)漢字，調(diào)用方式和函數(shù)如下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%哦 你只是想多出來的才加啊 那就用這個(gè)函數(shù) 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 解釋文字 循環(huán)開始 Do while Not rsImgeof and Gslt=4 Links = quotViewasp？ID=quotrsImgquotidquotquotquot 設(shè)定links的值 Title=TrimrsImgquot。

先用len函數(shù)判斷，然后截取字符，用到的函數(shù)有 right，left，mid等。

= ReplacestrContent， quotltquot， quotltquotCutStr=replacestrContent，chr10，quotquotEnd Function 引用方法是lt% =CutStrmzwords，100% 這個(gè)函數(shù)可以對(duì)英文與中文字符正確識(shí)別并截取只要left無法正常中文和英文字?jǐn)?shù)。

1，首先把圖片統(tǒng)一處理方便管理也就是把名稱改成自己一看就明白的，2，然后數(shù)據(jù)庫(kù)access中導(dǎo)入圖片的鏈接地址注意地址是相對(duì)于asp文件的相對(duì)路徑，我寫成這樣的格式 3，至于對(duì)圖片的修飾，為了便于統(tǒng)一處理。

首先你必須要有一款Rich TextBox，不是微軟自帶的那個(gè)噢，一般可以選擇FCKEditor 其次呢，數(shù)據(jù)類型呢就是nText類型，圖片不用擔(dān)心，這些FCKEditor有上傳圖片的按鈕，你要做的就是把FCKEditor內(nèi)容保存到數(shù)據(jù)庫(kù)最后就是在后臺(tái)。

朋友你給的代碼不全，就猜著來給你說說吧，希望能幫助你，祝福你在定義時(shí)少了i，應(yīng)加上，如Dim n， i 在分頁(yè)列表時(shí)，“ 轉(zhuǎn)”加入如下 lt%for i = 1 to n% ltoption value=quotlt%=i%quot lt%if cintCurr。

使用left函數(shù)就可以了 lt%=leftrsquotcontentquot，100% 后面的100就是要顯示的字符數(shù)。

本人剛研究出來，用的是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其次，現(xiàn)在你的代碼運(yùn)行后是個(gè)什么情況也沒有個(gè)說明然后，在文章調(diào)用的sql語(yǔ)句后我只看到你調(diào)出了文章標(biāo)題title，沒有其它字段的讀出，是不。

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

我給你個(gè)思路，用這篇文章的sql語(yǔ)句上面修改下，上一篇當(dāng)前id1 下一篇當(dāng)前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。

% 你不能照搬我這個(gè)，具體還要講數(shù)據(jù)庫(kù)那段的代碼放到上面來，或者他是在其他的ASP里寫的數(shù)據(jù)庫(kù)那段代碼，我寫的rsquottitlequot 這個(gè)title是新聞標(biāo)題 你要改成和數(shù)據(jù)庫(kù)對(duì)應(yīng)的標(biāo)簽哈 完全不懂 就很麻煩。