英文中间缺少空格更改
找到KS_Cls下Kesion.Label.FunctionCls.asp第141行更改为
case "intro" echo KS.Gottopic(KS.LoseHtml(replace(replace(replace(replace(replace(Node.SelectSingleNode("@intro").text&"",chr(32)," ")," "," "),""," "),""," ")," "," ")),KS.ChkClng(ParamNode.getAttribute("introlen")))