用系統函數標簽的欄目（頻道）總導航標簽可以很方便的給生成的當前欄目加上currclass，但有些情況，我們必須得用sql標簽來實現的話，又苦于無法給當前欄目加上currclass樣式

現提供實現方法：

打開ks_cls/kesion.label.sqlcls.asp

找到300多行，增加下面紅色的代碼即可

regEx.Pattern = "{\$Field\([^{\$}]*}"
regEx.IgnoreCase = True
regEx.Global = True
Set Matches = regEx.Execute(CirLabelContent)
TempStr=Replace(CirLabelContent,"{$AutoID}",N)
If Instr(tempstr,"{#GetItemUrl}")<>0 then tempstr=replace(tempstr,"{#GetItemUrl}",GetItemUrl(KS_RS_Obj))
If Instr(tempstr,"{#CurrClass}")<>0 then
if Split(KS.C_C(Fcls.RefreshFolderID,8)&",",",")(0)=KS_RS_Obj("id") or (UCase(FCls.RefreshType) = "INDEX" and N=1) then
tempstr=replace(tempstr,"{#CurrClass}"," class=""currclass""")
else
tempstr=replace(tempstr,"{#CurrClass}","")
end if
End If
For Each Match In Matches

使用方法：

在sql標簽的循環體里加入{#CurrClass}標簽。

如：