<!--#include file="../JaJa.Conn.asp" -->
<link href="images/cs.css" rel="stylesheet" type="text/css">
<script language="JavaScript" src="images/copy.js"></script>
<%
Response.Buffer=True
Response.Expires=0
Response.Charset="gb2312"
Dim Classsid:Classsid=Server.HTMLEncode(Request.QueryString("keyword"))
if Classsid="" or len(Classsid)<1 Then
Response.Write "<Div align='center' style='font-size:14px; padding-top:15px;'>关健字不能为空</Div>"
Response.end 
Else
Set rs = Server.CreateObject("adodb.recordset")
rs.open"Select Top 300 * from jaja_name where data_name like '%"&Classsid&"%' or data_actor like '%"&Classsid&"%' order by data_hits desc",conn,1,1
 if not(rs.eof and rs.bof) Then
%>
<body id="iebar">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
 <tr >
    <td  width="85%" height="22" class="row" style="padding-left:8px; padding-top:5px;" onmouseover="this.className='row1'" onmouseout="this.className='row'">查询关键字（<%=Classsid%>）的所有影片</td>
  </tr>
 <% Do while not rs.eof%>
  <tr >
    <td  width="85%" height="22" class="row" style="padding-left:8px; padding-top:5px;" onmouseover="this.className='row1'" onmouseout="this.className='row'"><img src='images/opena.gif' align='absmiddle'> <a href="data.Asp?did=<%=rs("name_id")%>"><%=left(rs("data_name"),10)%></a><span id="hits"><%=pichits(rs("data_hits"))%></span></td>
  </tr>
  <%
  rs.movenext:loop
  Else
  %>
   <tr>
    <td width="85%" height="22" class="row" style="padding-left:10px; padding-top:5px;" onMouseOver="this.className='row1'" onMouseOut="this.className='row'">暂无电影数据....</td>
  </tr>
  <%
  End IF
  Response.End():rs.Close:Set rs=Nothing:End IF

  Function pichits(Str)
  piclist=Clng(Str)
  if piclist>1 and piclist<500 Then
    picltxt="<img src='images/h6.gif' align='absmiddle'/>"
  elseif piclist>501 and piclist<3000 Then 
    picltxt="<img src='images/h5.gif' align='absmiddle'/>"
  elseif piclist>3001 and piclist<7000 Then 
    picltxt="<img src='images/h4.gif' align='absmiddle'/>"
  elseif piclist>7001 and piclist<10000 Then 
    picltxt="<img src='images/h3.gif' align='absmiddle'/>"
  elseif piclist>10001 and piclist<25000 Then 
    picltxt="<img src='images/h2.gif' align='absmiddle'/>"
  elseif piclist>50000  Then 
    picltxt="<img src='images/h1.gif' align='absmiddle'/>"				
  End if
  pichits=picltxt	
End Function
  %>

</table>
</body>