kesion:自动截取内容的200个字作为导读 问题

该功能文件为：
Admin\Article\KS.Article.asp  第965行

1. if Intro="" And KS.ChkClng(KS.G("AutoIntro"))=1 Then Intro=KS.GotTopic(KS.LoseHtml(ArticleContent),200)

复制代码

上述代码：原封不动截取前200个字

1. <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)” 将返回空格符