<!--#include file="conn.asp"-->

<script language="JavaScript">
<!-- 
function doZoom(size){
	document.getElementById('zoom').style.fontSize=size+'px'
}


var NS4 = (document.layers);  
var IE4 = (document.all);

var win = window;   
var n   = 0;

function findIt() {
	if (searchstr.value != "")
		findInPage(searchstr.value);
}


function findInPage(str) {
var txt, i, found;

if (str == "")
	return false;

if (NS4) {
	if (!win.find(str))
		while(win.find(str, false, true))
			n++;
	else
		n++;

	if (n == 0)
		alert("未找到指定内容.");
}

if (IE4) {
	txt = win.document.body.createTextRange();

	for (i = 0; i <= n && (found = txt.findText(str)) != false; i++) {
		txt.moveStart("character", 1);
		txt.moveEnd("textedit");
	}

if (found) {
	txt.moveStart("character", -1);
	txt.findText(str);
	txt.select();
	txt.scrollIntoView();
	n++;
}
else {
	if (n > 0) {
		n = 0;
		findInPage(str);
	}
	else
		alert("未找到指定内容.");
	}
}

return false;
}
// -->
</script>

    <div align="center">
      <center>
      <table border="0" width="778" cellpadding="0" cellspacing="0">



<tr>
<td colspan="4"> 
<div align="center"> 
<table border="0" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
<td valign="top"> 
<div align="center"> 
<table border="0" cellpadding="0" cellspacing="0" width="100%">
<tr>

<td>
<table width="98%"><tr><td align="center">
赤城影院-影片搜索 → 影片类型：<select class="smallSel" size="1" name="MovieTypeID"><option value="all">全部影片</option></select> 搜索关键字：
<input type="text" name="searchstr" class="textbox" size="10" style="BORDER-RIGHT: rgb(192,192,192) 1px solid; BORDER-TOP: rgb(192,192,192) 1px solid; FONT-SIZE: 9pt; BORDER-LEFT:  

rgb(192,192,192) 1px solid; BORDER-BOTTOM: rgb(192,192,192) 1px solid; BACKGROUND-COLOR: #f7f7f7"
>
<input type="image" src="images/bb.gif" value="关键字搜索" align="middle" onclick="javascript:findIt();" class="sbttn">

</td></td>
<div align="center"> 
<table border="1" cellspacing="0" width="100%" bordercolor="#FFFFFF" cellpadding="2" bordercolordark="#F7F3F7">
<%
                         sql="select id,name,category,date from movie order by date desc"
                         Set rs= Server.CreateObject("ADODB.Recordset")
                         rs.open sql,conn,1,1
                         if rs.eof and rs.bof then
                            response.write "<p align='center'>没有任何电影</p>"
                         else
                         i=0
                         do while not rs.eof or rs.bof
                       %>
                    <tr> 
                    <td><img border="0" src="images/list.gif"> 
                    <a href="list.asp?id=<%=rs("id")%>" target="_blank">
         <%
         if len(rs("name")) > 11 then
          response.write (left(rs("name"),9))
         else
          response.write (rs("name"))
         end if
         %></a></td>
                    <td><p align="center">
                    <a href="list.asp?category=<%=rs("category")%>"><%=rs("category")%></a></td>
                    <td><p align="center"><%=rs("date")%></td>
                    </tr>
                     <% i=i+1
                        if i>=1000 then exit do
                        rs.movenext
                        loop
                        end if
                        rs.close
                        set rs=nothing
                     %>
</table>
</div>
</td>
</tr>

<!--#include file="down.asp"-->

