<!--#include file="../Include/connect.asp"-->
<!--#include file="Inc/char.asp"-->
<!--#include file="top.asp"-->
<link href="CSS/right.css" rel="stylesheet" type="text/css">
<script language="JavaScript">
<!--

function ask(msg) {
	
	if( msg=='' ) {
		msg='真的要这样做吗？';
	}

	if (confirm(msg)) {
		return true;
	} else {
		return false;
	}
}
//-->
</script>
<table width="100%" border="0" align="center" cellpadding="0" cellspacing="1" class="tablecolor">
  <tr> 
    <td height="25" align="left" class="banner" style="PADDING-LEFT:15px">当前位置 &gt; 录制视频管理</td>
  </tr>
</table>
<table  border="0" align="center" cellpadding="3" cellspacing="1" class="tablecolor">
  <form name="form2" method="post" action="?">
    <tr class="tablebody">
      <td height="25" align="center">视频搜索:&nbsp; 关键字:&nbsp;
          <input name="key" type="text" id="key" maxlength="20">
&nbsp;
<input type="submit" name="Submit2" value="提交"></td>
    </tr>
  </form>
</table>
<table border="0" align="center" cellpadding="0" cellspacing="1"  class="tablecolor">
  <tr > 
    <td height="25" align="center" class="tablebody">视频缩略图</td>
	<td height="25" align="center" class="tablebody">标题</td>
    <td align="center" class="tablebody">发布用户</td>
    <td align="center" class="tablebody">发布时间</td>
    <td align="center" class="tablebody">点击数</td>
    <td align="center" class="tablebody">评论数</td>
    <td align="center" class="tablebody">推荐视频</td>
	<td width="5%" align="center" class="tablebody">删除</td>
  </tr>
<%
strFileName="m_rvideo.asp"
pageno=15
set rs = server.CreateObject("adodb.recordset")
if request.Form("key")<>"" then
sql="select * from Show5_ALLVideo where type=1 and Topic like '%"&trim(request.Form("key"))&"%' Order By VideoID DESC"
else
sql="select * from Show5_ALLVideo where type=1 Order By VideoID DESC"
end if
rs.CursorLocation=3
rs.Open sql,cn,1,1
rscount=rs.recordcount
if rs.eof or rs.bof then
response.write "暂无视频！"
else
call showsql(pageno)
rs.move(rsno)
for p_i=1 to loopno
%>
  <tr > 
    <td height="25" align="center" class="tablebody" style="PADDING-TOP:5px;PADDING-BOTTOM:5px"><a href="../videoview.asp?id=<%=rs("VideoID")%>" target="_blank"><img src="http://www.show5.net/Videoimage//<%=rs("Filename")%>.jpg" width="133" height="100" border="0" align="absmiddle"></a></td>
	<td width="200" height="25" align="center" class="tablebody"><a href="../videoview.asp?id=<%=rs("VideoID")%>" target="_blank"><%=rs("Topic")%></a></td>
    <td align="center" class="tablebody"><a href="../Hompy/hompy.asp?username=<%=rs("Username")%>" target="_blank"><%=rs("Username")%></a></td>
    <td align="center" class="tablebody"><%=rs("Posttime")%></td>
    <td align="center" class="tablebody"><font color="ff6600"><%=rs("Hit")%></font></td>
    <td align="center" class="tablebody"><font color="ff6600"><%=rs("Commentnum")%></font></td>
    <td align="center" class="tablebody"><%
if rs("Recommend")=1 then
response.write "<a href='disrecommend_video.asp?videoid="&rs("VideoID")&"&t=r&page="&request.querystring("page")&"'><font color='#ff6600'>取消推荐</font></a>"
else
response.write "<a href='recommend_video.asp?videoid="&rs("VideoID")&"&t=r&page="&request.querystring("page")&"'>推荐</a>"
end if
%></td>
	<td align="center" class="tablebody"><a href="javascript:if(ask('真的要删除吗？')) location.href='delvideo.asp?videoid=<%=rs("VideoID")%>&page=<%=request.querystring("page")%>';"><font color="#ff6600">删除</font></a></td>
    </tr>
<%
rs.movenext
next
end if
rs.close
set rs=nothing
%>
<tr>
    <td height="25" colspan="10" align="center" class="tablebody">
<%call showpage(strFileName,rscount,pageno,true,true,"个视频")%>	</td>
  </tr>
  <tr> 
      <td colspan="10" align="right"  class="tablebody">&nbsp;</td>
  </tr>
</table>
<!--#include file="end.asp"-->