<% Const dbdns = "../" Const Base_Target = "" Const ChannelID = 1 %> <% ClassID=request("id") Set Page = New TurnPage Sql="select * from Ok3w_Class where ID=" & ClassID Rs.Open Sql,Conn,0,1 SortPath = Rs("SortPath") ParentID= Rs("ParentID") SortName = Rs("SortName") IsPic = Rs("IsPic") PageSize = Rs("PageSize") Rs.Close %> <% Public Sub title() response.Write SortName End Sub %> <% Public Sub Class_Nav() call Ok3w_Article_Class_Nav(SortPath) End Sub %> <% Public Sub Classname() response.Write SortName End Sub %> <% Public Sub banner() response.Write "20" End Sub %> <% Public Sub left_menu() %> <% End Sub %> <% Public Sub main() %> <% End Sub %>