<!-- #include file="include/con_forum.asp" -->
<!-- #include file="include/con_forum_main.asp" -->
<%

if not isnumeric(forumid) then
  call format_redirect("forum.asp")
end if
%>
<!-- #include file="include/con_forum_fir.asp" -->
<!-- #include file="include/con_forum_list.asp" -->
<!-- #include file="include/jk_pagecute.asp" -->
<!-- #include file="include/jk_page_cute.asp" -->
<%
dim nummer,nums,rssum,page,viewpage,thepages
nummer=dim_num(0)
nums=nummer
page=1

iframe=true

select case action
case "isgood"
  ftit="精华"
case "manage"
  ftit="管理"
case else
  action=""
  ftit="主题列表"
end select

call forum_first()
if forum_config(3)>0 then
nummer=forum_config(3)
nums=nummer
end if
call web_head(0,0,h_var3,0,0)
call forum_load()
'call web_branch(0)
'---------------------------------头部-----------------------------------------------
%>
<script language=javascript>
function list_pagecute(viewurl,replynum,pagecutenum)
{
  var pagecutepage=0;
  var pagecutei=0;
  var temp1="";
  var pagecutecolor="red2"
  pagecutepage=replynum/pagecutenum;
  pagecutepage=Math.round(pagecutepage);
  if ((pagecutepage*pagecutenum)<replynum) pagecutepage+=1;
  if (pagecutepage>1)
  {
    for (pagecutei=2;pagecutei<4;pagecutei++)
    {
      if (pagecutei>pagecutepage) break;
      temp1+=" <a href='"+viewurl+"&page="+pagecutei+"'><font class="+pagecutecolor+" alt='第 "+pagecutei+" 页' style=\"font-family:黑体;font-weight: bold\">"+pagecutei+"</font></a> ";
    }
    if (pagecutepage>3)
    {
      if (pagecutepage==4)
      { temp1+=" <a href='"+viewurl+"&page=4'><font class="+pagecutecolor+" alt='第 4 页' style=\"font-family:黑体;font-weight: bold\">4</font></a> "; }
      else
      { temp1+=" <font class="+pagecutecolor+">… </font> <a href='"+viewurl+"&page="+pagecutepage+"'><font class="+pagecutecolor+" alt='第 "+pagecutepage+" 页' style=\"font-family:黑体;font-weight: bold\">"+pagecutepage+"</font></a> "; }
    }
    temp1="&nbsp;<img src='<%response.write joekoe_cms.web_dir_skin%>forum/page_head.gif' align=absMiddle alt='快速分页' border=0>&nbsp;"+temp1;
  }
  return temp1;
}

function load_tree(f_id,v_id,istop_var)
{
  var targetImg=eval("document.all.followImg"+istop_var+v_id);
  var targetDiv=eval("document.all.follow"+istop_var+v_id);
  if (targetImg.src.indexOf("nofollow")!=-1) {return false;}
  if ("object"==typeof(targetImg))
  {
    if (targetDiv.style.display!='block')
    {
      targetDiv.style.display="block";
      targetImg.src="<%response.write joekoe_cms.web_dir_skin%>small/fk_minus.gif";
      if (targetImg.loaded=="no") { document.frames["hiddenframe"].location.replace("forum_loadtree.asp?forum_id="+f_id+"&view_id="+v_id+"&istop_var="+istop_var); }
    }
    else
    {
      targetDiv.style.display="none";
      targetImg.src="<%response.write joekoe_cms.web_dir_skin%>small/fk_plus.gif";
    }
  }
}
</script>
<%
if action="manage" then
  if forum_power_true(forumpower)=false then
    action=""
    tit=""
  end if
end if
call forum_istops()
'----------------------------中间 开始----------------------------
call forum_grade()
call forum_list_istop()

if forumn>0 then
  response.write vbcrlf&forum_main_head(forumname,forumid)
  call forum_list_main()
  response.write vbcrlf&forum_main_end("")
end if

if forumw=true then
  call forum_top(""&utit&"（主题列表）")
  call list_body()
end if

call list_end(forumn)
'call web_branch(0)
'----------------------------中间 结束----------------------------
call forum_end()
call web_end(0,0)

%>
