kesion:自动截取内容的200个字作为导读 问题
该功能文件为:Admin\Article\KS.Article.asp第965行
if Intro="" And KS.ChkClng(KS.G("AutoIntro"))=1 Then Intro=KS.GotTopic(KS.LoseHtml(ArticleContent),200)上述代码:原封不动截取前200个字
<blockquote>if Intro="" And KS.ChkClng(KS.G("AutoIntro"))=1 Then Intro=KS.GotTopic(replace(replace(replace(Replace(KS.LoseHtml(ArticleContent),vbcrlf,"")," ","")," ",""),chr(32),""),200)
其中:
1、“vbCrLf”是Visual Basic(VB,一种编程语言)中的一个字符串常数,即"Chr(13) & Chr(10)"(回车符与换行符连接在一起),是换行的意思。
2、“chr(32)” 将返回空格符
页:
[1]