📄 addmovie.asp
字号:
<!--#include file="articleconn.asp"-->
<!--#include file="../checkpost.asp"-->
<!--#include file="zcm.asp"-->
<!--#include file="security.asp"-->
<%if session("flag")>3 then
response.write "<br><p align=center>您的操作权限不够！</p>"
response.end
end if
%>
<%
zj=Request.ServerVariables("SERVER_NAME")
zj=left(replace(zj,"www.",""),6)
zj=replace(zj,"0","a")
zj=replace(zj,"1","b")
zj=replace(zj,"2","c")
zj=replace(zj,"3","d")
zj=replace(zj,"4","e")
zj=replace(zj,"5","f")
zj=replace(zj,"6","g")
zj=replace(zj,"7","h")
zj=replace(zj,"8","i")
zj=replace(zj,"9","j")
zj=replace(zj,"a","40")
zj=replace(zj,"b","41")
zj=replace(zj,"c","52")
zj=replace(zj,"d","53")
zj=replace(zj,"e","64")
zj=replace(zj,"f","65")
zj=replace(zj,"g","76")
zj=replace(zj,"h","77")
zj=replace(zj,"i","88")
zj=replace(zj,"j","89")
zj=replace(zj,"k","20")
zj=replace(zj,"l","21")
zj=replace(zj,"m","22")
zj=replace(zj,"n","23")
zj=replace(zj,"o","24")
zj=replace(zj,"p","25")
zj=replace(zj,"q","26")
zj=replace(zj,"r","27")
zj=replace(zj,"s","28")
zj=replace(zj,"t","29")
zj=replace(zj,"u","30")
zj=replace(zj,"v","31")
zj=replace(zj,"w","32")
zj=replace(zj,"x","33")
zj=replace(zj,"y","34")
zj=replace(zj,"z","35")
zj=replace(zj,"-","36")
zj=replace(zj,".","37")
yzcv=zj*(len(zj)+len(zcn&"mayivod"))
Do While yzcv>10000000000
yzcv=yzcv-10000000000
loop
if yzcv<>zcv then
response.write "<script language=JavaScript>{window.alert('错误：程序尚未注册,此功能不能使用!');window.location='zcmayireg.asp?type=reg';}</script>"
end if
%>
<% if request("serverip")="" then
response.write"<script>alert('没有选择服务器');history.back();</Script>"
response.end
end if
%>
<html>
<head>
<title>添加电影</title>
</head>
<body topmargin="20" leftmargin="15" bgcolor="#D6EF7E">
<LINK href="images/forum_admin.css" type=text/css rel=stylesheet>
<TABLE class=tableBorder height=1 cellSpacing=1 cellPadding=5 width="100%"
align=center border=0>
<TBODY>
<TR>
<TH height=25 style="background-image: url('images/admin_bg_1.gif')"> <b><font style="font-size: 9pt">添 加 电 影</font></span></b></TH></TR></tbody></table>
<form method="POST" action="savemovie.asp" name="myform">
<center>
<table width="584" border="0" cellpadding="0" cellspacing="1" bordercolorlight="#000000" height="379">
<tr bordercolordark="#FFFFFF">
<td width="578" height="377">
<table width="600" cellpadding="0" cellspacing="0" bordercolor="#006CD9" height="443" style="border-collapse: collapse" border="0">
<tr>
<td width="578" bgcolor="#0099FF" colspan="2" height="23">
<p align="center"><b>影片添加页</b></td>
</tr>
<tr>
<td width="68" bgcolor="#FFFFFF" height="25" nowrap>
<p align="center">影片名称：</td>
<td width="511" bgcolor="#FFFFFF" height="25">
<!--webbot bot="Validation" b-value-required="TRUE" i-maximum-length="11" --><input type="text" name="title3" size="20" class="smallinput" maxlength="200">
<font color="#FF0000"><span lang="en-us"> </span></font></td>
</tr>
<tr>
<td width="68" bgcolor="#FFFFFF" height="19" nowrap>
<div align="center">
影片设置：
</div>
</td>
<td bgcolor="#FFFFFF" height="19" width="511">
<select class="smallSel" name="typeid" size="1">
<%
dim rs,sql,sel
set rs=server.createobject("adodb.recordset")
sql="select * from type"
rs.open sql,conn,1,1
if zcn="" or zcv="" then response.end
do while not rs.eof
sel="selected"
response.write "<option " & sel & " value='"&rs("type")&"'>"+rs("type")+"</option>"+chr(13)+chr(10)
rs.movenext
loop
rs.close
%>
<option selected value="影片类型" name="typeid">影片类型</option>
</select> <select size="1" name="where">
<option value="大陆">大陆</option>
<option value="台湾">台湾</option>
<option value="香港">香港</option>
<option value="日韩">日本</option>
<option value="韩国">韩国</option>
<option value="欧美">欧美</option>
<option value="其他">其他</option>
<option selected value="出产地区" name="where">出产地区</option>
</select><select size="1" name="softlevel">
<option value="★">一星级</option>
<option value="★★">二星级</option>
<option value="★★★">三星级</option>
<option value="★★★★">四星级</option>
<option value="★★★★★" selected>五星级</option>
<option value="选择推荐度" name="softlevel">选择推荐度</option>
</select><select size="1" name="canlook">
<option selected value="1">普通影片</option>
<option value="3">黄金影片</option>
<option value="0">免费电影</option>
</select><select size="1" name="count">
<option value="0" selected>0点</option>
<option value="1">1点</option>
<option value="2">2点</option>
<option value="3">3点</option>
<option value="4">4点</option>
<option value="5">5点</option>
<option value="需花点数" name="count">需花点数</option>
</select></td>
</tr>
<tr>
<td width="68" bgcolor="#FFFFFF" height="20" nowrap>
<p align="center">播放格式：</td>
<td bgcolor="#FFFFFF" height="20" width="511">
<input type="radio" value="rm" checked name="movietype">
<img border="0" src="../img/real.gif">
<input type="radio" value="md" name="movietype">
<img border="0" src="../img/media.gif">
<input type="radio" value="mov" name="movietype">
<img border="0" src="../img/lookmov.gif"></td>
</tr>
<tr>
<td width="68" bgcolor="#FFFFFF" height="19" nowrap>
<p align="center">影片长度：</td>
<td bgcolor="#FFFFFF" height="19" width="511">
<input type="text" name="howlong4" size="4" class="smallinput" maxlength="255" value="90"><span lang="en-us">
</span>分种</td>
</tr>
<tr>
<td width="68" bgcolor="#FFFFFF" height="25" nowrap>
<p align="center">领衔主演：</td>
<td bgcolor="#FFFFFF" height="25" width="511">
<input type="text" name="name" size="38" class="smallinput" maxlength="255"></td>
</tr>
<tr>
<td width="68" bgcolor="#FFFFFF" height="25" nowrap>
<div align="center">
图片地址：
</div>
</td>
<td bgcolor="#FFFFFF" height="25" width="511" nowrap>
<input type="text" name="domurl3" size="38" class="smallinput" maxlength="255" value=
"<%if request.cookies("images")="" then%>../images/nopic.gif<%else%><%response.write request.cookies("images")%><%end if%>">
</td>
</tr>
<tr>
<td width="68" bgcolor="#FFFFFF" height="28" nowrap>
<p align="center">上传图片：</td>
<td bgcolor="#FFFFFF" height="28" width="511">
<input type="hidden" name="serverip" size="13" class="smallinput" maxlength="15" value="<%=request("serverip")%>">
<iframe src="../index/upload.asp" scrolling="no" topmargin="0" width="358" height="20" marginwidth="0" marginheight="0" frameborder="0" align="center"></iframe>
</td>
<tr>
<td width="68" bgcolor="#FFFFFF" height="20" nowrap>
<p align="center">开放方式：</td>
<%set rs=server.createobject("adodb.recordset")
sql="select * from movie where id="&request("serverip")
rs.open sql,conn,1,1
%>
<td bgcolor="#FFFFFF" height="20" width="511">
<input type="checkbox"checked name="onlinelookb" value="1">在线观看
<input type="checkbox" name="downv" value="1">
影片下载</td>
</tr>
<tr>
<td width="578" bgcolor="#FFFFFF" height="25" colspan="2">
<table width="580" border="0" cellpadding="0" cellspacing="0" bordercolorlight="#000000">
<tr bordercolordark="#FFFFFF">
<td width="100%" height="20">
<table width="554" cellspacing="0" border="0" style="border-collapse: collapse" bordercolor="#111111">
<script language="javascript">
function setid()
{
str='';
if(!window.myform.no.value)
window.myform.no.value=1;
for(i=1;i<=window.myform.no.value;i++)
{
if(window.myform.no.value<10)
{
str+=' 影片地址： 在线：<%=rs("ipsip")%><input type="text" name="urla'+i+'" class="button" style="padding-left:1pt" size=45 value="'+window.myform.no1.value+''+i+''+window.myform.no2.value+'"> 第'+i+'集<BR>';
}
else if(window.myform.no.value<100)
{
if(i<10)
{
str+=' 影片地址： 在线：<%=rs("ipsip")%><input type="text" name="urla'+i+'" class="button" style="padding-left:1pt" size=45 value="'+window.myform.no1.value+''+'0'+i+''+window.myform.no2.value+'"> 第'+i+'集 <BR>';
}
else
{
str+=' 影片地址： 在线：<%=rs("ipsip")%><input type="text" name="urla'+i+'" class="button" style="padding-left:1pt" size=45 value="'+window.myform.no1.value+''+i+''+window.myform.no2.value+'"> 第'+i+'集<BR>';
}
}
else if(window.myform.no.value<1000)
{
if(i<10)
{
str+=' 影片地址： 在线：<%=rs("ipsip")%><input type="text" name="urla'+i+'" class="button" style="padding-left:1pt" size=45 value="'+window.myform.no1.value+''+'00'+i+''+window.myform.no2.value+'"> 第'+i+'集 <BR>';
}
else if(i<100)
{
str+=' 影片地址： 在线：<%=rs("ipsip")%><input type="text" name="urla'+i+'" class="button" style="padding-left:1pt" size=45 value="'+window.myform.no1.value+''+'0'+i+''+window.myform.no2.value+'"> 第'+i+'集 <BR>';
}
else
{
str+=' 影片地址： 在线：<%=rs("ipsip")%><input type="text" name="urla'+i+'" class="button" style="padding-left:1pt" size=45 value="'+window.myform.no1.value+''+i+''+window.myform.no2.value+'"> 第'+i+'集<BR>';
}
}
}
window.upid.innerHTML=str+'<br>';
}
</script>
<tr>
<td width="68" valign="bottom">
<div align="center">
影片地址：</div>
</td>
<td width="490"><input type="text" name="no1" class="button" value="" size="32">集数<span lang="en-us"> </span>
<input type="text" name="no" class="button" value="1" size="3">格式<input type="text" name="no2" class="button" value=".rm" size="5"><input type="button" name="Button" class="buttonface" onclick="setid();" value="设定"></td>
</tr>
<tr>
<td colspan="2" id="upid" width="564"></td>
</tr>
</table>
</td>
</tr>
</table>
</td>
</tr>
<tr>
<td width="67" bgcolor="#FFFFFF" height="173" valign="top">
<div align="center">
<p align="center">影片简介：
</div>
</td>
<td bgcolor="#FFFFFF" height="173" width="511">
<textarea rows="13" name="Content3" cols="68"></textarea></td>
</tr>
<tr>
<td width="67" bgcolor="#FFFFFF" height="22">
<p align="center">首页推荐：</td>
<td bgcolor="#FFFFFF" height="22" width="511">
<input name="firstbest" type="radio" value="1">
是
<input type="radio" name="firstbest" value="0" checked>
否 站长推荐：
<input type="radio" name="best" value="1">
是
<input type="radio" name="best" value="0" checked>
否 </td>
</tr>
</table>
</td>
</tr>
</table>
<p><input type="submit" value=" 添 加 " name="cmdok" class="buttonface">
<input type="reset" value=" 清 除 " name="cmdcancel" class="buttonface"></p>
</center>
</form>
<div align="center">
以上全为必填写<p> </div>
</body>
<%
set rs=nothing
conn.close
set conn=nothing
%>
</html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -