打开admin/include/RefreshHtml.asp
找到以下代码,并增加红色的
Dim Node,K,SQL,NodeText,Pstr,TJ,SpaceStr,TreeStr
KS.LoadClassConfig()
If KS.ChkClng(ChannelID)<>0 Then Pstr="[@ks12=" & channelid & "]"
For Each Node In Application(KS.SiteSN&"_class").DocumentElement.SelectNodes("class" & Pstr&"")
SpaceStr=""
if Node.SelectSingleNode("@ks14").text<>"2" then
TJ=Node.SelectSingleNode("@ks10").text
If TJ>1 Then
For k = 1 To TJ - 1
SpaceStr = SpaceStr & "──"
Next
.Write "<option value='" & Node.SelectSingleNode("@ks0").text & "'>" & SpaceStr & Node.SelectSingleNode("@ks1").text & " </option>"
Else
.Write "<option value='" & Node.SelectSingleNode("@ks0").text & "'>" & Node.SelectSingleNode("@ks1").text & " </option>"
End If
end if
Next