<table width="220" border="0" cellpadding="0" cellspacing="0">
  <tr>
    <td height="33" align="center" background="images/tit_bg.gif"><strong>站内搜索</strong></td>
  </tr>
  <tr>
    <td align="center"><table width="100%" border="0" cellpadding="0" cellspacing="0" bgcolor="#f7f7f7" class="tab_k">
      <form action="search.asp" method="get" name="form1" id="form1">
        <tr>
          <td height="33" align="center" bgcolor="#F4F4F4"><input name="key" type="text" class="input" id="key" size="19" /></td>
        </tr>
        <tr>
          <td height="35" align="center" bgcolor="#F4F4F4">
		  <select name="otype" class="input" id="otype" style="line-height:30px;">
            <option value="title" selected="selected" class="input">新闻标题</option>
            <option value="msg" class="input">新闻内容</option>
			<option value="dtitle" class="input">下载标题</option>
            <option value="dmsg" class="input">下载内容</option>
          </select>
            <input type="submit" name="submit2" value="搜索" class="input" /></td>
        </tr>
      </form>
    </table></td>
  </tr>
</table>
<table width="220" border="0" cellpadding="0" cellspacing="0">
  <tr>
    <td height="33" align="center" background="images/tit_bg.gif"><strong>最新推荐   new10</strong></td>
  </tr>
  <tr>
    <td colspan="2" align="center"><table width="100%" border="0" cellpadding="0" cellspacing="0" class="tab_k">
      <%
t=0
set rs=server.createobject("adodb.recordset") 
if owen1<>"" and owen2 <>"" then
sql="select id,title,oColor,oStyle,tuijian from news where bigclassname='"&owen1&"' and smallclassname='"&owen2&"' and tuijian=1 order by id desc" 
elseif owen1<>"" then
sql="select id,title,oColor,oStyle,tuijian from news where bigclassname='"&owen1&"' and tuijian=1 order by id desc" 
else
sql="select id,title,oColor,oStyle,tuijian from news where tuijian=1 order by id desc" 
end if
rs.open sql,conn,1,1
if not rs.eof then
do while not rs.eof
t=t+1
%>
      <tr onMouseOver="this.bgColor='#FFFFFF';" onMouseOut="this.bgColor='#F4F4F4';" bgColor=#F4F4F4>
        <td width="10%" height="23" align="center" style="background:url(images/no_list_bg_1.gif) 1px 28px repeat-y;"><%= t %></td>
        <td width="90%" align="left">&nbsp;<a class="<%=rs("oColor")%>" href="onews.asp?id=<%=rs("id")%>" title="<%=rs("title")%>" target="_blank"><span class="<%=rs("oStyle")%>"><%=left(rs("title"),13)%><% if Len(rs("title"))>13 then %>…<% end if %>
        </span></a></td>
      </tr>
      <% 
if t>=10 then exit do 
rs.movenext 
loop 
else 
response.write "<tr><td align=center colspan=2 bgcolor=#e8e8f4>尚无收录</td></tr>" 
end if 
rs.close 
%>
    </table></td>
  </tr>
</table>
<table width="220" border="0" cellpadding="0" cellspacing="0">
  <tr>
    <td height="33" align="center" background="images/tit_bg.gif"><strong>热门新闻   top10</strong></td>
  </tr>
  <tr>
    <td height="22" align="center"><table width="100%" border="0" cellpadding="0" cellspacing="0" class="tab_k">
      <%
t=0
set rs=server.createobject("adodb.recordset") 
if owen1<>"" and owen2 <>"" then
sql="select id,title,oColor,oStyle,hits from news where bigclassname='"&owen1&"' and smallclassname='"&owen2&"' order by hits desc" 
elseif owen1<>"" then
sql="select id,title,oColor,oStyle,hits from news where bigclassname='"&owen1&"' order by hits desc" 
else
sql="select id,title,oColor,oStyle,hits from news order by hits desc" 
end if
rs.open sql,conn,1,1
if not rs.eof then
do while not rs.eof
t=t+1
%>
      <tr bgcolor="#F4F4F4">
        <td width="85%" align="left"> &nbsp; <a class="<%=rs("oColor")%>" href="onews.asp?id=<%=rs("id")%>" title="<%=rs("title")%>" target="_blank"><span class="<%=rs("oStyle")%>"><%=left(rs("title"),12)%><% if Len(rs("title"))>14 then %>…<% end if %></span></a></td>
        <td width="15%" height="25"><font color="#ff0000"><%=rs("hits")%></font></td>
      </tr>
      <% 
if t>=10 then exit do 
rs.movenext 
loop 
else 
response.write "<tr><td align=center colspan=2>尚无收录</td></tr>" 
end if 
rs.close 
%>
    </table></td>
  </tr>
</table>
