<!-- #include file="include/con_gsgl.asp" -->
<%
call cid_sid()
select case action
case "good"
  tit="推荐文章"
case "hot"
  tit="热门文章"
case "search"
  tit="文章搜索"
case else
  if int(cid)<1 then call format_redirect("gsgl.asp")
  if action<>"more" then action=""
  tit="文章列表"
end select
%>
<!-- #include file="include/con_gsgl_list.asp" -->
<!-- #include file="include/jk_pagecute.asp" -->
<!-- #include file="include/jk_page_cute.asp" -->
<!-- #include file="include/jk_keyes.asp" -->
<%
dim nummer,rssum,page,viewpage,thepages,pageurl
nummer=dim_num(0)
pageurl="?action="&action&"&c_id="&cid&"&s_id="&sid&"&"

call web_head(0,0,0,0,0)
call gsgl_load(0,0,0)
%>
<TABLE cellSpacing=0 cellPadding=0 width=777 align=center border=0>
  <TBODY>
    <TR> 
      <TD vAlign=top width=215><TABLE cellSpacing=0 cellPadding=0 width=215 border=0>
          <TBODY>
            <TR> 
              <TD> <TABLE cellSpacing=0 cellPadding=0 width="98%" border=0>
                  <TBODY>
                    <TR> 
                      <TD vAlign=top width="9%" height=22><IMG height=22 
                  src="image/house/home-left0.gif" width=19></TD>
                      <TD width="88%" background=image/house/home-left6.gif 
                  height=22><A class=red href="http://news.zhongsou.com/fin.htm" 
                  target=_blank>阅读排行</A></TD>
                      <TD vAlign=top width="3%"><IMG height=22 
                  src="image/house/home-left7.gif" width=13></TD>
                    </TR>
                    <TR align=middle> 
                      <TD colSpan=3> <TABLE 
                  style="BORDER-RIGHT: #dee0d7 1px solid; BORDER-TOP: 0px solid; BORDER-LEFT: #dee0d7 1px solid; BORDER-BOTTOM: #298e83 0px solid" 
                  cellSpacing=0 cellPadding=0 width="100%" bgColor=#fefff9>
                          <TBODY>
                            <TR> 
                              <TD align=middle> <TABLE width=200 border=0 align="center" cellPadding=0 cellSpacing=0>
                                  <TBODY>
                                    <TR> 
                                      <TD vAlign=top><table border=0 cellspacing=0 cellpadding=0 width='100%'>
                                          <%
						dim id,topic
sql="select top 10 id,topic from gsgl where hidden=1 order by counter desc, id desc"
set rs=joekoe_cms.exec(sql,1)
do while not rs.eof
  id=rs("id")
  topic=rs("topic")
  response.write vbcrlf&"    <tr><td height='"&dim_num(6)&"'> · <a href='gsgl_view.asp?id="&id&"' target=_blank alt='"&joekoe_cms.code_html(topic,1,0)&"'>"&joekoe_cms.code_html(topic,1,15)&"</a></td></tr>"
  rs.movenext
loop
rs.close
%>
                                        </table></TD>
                                    </TR>
                                  </TBODY>
                                </TABLE></TD>
                            </TR>
                          </TBODY>
                        </TABLE></TD>
                    </TR>
                  </TBODY>
                </TABLE></TD>
            </TR>
            <TR> 
              <TD> <TABLE cellSpacing=0 cellPadding=0 width="98%" border=0>
                  <TBODY>
                    <TR> 
                      <TD vAlign=top width="9%" height=22><IMG height=22 
                  src="image/house/home-left0.gif" width=19></TD>
                      <TD width="88%" background=image/house/home-left6.gif 
                  height=22><A class=red 
                  href="http://news.zhongsou.com/sports.htm" target=_blank>推荐文章</A></TD>
                      <TD vAlign=top width="3%"><IMG height=22 
                  src="image/house/home-left7.gif" width=13></TD>
                    </TR>
                    <TR align=middle> 
                      <TD colSpan=3> <TABLE 
                  style="BORDER-RIGHT: #dee0d7 1px solid; BORDER-TOP: 0px solid; BORDER-LEFT: #dee0d7 1px solid; BORDER-BOTTOM: #298e83 0px solid" 
                  cellSpacing=0 cellPadding=0 width="100%" bgColor=#fefff9>
                          <TBODY>
                            <TR> 
                              <TD align=middle> <TABLE width=200 border=0 align="center" cellPadding=0 cellSpacing=0>
                                  <TBODY>
                                    <TR> 
                                      <TD vAlign=top><table border=0 cellspacing=0 cellpadding=0 width='100%'>
                                          <%
sql="select top 10 id,topic from gsgl where hidden=1 and istop=1  order by id desc"
set rs=joekoe_cms.exec(sql,1)
do while not rs.eof
  id=rs("id")
  topic=rs("topic")
  response.write vbcrlf&"    <tr><td height='"&dim_num(6)&"'>· <a href='gsgl_view.asp?id="&id&"' target=_blank alt='"&joekoe_cms.code_html(topic,1,0)&"'>"&joekoe_cms.code_html(topic,1,15)&"</a></td></tr>"
  rs.movenext
loop
rs.close
%>
                                        </table></TD>
                                    </TR>
                                  </TBODY>
                                </TABLE></TD>
                            </TR>
                          </TBODY>
                        </TABLE></TD>
                    </TR>
                  </TBODY>
                </TABLE></TD>
            </TR>
            
        </TABLE></TD>
      <TD vAlign=top align=middle width=562><table width="98%" border="0" align="right" cellpadding="0" cellspacing="0">
          <tr>
            <td>
			<%
			select case action
case "more","good","hot","search"
  call gsgl_more(nummer,30,tit)
case else
  if cint(sid)<1 then
    call gsgl_list(6,30)
  else
    call gsgl_more(nummer,30,tit)
  end if
end select
%>
			</td>
          </tr>
        </table> </TD>
    </TR>
  </TBODY>
</TABLE>
<%

call gsgl_end()
call web_end(0,0)
%>