<!--#include file="set.asp" -->
<!--#include file="function.asp" -->
<html>
<title>天堂鸟（skynet.7u7.net）实时新闻</title>
<link rel="stylesheet" href="style.css" type="text/css">
<body leftmargin="0" topmargin="0">
<table width="773" border="0" cellspacing="1" cellpadding="0" align="center" bgcolor="#000000">
  <tr> 
    <td height="25" align="center" bgcolor="#6284cf"> 
      <table width="100%" border="0" cellspacing="0" cellpadding="0">
        <tr> 
          <td align="center"><font color="#000000">&nbsp;&nbsp;&nbsp;&nbsp;</font></td>
          <td align="center"><a href="news.asp"><font color="#000000">最新新闻</font></a></td>
          <td align="center"><font color="#000000">│</font></td>
          <td align="center"><a href="news.asp?n=娱乐"><font color="#000000">娱乐新闻</font></a></td>
          <td align="center"><font color="#000000">│</font></td>
          <td align="center"><a href="news.asp?n=体育"><font color="#000000">体育新闻</font></a></td>
          <td align="center"><font color="#000000">│</font></td>
          <td align="center"><a href="news.asp?n=科技"><font color="#000000">科技新闻</font></a></td>
          <td align="center"><font color="#000000">│</font></td>
          <td align="center"><a href="news.asp?n=财经"><font color="#000000">财经新闻</font></a></td>
          <td align="center"><font color="#000000">│</font></td>
          <td align="center"><a href="news.asp?n=社会"><font color="#000000">社会新闻</font></a></td>
          <td align="center"><font color="#000000">│</font></td>
          <td align="center"><a href="news.asp?n=汽车"><font color="#000000">汽车新闻</font></a></td>
          <td align="center"><font color="#000000">│</font></td>
          <td align="center"><a href="news.asp?n=影音"><font color="#000000">影音新闻</font></a></td>
          <td align="center"><font color="#000000">│</font></td>
          <td align="center"><a href="news.asp?n=国内"><font color="#000000">国内新闻</font></a></td>
          <td align="center"><font color="#000000">│</font></td>
          <td align="center"><a href="news.asp?n=国际"><font color="#000000">国际新闻</font></a></td>
          <td align="center"><font color="#000000">│</font></td>
          <td align="center"><a href="news.asp?n=文教"><font color="#000000">文教新闻</font></a></td>
          <td align="center"><font color="#000000">&nbsp;&nbsp;&nbsp;&nbsp;</font></td>
        </tr>
      </table>
    </td>
  </tr>
</table>
<table width="773" border="0" cellspacing="0" cellpadding="0" align="center" height="10">
  <tr> 
    <td></td>
  </tr>
</table>
<%
NewsList(Trim(Request.QueryString("n")))
NewsImage()
%>
<table width="773" border="0" cellspacing="0" cellpadding="0" align="center">
  <tr> 
    <td width="132" valign="top" align="center" bgcolor="#CCCCCC"> 
      <table border="0" cellspacing="0" cellpadding="4" bgcolor="#CCCCCC">
        <tr>
          <td bgcolor="#6284cf" class="line_b" align="center">图 片 新 闻</td>
        </tr>
        <%
		  For i=1 to Count\4 -1 
		  Response.Write "<tr><td align=center >"&ArrayNewsImg(i)&"</td></tr><tr><td align=center >"&ArrayNewsTitle(i)&"</td></tr>"
		  Next
		  %>
      </table>
    </td>
    <td width="10"></td>
    <td valign="top"> 
      <table width="100%" border="0" cellspacing="0" cellpadding="4">
        <tr> 
          <td height="22" bgcolor="#6284cf"><b>天气预报</b></td>
        </tr>
        <tr> 
          <td width="100%" height="100%" class="line_t" style="font-family=宋体"> 
            <!--#include file="weather.asp" -->
          </td>
        </tr>
      </table>
      <% If Trim(Request.QueryString("n"))<>"" then %>
      <table width="100%" border="0" cellspacing="0" cellpadding="4">
        <tr> 
          <td class="thetitle" bgcolor="#6284cf" height="22"><b><%=Trim(Request.QueryString("n"))%>新闻</b></td>
        </tr>
        <tr> 
          <td class="line_t" style="LINE-HEIGHT: 200%""><%=News%></td>
        </tr>
      </table>
      <% Else %>
	  <% If YuLe<>"" then %>
      <table width="100%" border="0" cellspacing="0" cellpadding="4">
        <tr> 
          <td class="thetitle" bgcolor="#6284cf" height="22"><b>娱乐新闻</b></td>
        </tr>
        <tr> 
          <td class="line_t" style="LINE-HEIGHT: 200%""><%=Replace(YuLe,"[娱乐]","")%></td>
        </tr>
      </table>
	  <% End if %>
	  <% If TiYu<>"" then %>
      <table width="100%" border="0" cellspacing="0" cellpadding="4">
        <tr> 
          <td class="thetitle" height="22" bgcolor="#6284cf"><b>体育新闻</b></td>
        </tr>
        <tr> 
          <td class="line_t" style="LINE-HEIGHT: 200%""><%=replace(TiYu,"[体育]","")%></td>
        </tr>
      </table>
	  <% End if %>
	  <% If KeJi<>"" then %>
      <table width="100%" border="0" cellspacing="0" cellpadding="4">
        <tr> 
          <td class="thetitle" height="22" bgcolor="#6284cf"><b>科技新闻</b></td>
        </tr>
        <tr> 
          <td class="line_t" style="LINE-HEIGHT: 200%""><%=replace(KeJi,"[科技]","")%></td>
        </tr>
      </table>
	  <% End if %>
	  <% If CaiJin<>"" then %>
      <table width="100%" border="0" cellspacing="0" cellpadding="4">
        <tr> 
          <td class="thetitle" height="22" bgcolor="#6284cf"><b>财经新闻</b></td>
        </tr>
        <tr> 
          <td class="line_t" style="LINE-HEIGHT: 200%""><%=replace(CaiJin,"[财经]","")%></td>
        </tr>
      </table>
	  <% End if %>
	  <% If SheHui<>"" then %>
      <table width="100%" border="0" cellspacing="0" cellpadding="4">
        <tr> 
          <td class="thetitle" height="22" bgcolor="#6284cf"><b>社会新闻</b></td>
        </tr>
        <tr> 
          <td class="line_t" style="LINE-HEIGHT: 200%""><%=replace(SheHui,"[社会]","")%></td>
        </tr>
      </table>
	  <% End if %>
	  <% If QiChe<>"" then %>
      <table width="100%" border="0" cellspacing="0" cellpadding="4">
        <tr> 
          <td class="thetitle" height="22" bgcolor="#6284cf"><b>汽车新闻</b></td>
        </tr>
        <tr> 
          <td class="line_t" style="LINE-HEIGHT: 200%""><%=replace(QiChe,"[汽车]","")%></td>
        </tr>
      </table>
	  <% End if %>
	  <% If YingYin<>"" then %>
      <table width="100%" border="0" cellspacing="0" cellpadding="4">
        <tr> 
          <td class="thetitle" height="22" bgcolor="#6284cf"><b>影音新闻</b></td>
        </tr>
        <tr> 
          <td class="line_t" style="LINE-HEIGHT: 200%""><%=replace(YingYin,"[影音]","")%></td>
        </tr>
      </table>
	  <% End if %>
	  <% If GuoNei<>"" then %>
      <table width="100%" border="0" cellspacing="0" cellpadding="4">
        <tr> 
          <td class="thetitle" height="22" bgcolor="#6284cf"><b>国内新闻</b></td>
        </tr>
        <tr> 
          <td class="line_t" style="LINE-HEIGHT: 200%""><%=replace(GuoNei,"[国内]","")%></td>
        </tr>
      </table>
	  <% End if %>
	  <% If GuoJi<>"" then %>
      <table width="100%" border="0" cellspacing="0" cellpadding="4">
        <tr> 
          <td class="thetitle" height="22" bgcolor="#6284cf"><b>国际新闻</b></td>
        </tr>
        <tr> 
          <td class="line_t" style="LINE-HEIGHT: 200%""><%=replace(GuoJi,"[国际]","")%></td>
        </tr>
      </table>
	  <% End if %>
	  <% If WenJiao<>"" then %>
      <table width="100%" border="0" cellspacing="0" cellpadding="4">
        <tr> 
          <td class="thetitle" height="22" bgcolor="#6284cf"><b>文教新闻</b></td>
        </tr>
        <tr> 
          <td class="line_t" style="LINE-HEIGHT: 200%""><%=replace(WenJiao,"[文教]","")%></td>
        </tr>
      </table>
	  <% End if %>
	  <% If NvXing<>"" then %>
      <table width="100%" border="0" cellspacing="0" cellpadding="4">
        <tr> 
          <td class="thetitle" height="22" bgcolor="#6284cf"><b>女性专题</b></td>
        </tr>
        <tr> 
          <td class="line_t" style="LINE-HEIGHT: 200%""><%=replace(NvXing,"[女性]","")%></td>
        </tr>
      </table>
	  <% End if %>
      <% End if %>
      <table width="100%" border="0" cellspacing="0" cellpadding="0" height="10">
        <tr> 
          <td></td>
        </tr>
      </table>
    </td>
    <td width="10" valign="top"></td>
    <td width="132" valign="top" align="center" bgcolor="#CCCCCC"> 
      <table border="0" cellspacing="0" cellpadding="4" bgcolor="#CCCCCC">
        <tr>
          <td align="center" bgcolor="#6284cf" class="line_b">图 片 新 闻</td>
        </tr>
        <%
		  For i=Count\4 to Count\2-2
		  Response.Write "<tr><td align=center >"&ArrayNewsImg(i)&"</td></tr><tr><td align=center >"&ArrayNewsTitle(i)&"</td></tr>"
		  Next
		  %>
      </table>    </td>
  </tr>
</table>
</body>
</html>