📄 qqcf_admin_manage_2.asp
字号:
if jishu mod linenum=0 then
Response.write "</tr>"
end if
jishu=jishu+1
Rs2.movenext
wend '写tr和td,jishu mod 列数为1时开始tr,为0时结束tr
jishu=jishu-1
if jishu mod linenum <> 0 then
for i= 1 to linenum-(jishu mod linenum)
response.write "<td width='"&tdwidth&"'> </td>"
if i = linenum-(jishu mod linenum) then response.write "</tr>"
next
end if '判断最后一行tr是否正好闭合,否则增加td,里面填入空格
%>
</table></td>
</tr>
<tr id="bt_6">
<td valign="top"><div align="right">下载链接：</div></td>
<td valign="middle"> 集数<span lang="en-us"> </span>
<input type="text" name="downnum" class="button" value="0" size="5">
<input type="button" name="Button" class="buttonface" onclick="bshow_7();setid_2();" value="设定"></td>
</tr>
<script>
function setid_2()
{
str='';
if(!window.form.downnum.value)
window.form.downnum.value=1;
for(i=1;i<=window.form.downnum.value;i++)
{
str+=' 影片在线地址：<input type="text" name="downlink'+i+'" class="button" style="padding-left:1pt" size=45 value=""> 第'+i+'集 <BR>';
}
window.upid_2.innerHTML=str
}
</script>
<tr id="bt_7">
<td valign="top"></td>
<td id="upid_2"></td>
</tr>
<tr>
<td colspan="2"> <div align="center">
<input type="submit" name="Submit3" value="发布电影">
<input type="reset" name="Submit222" value="重新填写">
</div></td>
</tr>
</form>
</table>
<%End If%>
<%If Action="filmmodify" Then%>
<SCRIPT>
function ashow_1(){
at_1.style.display = "";
at_2.style.display = "none";
at_3.style.display = "";
at_4.style.display = "none";
at_5.style.display = "none";
}
function ashow_2(){
at_1.style.display = "none";
at_2.style.display = "none";
at_3.style.display = "none";
at_4.style.display = "none";
at_5.style.display = "none";
}
function ashow_3(){
at_2.style.display = "none";
}
function ashow_4(){
at_2.style.display = "";
}
function ashow_5(){
at_4.style.display = "none";
at_5.style.display = "none";
}
function ashow_6(){
at_4.style.display = "";
at_5.style.display = "";
}
function bshow_1(){
bt_1.style.display = "";
bt_2.style.display = "none";
bt_3.style.display = "";
bt_4.style.display = "none";
bt_5.style.display = "none";
}
function bshow_2(){
bt_1.style.display = "none";
bt_2.style.display = "none";
bt_3.style.display = "none";
bt_4.style.display = "none";
bt_5.style.display = "none";
}
function bshow_3(){
bt_2.style.display = "none";
}
function bshow_4(){
bt_2.style.display = "";
}
function bshow_5(){
bt_4.style.display = "none";
bt_5.style.display = "none";
}
function bshow_6(){
bt_4.style.display = "";
bt_5.style.display = "";
}
</SCRIPT>
<script>
function filmmodifycheck()
{
if ((document.form.filmname.value)=="")
{
window.alert ('电影名称必须填写');
document.form.filmname.focus();
return false;
}
var check_length = document.form.classid.length;
var i_count=0
for(var i=0;i<check_length;i++)
{
if (document.form.classid(i).checked)
{
i_count=i_count+1;
}
}
if(i_count==0)
{
window.alert("电影分类必须选择");
return false;
}
if ((form.porducearea.options[form.porducearea.selectedIndex].value)==""){
window.alert ('请选择电影地区!');
document.form.porducearea.focus();
return false;
}
if ((document.form.timelength.value)=="")
{
window.alert ('电影时间必须填写');
document.form.timelength.focus();
return false;
}
if ((document.form.clicktotal.value)=="")
{
window.alert ('电影初始点击数必须填写');
document.form.clicktotal.focus();
return false;
}
if ((document.form.listid.value)=="")
{
window.alert ('电影排序数字必须填写');
document.form.listid.focus();
return false;
}
<%If CInt(GetMySet("FilmPicUpload"))=1 Then%>
var str=document.form.filmpic.value;
str = str.toLowerCase();
if (str!="" && str.indexOf("http://")>=0)
{
window.alert ('系统设置了电影不允许使用外部链接，只允许自己上传或留空不填写');
document.form.filmpic.focus();
return false;
}
<%End If%>
form.filmintro.value = getHTML();
form.content.value = "";
return true;
}
</script>
<table width="98%" align="center" class="tba">
<form name="form" method="post" action="QQCF.aspx?Action=filmmodifysave&ID=<%=ID%>" onsubmit="javascript:return filmmodifycheck();">
<tr class="tba_tr_1">
<td colspan="2"><input type="button" name="a" value="修改基本信息" onclick="location.href='?Action=filmmodify&ID=<%=ID%>'">
<input type="button" name="b" value="管理在线链接" onclick="location.href='?Action=linkmanage&Assort=1&ID=<%=ID%>'">
<input type="button" name="c" value="管理下载链接" onclick="location.href='?Action=linkmanage&Assort=2&ID=<%=ID%>'">
<input type="button" name="d" value="更新静态页" onclick="location.href='QQCF.aspx?Action=showoneupdate&ID=<%=ID%>'"></td>
</tr>
<script>
<%
If Rs("OnlineState")=0 Then Response.write "document.form.b.disabled=true;"
If Rs("DownState")=0 Then Response.write "document.form.c.disabled=true;"
If RsSet("HtmOpen")=0 Then Response.write "document.form.d.disabled=true;"
%>
</script>
<tr>
<td colspan="2"><strong>影片:<%=Rs("FilmName")%> 基本信息修改</strong></td>
</tr>
<tr>
<td width="120"><div align="right">电影名称：</div></td>
<td width="639"><input name="filmname" type="text" id="name2" value="<%=Rs("FilmName")%>" size="65"></td>
</tr>
<tr>
<td valign="top"><div align="right">其它名称：</div></td>
<td><input name="FilmOtherName" type="text" id="FilmOtherName" value="<%=Rs("FilmOtherName")%>" size="65"></td>
</tr>
<tr>
<td valign="top"><div align="right">所属栏目：</div></td>
<td><table border="0" cellpadding="0" cellspacing="0" width=100%>
<%
Set Rs2=Server.CreateObject("Adodb.RecordSet")
Sql="Select * From CFFilm_Class Order By MenuTaxis"
Rs2.Open Sql,Conn,1,1
linenum=5
tdwidth=int(100/linenum)&"%"
jishu=1
While Not Rs2.Eof
If jishu mod linenum=1 or linenum=1 Then
Response.Write "<tr>"
End If%>
<td valign="top" width="<%=tdwidth%>">
<input type="radio" name="classid" value="<%=Rs2("ID")%>"<%If Rs("ClassID")=Rs2("ID") Then Response.Write " Checked"%>>
<%=Rs2("ClassName")%></td>
<%
If jishu mod linenum=0 Then
Response.write "</tr>"
End If
jishu=jishu+1
Rs2.MoveNext
Wend '写tr和td,jishu mod 列数为1时开始tr,为0时结束tr
jishu=jishu-1
If jishu Mod linenum <> 0 Then
For i= 1 to linenum-(jishu mod linenum)
response.write "<td width='"&tdwidth&"'> </td>"
If i = linenum-(jishu mod linenum) Then response.write "</tr>"
Next
End If '判断最后一行tr是否正好闭合,否则增加td,里面填入空格
%>
</table></td>
</tr>
<tr>
<td valign="top"><div align="right">推荐级别：</div></td>
<td> <input type="radio" name="commendlevel" value="1"<%If Rs("CommendLevel")=1 Then Response.Write " Checked"%>>
1颗星
<input type="radio" name="commendlevel" value="2"<%If Rs("CommendLevel")=2 Then Response.Write " Checked"%>>
2颗星
<input name="commendlevel" type="radio" value="3"<%If Rs("CommendLevel")=3 Then Response.Write " Checked"%>>
3颗星
<input type="radio" name="commendlevel" value="4"<%If Rs("CommendLevel")=4 Then Response.Write " Checked"%>>
4颗星
<input type="radio" name="CommendLevel" value="5"<%If Rs("CommendLevel")=5 Then Response.Write " Checked"%>>
5颗星
<input type="radio" name="CommendLevel" value="6"<%If Rs("CommendLevel")=6 Then Response.Write " Checked"%>>
6颗星</td>
</tr>
<tr>
<td valign="top"><div align="right">生产地区：</div></td>
<td><select name="porducearea">
<option value="1"<%If Rs("PorduceArea")=1 Then Response.Write " selected"%>>大陆影片</option>
<option value="2"<%If Rs("PorduceArea")=2 Then Response.Write " selected"%>>港台影片</option>
<option value="3"<%If Rs("PorduceArea")=3 Then Response.Write " selected"%>>日本影片</option>
<option value="4"<%If Rs("PorduceArea")=4 Then Response.Write " selected"%>>韩国影片</option>
<option value="5"<%If Rs("PorduceArea")=5 Then Response.Write " selected"%>>欧美影片</option>
<option value="6"<%If Rs("PorduceArea")=6 Then Response.Write " selected"%>>其它影片</option>
</select></td>
</tr>
<tr>
<td valign="top"><div align="right">生产年份：</div></td>
<td><input name="PorduceYear" type="text" value="<%=Rs("PorduceYear")%>" size="6">年<input name="PorduceMonth" type="text" value="<%=Rs("PorduceMonth")%>" size="6">月</td>
</tr>
<tr>
<td valign="top"><div align="right">电影导演：</div></td>
<td> <input name="Direct" type="text" id="Direct" value="<%=Rs("Direct")%>" size="65"></td>
</tr>
<tr>
<td valign="top"><div align="right">主要演员：</div></td>
<td><input name="Player" type="text" id="Player" value="<%=Rs("Player")%>" size="65"></td>
</tr>
<tr>
<td valign="top"><div align="right">影片长度：</div></td>
<td><input name="timelength" type="text" class="smallinput" value="<%=Rs("TimeLength")%>" size="6" maxlength="255">
分种 初始点击数：
<input name="clicktotal" type="text" value="<%=Rs("ClickTotal")%>" size="6" maxlength="255">
次 排序数字：
<input name="listid" type="text" value="<%=Rs("ListID")%>" size="6" maxlength="255">
</td>
</tr>
<tr>
<td valign="top"><div align="right">图片地址： </div></td>
<td> <input name="filmpic" type="text" value="<%=Rs("FilmPic")%>" size="50" maxlength="255">
</td>
</tr>
<tr>
<td valign="top"> <div align="right">上传图片： </div></td>
<td> <iframe style="top:2px" ID="UploadFiles" src="qqcf_upfile.asp" frameborder=0 scrolling=no width="450" height="25">
</iframe> </td>
</tr>
<tr>
<td valign="top"><div align="right">电影简介：</div></td>
<td height="200"><input name="filmintro" type="hidden"><input name="content" type="hidden" value="<%=server.HTMLEncode(Rs("FilmIntro"))%>"><SCRIPT src="editor/Post.js"></SCRIPT></td>
</tr>
<tr>
<td valign="top"><div align="right"><strong>在线观看设置：</strong></div></td>
<td> <input name="OnlineState" type="radio" value="-1"<%If Rs("OnlineState")=-1 Then Response.Write " Checked"%> onclick="ashow_1()">
开放
<input type="radio" name="OnlineState" value="0"<%If Rs("OnlineState")=0 Then Response.Write " Checked"%> onclick="ashow_2()">
关闭</td>
</tr>
<tr id="at_1">
<td valign="top"> <div align="right">开放权限：</div></td>
<td><input name="OnlineLevel" type="radio" value="1"<%If Rs("OnlineLevel")=1 Then Response.Write " Checked"%> onclick="ashow_3()">
免费电影
<input type="radio" name="OnlineLevel" value="2"<%If Rs("OnlineLevel")=2 Then Response.Write " Checked"%> onclick="ashow_4()">
需要消耗点数观看 </td>
</tr>
<tr id="at_2">
<td valign="top"><div align="right">观看每集花费点数：</div></td>
<td><input name="OnlineSpendCount" type="radio" value="0"<%If Rs("OnlineSpendCount")=0 Then Response.Write " Checked"%>>
0个影币
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -