<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />

<!--#include file="include/conn.asp"-->
<!--#include file="include/config.asp"-->
<% 
classid=clng(request.querystring("classid"))
boardid=clng(request.querystring("boardid"))
boardname=request.querystring("boardname")
if classid<>"" then
sqlt="select * from bigclass where bigclassid="&classid
set rst=server.createobject("adodb.recordset")
rst.open sqlt,conn,1,1
owen1=rst("bigclassname")
bigid=rst("bigclassid")
rst.close
set rst=nothing
else
owen1=request.querystring("owen1")
end if
 %>
<title>大唐信息网</title>
<style type="text/css">
<!--
@import url("css.css");
body {
	margin-left: 0px;
	margin-top: 0px;
	margin-right: 0px;
	margin-bottom: 0px;
}
-->
</style>
</head>

<body>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
  <tr>
    <td valign="top" background="images/bg.jpg"><table width="976" border="0" align="center" cellpadding="0" cellspacing="0">
      <tr>
        <td width="336" valign="top"><table width="97%" border="0" cellspacing="0" cellpadding="0">
          <tr>
            <td height="26" class="a10">&nbsp;</td>
          </tr>
          <tr>
            <td><table width="320" border="0" cellpadding="0" cellspacing="0" class="k1">
              <tr>
                <td><%
set rsSmallClass=server.CreateObject("adodb.recordset")
rsSmallClass.open "Select top 1 * From SmallClass where bigclassname='"&owen1&"'  order by smallclassid asc",conn,1,1
if not(rsSmallClass.bof and rsSmallClass.eof) then
do while not rsSmallClass.eof
%>
<a href="lmpic/<%=trim(rsSmallClass("bigimage"))%>" target="_blank" class="a1"><img src="lmpic/<%=trim(rsSmallClass("firstimagename"))%>" width="320" height="457" border="0" /></a>
<%
rsSmallClass.movenext
loop
end if
rsSmallClass.close
set rsSmallClass=nothing
%>　　　　　　　　</td>
              </tr>
            </table></td>
          </tr>
          <tr>
            <td height="20" valign="middle">&nbsp;</td>
          </tr>
          <tr>
            <td height="25" valign="middle"><table width="322" border="0" cellpadding="0" cellspacing="0" class="k7">
              <%call gosearch()%>
            </table></td>
          </tr>
          <tr>
            <td height="20" valign="middle">&nbsp;</td>
          </tr>
          <tr>
            <td height="209" valign="top"><table width="322" height="200" border="0" cellpadding="0" cellspacing="0" class="k2">
              <tr>
                <td height="26">&nbsp; <span class="a2">友情</span><span class="a5">链接　　　　　　　　　　　　<a href="link.asp" class="a3">更多&gt;&gt;</a></span></td>
              </tr>
              <tr><td align="left" style="text-align:center; line-height:230%" valign="top"><%=getlinks()%></td></tr>
            </table></td>
          </tr>
        </table></td>
        <td width="640" valign="top"> <!--#include file="top.asp"-->
          <tr>
            <td height="54" valign="bottom"><table width="100%" border="0" cellpadding="0" cellspacing="0" class="k2">
                <tr>
                  <td width="61%" height="39">　　　　 <span class="a6">校报导航</span>　　<span class="a9">总第<%=classid%>期</span> 　<span class="a9"><%=owen1%></span></td>
                <form method="get" action="cx.asp?classid=classid" name="search">       <td width="39%">　　<img src="images/s1.jpg" width="26" height="32" align="absbottom" /><span class="a1"> 第</span>
			<input name="classid" type="text" value="..." onFocus="this.value=''" onBlur="if (value ==''){value=' '}" size="6" /> 
			<span class="a1">期</span> <input type="image" src="images/go.gif" width="30" height="23" align="absbottom" /></td></form>
                </tr>
            </table></td>
          </tr>
          <tr>
            <td>&nbsp;</td>
          </tr>
          <tr>
            <td><table width="100%" border="0" cellspacing="0" cellpadding="0">
                <tr>

                  <td width="61%" height="234"><table width="100%" border="0" cellspacing="0" cellpadding="0">
                      <tr>
                        <td width="79%" height="28" bgcolor="#98BA3E" class="a4">　第一版：新闻版
</td>
                        <td width="21%" bgcolor="#98BA3E" class="a11"><a href="#" class="a11">更多&gt;&gt;</a></td>
                      </tr>
                      <tr>
                        <td height="213" colspan="2" valign="top" bgcolor="#F6F9E8"><table width="100%" border="0" cellspacing="0" cellpadding="0">
                            <tr>
                              <td height="19" colspan="2">&nbsp;</td>
                            </tr>
                            <tr>
                              <td width="3%" class="a12">&nbsp;</td>
			<td width="97%" class="a12"> <table width="100%" height="28" border="0" cellpadding="0" cellspacing="0">
 <% 	 
set rs=server.createobject("adodb.recordset") 
if owen1<>"" and boardname <>"" then
sql="select top 8 id,title,oColor,oStyle,top,hits,infotime,firstimagename from news where bigclassname='"&owen1&"' and smallclassname='"&boardname&"' order by top desc,id asc"
elseif owen1<>"" then
sql="select top 8 id,title,oColor,oStyle,top,hits,infotime,firstimagename from news where bigclassname='"&owen1&"' and smallclassname='第一版' order by top desc,id desc"
else
sql="select top 8 id,title,oColor,oStyle,top,hits,infotime,firstimagename from news order by top desc,id desc"
end if
rs.open sql,conn,1,1
if rs.eof and rs.bof then
response.write("暂时没有记录")
else 
do while not rs.eof 
%>

		<tr>
		<td class="a12"><b>·</b>&nbsp;&nbsp;<a class=<%=rs("oColor")%> href="xbnews.asp?id=<%=rs("id")%>" target="_blank"><span class="<%=rs("oStyle")%>"><%= left(rs("title"),22) %></span></a>
		<font color="#999999"> （<font color="#ff0000"><%= rs("infotime") %></font>）</td>
		</tr>
<%
rs.movenext
loop
%><% 
end if
rs.close
set rs=nothing
%> 
			</table></td>

                            </tr>
                        </table></td>
                      </tr>
                  </table></td>
                  <td width="2%">&nbsp;</td>
                  <td width="37%"><table width="100%" border="0" cellspacing="0" cellpadding="0">
                      <tr>
                        <td height="28" bgcolor="#98BA3E" class="a4">　版面目录　　　</td>
                      </tr>
                      <tr>
                        <td height="213" valign="top" bgcolor="#F6F9E8"><table width="100%" border="0" cellspacing="0" cellpadding="0">
                            <tr>
                              <td height="19" colspan="2">&nbsp;</td>
                            </tr>
                            <tr>
                              <td width="11%" class="a12">&nbsp;</td>
                              <td width="89%" class="a12" style="vertical-align:top;"><table width="100%" border="0" cellpadding="0" cellspacing="0">
<%
set rsSmallClass=server.CreateObject("adodb.recordset")
rsSmallClass.open "Select * From SmallClass Where BigClassName='" & owen1 & "'",conn,1,1
if not(rsSmallClass.bof and rsSmallClass.eof) then
do while not rsSmallClass.eof
%>
			<tr>
			<td class="a12">&nbsp;&nbsp;·<a  href="default.asp?classid=<%=classid%>&boardname=<%=rsSmallClass("SmallClassName")%>">
		 <%=rsSmallClass("SmallClassName")%>: <%=rsSmallClass("banmian")%></a></td>
			</tr>
  <%
			rsSmallClass.movenext
		loop
	  end if
	  rsSmallClass.close
	  set rsSmallClass=nothing	

%>

</table>


</td>
                            </tr>
                        </table></td>
                      </tr>
                  </table></td>
                </tr>
            </table></td>
          </tr>
          <tr>
            <td><table width="100%" border="0" cellspacing="0" cellpadding="0">
              <tr>
                <td width="310" height="152" valign="top"><table width="100%" border="0" cellspacing="0" cellpadding="0">
                    <tr>
                      <td height="46" valign="bottom"><table width="100%" border="0" cellspacing="0" cellpadding="0">
                          <tr>
                            <td width="32%" height="27" background="images/bg-4.jpg">&nbsp;　　<img src="images/x1.gif" width="40" height="22"></td>
                            <td width="68%" background="images/bg-1.gif" align="right"><span class="a3"><a href="#" class="a3">更多&gt;&gt;&nbsp;&nbsp;&nbsp;</a></span></td>
                          </tr>
                      </table></td>
                    </tr>
                    <tr>
                      <td><table width="100%" height="28" border="0" cellpadding="0" cellspacing="0">
<%
sql="select top 4 id,title,oColor,oStyle,top,hits,intime,infotime,firstimagename from NEWS2 where BigClassName='文学' order by id desc"
set rs=conn.execute(sql) 
do while not rs.eof 
%>
                          <tr>
                            <td background="images/bg-2.gif" class="a1"><table width="100%" height="28" border="0" cellpadding="0" cellspacing="0">
                                <tr>
                                  <td background="images/bg-2.gif" class="a1">&nbsp;&nbsp;·<a class=<%=rs("oColor")%> href="xbnews2.asp?id=<%=rs("id")%>" target="_blank"><span class="<%=rs("oStyle")%>"><%= rs("title") %></span></a></td>
                                </tr>
                            </table></td>
                          </tr> 
<%
rs.movenext 
loop
rs.close   
set rs=nothing   
%> 
                      </table></td>
                    </tr>                
                </table></td>
                <td width="20">&nbsp;</td>
                <td width="310" valign="top"><table width="100%" border="0" cellspacing="0" cellpadding="0">
                    <tr>
                      <td height="46" valign="bottom"><table width="100%" border="0" cellspacing="0" cellpadding="0">
                          <tr>
                            <td width="32%" height="27" background="images/bg-4.jpg">&nbsp;　　<img src="images/x2.gif" width="40" height="22"></td>
                            <td width="68%" align="right" background="images/bg-1.gif"><span class="a3"><a href="#" class="a3">更多&gt;&gt;&nbsp;&nbsp;&nbsp;</a></span></td>
                          </tr>
                      </table></td>
                    </tr>
                    <tr>
                      <td valign="top"><table width="100%" height="28" border="0" cellpadding="0" cellspacing="0">
     <%
sql="select top 4 id,title,oColor,oStyle,top,hits,intime,infotime,firstimagename from NEWS2 where BigClassName='消息' order by id desc"
set rs=conn.execute(sql) 
do while not rs.eof 
%>                     <tr>
                            <td background="images/bg-2.gif" class="a1"><table width="100%" height="28" border="0" cellpadding="0" cellspacing="0">

                                <tr>
                                    <td background="images/bg-2.gif" class="a1">&nbsp;&nbsp;·<a class=<%=rs("oColor")%> href="xbnews2.asp?id=<%=rs("id")%>" target="_blank"><span class="<%=rs("oStyle")%>"><%= rs("title") %></span></a></td>
                                </tr>
                            </table></td>
                          </tr>
<%
rs.movenext 
loop
rs.close   
set rs=nothing   
%> 		
                      </table></td>
                    </tr>
			
              
                </table></td>
              </tr>
            </table></td>
          </tr>
          
        </table>
          <table width="100%" border="0" cellspacing="0" cellpadding="0">
            <tr>
              <td width="310" height="152" valign="top"><table width="100%" border="0" cellspacing="0" cellpadding="0">
                  <tr>
                    <td height="42" valign="bottom"><table width="100%" border="0" cellspacing="0" cellpadding="0">
                        <tr>
                          <td width="32%" height="27" background="images/bg-4.jpg">&nbsp;　　<img src="images/x3.gif" width="40" height="22"></td>
                          <td width="68%" background="images/bg-1.gif" align="right"><span class="a3"><a href="#" class="a3">更多&gt;&gt;&nbsp;&nbsp;&nbsp;</a></span></td>
                        </tr>
                    </table></td>
                  </tr>
                  <tr>
                    <td><table width="100%" height="28" border="0" cellpadding="0" cellspacing="0">
<%
sql="select top 4 id,title,oColor,oStyle,top,hits,intime,infotime,firstimagename from NEWS2 where BigClassName='评论' order by id desc"
set rs=conn.execute(sql) 
do while not rs.eof 
%>                       <tr>
                          <td background="images/bg-2.gif" class="a1"><table width="100%" height="28" border="0" cellpadding="0" cellspacing="0">
                              <tr>
                                   <td background="images/bg-2.gif" class="a1">&nbsp;&nbsp;·<a class=<%=rs("oColor")%> href="xbnews2.asp?id=<%=rs("id")%>" target="_blank"><span class="<%=rs("oStyle")%>"><%= rs("title") %></span></a></td>
                              </tr>
                          </table></td>
                        </tr>
<%
rs.movenext 
loop
rs.close   
set rs=nothing   
%> 
                    </table></td>
                  </tr>
             
              </table></td>
              <td width="20">&nbsp;</td>
              <td width="310" valign="top"><table width="100%" border="0" cellspacing="0" cellpadding="0">
                  <tr>
                    <td height="42" valign="bottom"><table width="100%" border="0" cellspacing="0" cellpadding="0">
                        <tr>
                          <td width="32%" height="27" background="images/bg-4.jpg">&nbsp;　　<img src="images/x4.gif" width="40" height="22"></td>
                          <td width="68%" background="images/bg-1.gif" align="right"><span class="a3"><a href="#" class="a3">更多&gt;&gt;&nbsp;&nbsp;&nbsp;</a></span></td>
                        </tr>
                    </table></td>
                  </tr>
                  <tr>
                    <td><table width="100%" height="28" border="0" cellpadding="0" cellspacing="0">
              <%
sql="select top 4 id,title,oColor,oStyle,top,hits,intime,infotime,firstimagename from NEWS2 where BigClassName='通讯' order by id desc"
set rs=conn.execute(sql) 
do while not rs.eof 
%>                    <tr>
                          <td background="images/bg-2.gif" class="a1"><table width="100%" height="28" border="0" cellpadding="0" cellspacing="0">
                              <tr>
                                 <td background="images/bg-2.gif" class="a1">&nbsp;&nbsp;·<a class=<%=rs("oColor")%> href="xbnews2.asp?id=<%=rs("id")%>" target="_blank"><span class="<%=rs("oStyle")%>"><%= rs("title") %></span></a></td>
                              </tr>
                          </table></td>
                        </tr>
<%
rs.movenext 
loop
rs.close   
set rs=nothing   
%> 
                    </table></td>
                  </tr>
				
            
              </table></td>
            </tr>
          </table></td>
      </tr>
      <tr>
        <td height="36" colspan="2" valign="bottom"><table width="100%" border="0" cellspacing="0" cellpadding="0">
          <tr>
            <td width="11%" height="27" background="images/bg-4.jpg">&nbsp;　　<img src="images/x5.gif" width="73" height="24"></td>
            <td width="89%" background="images/bg-1.gif" align="right"><span class="a3"><a href="jzzjhd1.html">更多&gt;&gt;&nbsp;&nbsp;&nbsp;</a></span></td>
          </tr>
        </table></td>
      </tr>
      <tr>
        <td colspan="2">&nbsp;</td>
      </tr>
      <tr>
        <td colspan="2" valign="top"><table width="100%" border="0" cellspacing="0" cellpadding="0">
          <tr>
        <%
sql="select top 6 id,title,oColor,oStyle,top,hits,intime,infotime,firstimagename from NEWS2 where BigClassName='活动剪影' and firstimagename<>'' order by id desc"
set rs=conn.execute(sql) 
do while not rs.eof 
%>
			
              <td width="15%"><table width="120" height="88" border="0" align="center" cellpadding="0" cellspacing="0" >
                  <tr>
                    <td class="k2"><div align="center"><a href="news.asp?id=<%=rs("id")%>" title="<%=rs("title")%>" target="_blank" class="a1"><img src="uppic/<%=rs("firstimagename")%>" width="112" height="80" border="0" /></a></div></td>
                  </tr>  <tr>
				   <td height="27"><div align="center"><span class="a1"><a href="news.asp?id=<%=rs("id")%>" title="<%=rs("title")%>" target="_blank" class="a1"><%=left(rs("title"),16)%></a></span></div></td>   </tr>
              </table></td>
 <%
rs.movenext 
loop
rs.close   
set rs=nothing   
%>           
         
          </tr>
        
        </table></td>
      </tr>
    </table></td>
  </tr>
   
<!--#include file="bot.asp"-->
  <%
  conn.close
set conn=nothing%>
</table>
</body>
</html>
