<!-- #include file="include/config_forum.asp" -->
<!-- #include file="include/config_forum_main.asp" -->
<!-- #include file="include/conn.asp" -->
<%
dim fvar3,isonline
isonline="yes"		'设为"yes"表示显示在线列表,"no"表示不显示
forum_mode="full"	'设为"full"表示全屏显示,"half"表示半屏显示
if len(trim(request.querystring("mode")))>0 then
  forum_mode=trim(request.querystring("mode"))
end if

tit=tit_fir
tit_fir=""

if forum_mode="full" then
  fvar3=2
  call mode_full()
else
  fvar3=0
  call mode_half()
end if

sub mode_half()
  call web_head(0,0,fvar3,0,0)
  '-----------------------------------center---------------------------------
  call format_login()
  response.write kong
  call main_stat(sk_jt,"jt1",0,5,1)
  call forum_cast(sk_jt,"jt0",10,11)
  call forum_new(sk_jt,"jt0",0,15,11,1)
  response.write left_action("jt13",1)
  '---------------------------------center end-------------------------------
  call web_center(0)
  '------------------------------------right---------------------------------
  response.write kong
  call forum_main("fk4")
  call forum_down(int(mid(web_setup,3,1)))
  '----------------------------------right end-------------------------------
  call web_end(0)
end sub

sub mode_full()
  call web_head(0,0,fvar3,0,0)
  '-----------------------------------center---------------------------------
  'response.write kong
%>
<table border=0 width='100%' cellspacing=0 cellpadding=0>
<tr align=center valign=top>
<td width=185><%call format_login()%></td>
<td align=right>
  <table border=0 width='100%' cellspacing=0 cellpadding=0>
  <tr align=center valign=top>
  <td width='2%'></td>
  <td width='32%'><%call main_stat("fk4","jt1",0,5,1)%></td>
  <td width='1%'></td>
  <td width='32%'><%call forum_new("fk4","jt0",0,5,12,1)%></td>
  <td width='1%'></td>
  <td width='32%'><%call forum_cast("fk4","jt0",5,12)%></td>
  </tr>
  </table>
</td>
</tr>
</table>

<table border=0 width='100%'><tr><td><div align=center>
  <a href=user_action.asp?action=list target=_blank>
  <img onmouseover=alpha_aba(this) style='FILTER:alpha(opacity=100)' src=images/forum/user.gif width=70 height=70 border=0></a></div></td><td><div align=center>
    <a href=user_action.asp?action=emoney target=_blank>
    <img onmouseover=alpha_aba(this) style='FILTER:alpha(opacity=100)' src=images/forum/money.gif width=70 height=70 border=0></a></div></td><td><div align=center>
    <a href=forum_action.asp?action=new target=_blank>
    <img onmouseover=alpha_aba(this) style='FILTER:alpha(opacity=100)' src=images/forum/new1.gif width=70 height=70 border=0></a></div></td><td><div align=center>
    <a href=forum_action.asp?action=good target=_blank>
    <img onmouseover=alpha_aba(this) style='FILTER:alpha(opacity=100)' src=images/forum/jinghua.gif width=70 height=70 border=0></a></div></td><td><div align=center>
    <a href=user_action.asp?action=top target=_blank>
    <img onmouseover=alpha_aba(this) style='FILTER: alpha(opacity=100)' src=images/forum/paihang.gif width=70 height=70 border=0></a></div></td><td><div align=center>
    <a href=forum_action.asp?action=hot target=_blank>
    <img onmouseover=alpha_aba(this) style='FILTER: alpha(opacity=100)' src=images/forum/hot.gif width=70 height=70 border=0></a></div></td><td><div align=center>
    <a href=forum_action.asp?action=top target=_blank>
    <img onmouseover=alpha_aba(this) style='FILTER: alpha(opacity=100)' src=images/forum/top.gif width=70 height=70 border=0></a></div></td></tr></table>
    
<%
  response.write web_right()&web_left(fvar3)	'分屏
  call forum_main("fk4")
  call forum_down(int(mid(web_setup,3,1)))
  '---------------------------------center end-------------------------------
  call web_end(0)
end sub
%>