刚在商业区看到用户有这方面需求，现说明如下：

打开ks_cls/kesion.clubcls.asp

找到345行左右

         If KS.ChkClng(BSetting(25))=2 Then

         echo " <a href=""" & ListUrl & "?boardid=" & boardid& "&c=" &CategoryId&"""><Img src='" & categoryIco & "' alt='" &CategoryName & "' border='0' align='absmiddle'/></a>"

         Else

         echo "<a href=""" & ListUrl & "?boardid=" & boardid& "&c=" &CategoryId&""">" & CategoryName &"</a>"

         End If

        End If

         End If

         echo "<a target=""_blank"" href=""" & KS.GetClubShowUrl(TopicID) & """>" & replace(replace(TopicNode.SelectSingleNode("@subject").text,"{","{"),"}","}") & "</a>"

         If cint(TopicNode.SelectSingleNode("@showscore").text)>0 then

          echo "<span class=""sj""> - [售价：<span style='color:red'>" &TopicNode.SelectSingleNode("@showscore").text & "</span> "

          Dim CurrChargeType

          If TopicNode.SelectSingleNode("@istop").text<>"0" Then

增加上面红色的代码即可