📄 film_edit.asp
字号:
<!--#include file="chklogin.asp"-->
<%
call myobj.chkrq()
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>编辑影片</title>
<link href="images/style2.css" rel="stylesheet" type="text/css">
<style type="text/css">
<!--
body,td,th {
font-family: Verdana, Arial, Helvetica, sans-serif;
font-size: 12px;
color: #000000;
}
a:link {
color: #0000FF;
text-decoration: none;
}
a:visited {
color: #0000FF;
text-decoration: none;
}
a:hover {
color: #FF0000;
text-decoration: underline;
}
a:active {
text-decoration: none;
}
-->
</style>
</head>
<body leftMargin="0" topMargin="0" bgcolor="#FFFFFF">
<%
action_e=request.QueryString("action")
Select Case action_e
Case ""
Call main()
Case "show_addfile"
Call show_addfile()
Case "save_addfile"
Call save_addfile()
Case "del_file"
Call del_file()
Case "save_film"
Call save_film()
Case "upload_pic"
Call upload_pic()
end select
%>
<%
sub main()
if request.Querystring("id")="" or myobj.ChkNum(request.Querystring("id"))=false then
response.write"<script>alert('影片ID值错误');history.back();</Script>"
response.end
else
set rs=server.createobject("adodb.recordset")
rs.open "select * from films where id="&request.Querystring("id")&"",conn,1,1
if rs.eof then
rs.close
set rs=nothing
response.write"<script>alert('该影片不存在');history.back();</Script>"
response.end
else
set rs=server.createobject("adodb.recordset")
rs.open "select * from films where id="&request.Querystring("id")&"",conn,1,1
var_err=rs("err")
var_err_info=rs("err_info")
var_pathid=rs("pathid")
var_film_name=rs("film_name")
var_other_name=rs("other_name")
var_film_director=rs("film_director")
var_film_player=rs("film_player")
var_film_class=rs("film_class")
var_film_from=rs("film_from")
var_film_level=rs("film_level")
var_film_clear=rs("film_clear")
var_film_commend=rs("film_commend")
var_film_money=rs("film_money")
var_film_pic=rs("film_pic")
var_film_gut=rs("film_gut")
var_down_level=rs("down_level")
var_play_level=rs("play_level")
rs.close
end if
end if
%>
<form name="form1" method="post" action="<%=filename%>?action=save_film">
<table width="550" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td> </td>
</tr>
</table>
<table width="550" height="25" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#3975CE">
<tr>
<td align="center" class="font1"><strong>编辑影片《<%
if myobj.ChkLen(var_film_name)<10 then
response.write(var_film_name)
else
response.write(left(var_film_name,10)&"…")
end if
%>》</strong></td>
</tr>
</table>
<%if var_err=true then%>
<table width="550" border="0" align="center" cellpadding="0" cellspacing="1" bgcolor="#E7E7E7">
<tr>
<td height="50" align="center" bgcolor="#FFFFFF"> <input name="err" type="checkbox" id="err" value="false">
<span class="font3">有用户报告该影片错误，请检测并修复后勾选本选项已便恢复属性<br>
错误信息：<%=var_err_info%></span></td>
</tr>
</table>
<%end if%>
<table width="550" height="30" border="0" align="center" cellpadding="0" cellspacing="1" bgcolor="#E7E7E7">
<tr>
<td align="center" bgcolor="#F7F7F7"><table width="500" height="30" border="0" cellpadding="0" cellspacing="0">
<tr>
<td width="60">影片路径：</td>
<td><select name="pathid" class="select1" id="pathid">
<%
set rs=server.createobject("adodb.recordset")
rs.open "select * from film_path",conn,1,1
do while not rs.eof
%>
<option value="<%=rs("id")%>" <%if var_pathid=rs("id") then%>selected<%end if%>>ID<%=rs("id")%>：rtsp://<%=mid(rs("caption"),27,len(rs("caption")))%></option>
<%
rs.movenext
loop
rs.close
%>
</select></td>
</tr>
</table></td>
</tr>
</table>
<table width="550" height="160" border="0" align="center" cellpadding="0" cellspacing="1" bgcolor="#E7E7E7">
<tr>
<td align="center" bgcolor="#F7F7F7"><table width="500" height="25" border="0" cellpadding="0" cellspacing="0">
<tr>
<td width="60">影片名称：</td>
<td width="120"><input name="film_name" type="text" class="input1" id="film_name" value="<%=var_film_name%>" size="15"></td>
<td width="60">影片别名：</td>
<td><input name="other_name" type="text" class="input1" id="other_name" size="15" value="<%=var_other_name%>"></td>
</tr>
</table>
<table width="500" height="25" border="0" cellpadding="0" cellspacing="0">
<tr>
<td width="60">影片导演：</td>
<td width="120"><input name="film_director" type="text" class="input1" id="film_director" size="15" value="<%=var_film_director%>"></td>
<td width="60">主要演员：</td>
<td><input name="film_player" type="text" class="input1" id="film_player" size="15" value="<%=var_film_player%>"></td>
</tr>
</table>
<table width="500" height="25" border="0" cellpadding="0" cellspacing="0">
<tr>
<td width="60">影片类别：</td>
<td width="120"><select name="film_class" class="select1" id="film_class">
<%
set rs=server.createobject("adodb.recordset")
rs.open "select * from film_class",conn,1,1
do while not rs.eof
%>
<option value="<%=rs("caption")%>" <%if var_film_class=rs("caption") then%>selected<%end if%>>
<%if rs("isvip")=true then%>
[VIP]
<%end if%>
<%=rs("caption")%></option>
<%
rs.movenext
loop
rs.close
%>
</select></td>
<td width="60">影片产地：</td>
<td><select name="film_from" class="select1" id="film_from">
<option value="1" <%if var_film_from=1 then%>selected<%end if%>>欧美</option>
<option value="2" <%if var_film_from=2 then%>selected<%end if%>>港台</option>
<option value="3" <%if var_film_from=3 then%>selected<%end if%>>大陆</option>
<option value="4" <%if var_film_from=4 then%>selected<%end if%>>日韩</option>
<option value="5" <%if var_film_from=5 then%>selected<%end if%>>其它</option>
</select></td>
</tr>
</table>
<table width="500" height="25" border="0" cellpadding="0" cellspacing="0">
<tr>
<td width="60">推荐级别：</td>
<td width="120"><select name="film_level" class="select" id="film_level">
<option value="1" <%if var_film_level=1 then%>selected<%end if%>>★</option>
<option value="2" <%if var_film_level=2 then%>selected<%end if%>>★★</option>
<option value="3" <%if var_film_level=3 then%>selected<%end if%>>★★★</option>
<option value="4" <%if var_film_level=4 then%>selected<%end if%>>★★★★</option>
<option value="5" <%if var_film_level=5 then%>selected<%end if%>>★★★★★</option>
</select></td>
<td width="60" align="right">清晰程度：</td>
<td><select name="film_clear" class="select" id="film_clear">
<option value="5" <%if var_film_clear=5 then%>selected<%end if%>>☆☆☆☆☆</option>
<option value="4" <%if var_film_clear=4 then%>selected<%end if%>>☆☆☆☆</option>
<option value="3" <%if var_film_clear=3 then%>selected<%end if%>>☆☆☆</option>
<option value="2" <%if var_film_clear=2 then%>selected<%end if%>>☆☆</option>
<option value="1" <%if var_film_clear=1 then%>selected<%end if%>>☆</option>
</select></td>
</tr>
</table>
<table width="500" height="25" border="0" cellpadding="0" cellspacing="0">
<tr>
<td width="60">推荐影片：</td>
<td width="120"><input type="radio" name="film_commend" value="true" <%if var_film_commend=true then%>checked<%end if%>>
是
<input name="film_commend" type="radio" value="false" <%if var_film_commend<>true then%>checked<%end if%>>
否</td>
<td width="60"><span class="font3">需要影币</span>：</td>
<td><input name="film_money" type="text" class="input1" id="film_money" onkeyup="value=value.replace(/[^\d]/g,'') " value="<%=var_film_money%>" size="12" maxlength="3"onbeforepaste="clipboardData.setData('text',clipboardData.getData('text').replace(/[^\d]/g,''))">
个</td>
</tr>
</table>
<table width="500" height="25" border="0" cellpadding="0" cellspacing="0">
<tr>
<td width="60">播放等级：</td>
<td width="120"><select name="play_level" class="select1" id="play_level">
<option value="0" <%if var_play_level=0 then%>selected<%end if%>>免费播放</option>
<option value="1" <%if var_play_level=1 then%>selected<%end if%>>普通用户</option>
<option value="2" <%if var_play_level=2 then%>selected<%end if%>>VIP用户</option>
</select></td>
<td width="60">下载等级：</td>
<td><select name="down_level" class="select1">
<option value="0" <%if var_down_level=0 then%>selected<%end if%>>不允许下载</option>
<option value="1" <%if var_down_level=1 then%>selected<%end if%>>普通用户</option>
<option value="2" <%if var_down_level=2 then%>selected<%end if%>>VIP用户</option>
</select></td>
</tr>
</table>
<table width="500" height="25" border="0" cellpadding="0" cellspacing="0">
<tr>
<td width="60">海报路径：</td>
<td><input name="film_pic" type="text" class="input1" id="film_pic" value="<%=var_film_pic%>" size="30">
<a href="del_filmpic.asp?pic_name=<%=var_film_pic%>" target="_blank">删除图片</a>/<a href="upload_pic.asp?action=edit" target="_blank" onclick="javascript:{if(confirm('在重新上传新图片之前，请确认该影片的旧图片是否已点击“删除图片”进行删除。')){return true;}return false;}">重新上传</a></td>
</tr>
</table></td>
</tr>
</table>
<table width="550" height="140" border="0" align="center" cellpadding="0" cellspacing="1" bgcolor="#E7E7E7">
<tr>
<td align="center" bgcolor="#F7F7F7"><table width="500" border="0" cellpadding="0" cellspacing="0">
<tr>
<td height="25">剧情简介：</td>
</tr>
<tr>
<td height="100" valign="top"><textarea name="film_gut" cols="55" rows="6" class="input1" id="film_gut"><%=var_film_gut%></textarea></td>
</tr>
</table></td>
</tr>
</table>
<table width="550" border="0" align="center" cellpadding="0" cellspacing="1" bgcolor="#E7E7E7">
<tr>
<td align="center" bgcolor="#F7F7F7"><table width="500" height="5" border="0" cellpadding="0" cellspacing="0">
<tr>
<td></td>
</tr>
</table>
<table width="500" height="25" border="0" cellpadding="0" cellspacing="0">
<tr>
<td width="60">影片地址：</td>
<td><iframe width="440" height="25" noresize target="main" border="0" rows="64,*" frameborder="0" scrolling="no" framespacing="0" src="<%=filename%>?action=show_addfile&id=<%=request.Querystring("id")%>"> </iframe></td>
</tr>
<tr>
<td colspan="2" id="upid"></td>
</tr>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -