📄 admin_video_move.asp
字号:
<!-- #include file="include/onlogin.asp" -->
<!-- #include file="include/conn.asp" -->
<link rel=stylesheet href='images/csk3000.css' type=text/css><script langiage=javascript src='style/mouse_on_title.js'></script>
<%
dim typelist,color,csk3000MoveMsgType,csk3000MoveMsgID
tit="<a href='admin_video.asp?action='>影片列表</a> ┋ " & _
"<a href='admin_video.asp?action=addsever'>添加影片</a> ┋ " & _
"<a href='admin_video.asp?action=addserv'>添加服务器</a> ┋ <a href='admin_vsort.asp'>影片分类</a>｜<A href=admin_video_error.asp>错误电影</A>｜<a href=admin_video_move.asp>批量转移</a>｜<a href=admin_video_url.asp>批量转换</a>"
response.write header(18,tit)
titt="电影分类移动"
response.write admin_bar(titt,1,"99%")
if request("csk3000MoveType")="type" then
if request("c_id_old")="" then csk3000MoveMsgType=csk3000MoveMsgType & "·错误:请选择旧类目!<br>"
if request("c_id_new")="" then csk3000MoveMsgType=csk3000MoveMsgType & "·错误:请选择新类目!"
if csk3000MoveMsgType="" then
conn.execute("update video set c_id="&request("c_id_new")&" where c_id="&request("c_id_old")&"")
csk3000MoveMsgType="·成功:按电影分类移动成功!"
end if
elseif request("csk3000MoveType")="id" then
if request("csk3000ID")="" then csk3000MoveMsgID=csk3000MoveMsgID & "·错误:没有选择电影!<br>"
if request("c_id_new") ="" then csk3000MoveMsgID=csk3000MoveMsgID & "·错误:请选择新类目!"
if csk3000MoveMsgID="" then
conn.execute("update video set c_id="&request("c_id_new")&" where id in("&request("csk3000ID")&")")
csk3000MoveMsgID="·成功:按选定电影移动成功!"
end if
end if
set rs=server.CreateObject("ADODB.RecordSet")
rs.open ("select * from videotype where type"),conn,1,1
do while not rs.eof
typelist=typelist&"<option style='COLOR:"&color&"' value='"&rs("typeid")&"'>"&rs("type")&"</option>"
rs.MoveNext
loop
rs.close
set rs=nothing
conn.close
set conn=nothing
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta copy="CSK3000..电.影.系.统">
<title>批量转移</title>
<style>
td{font-size:9pt;line-height:140%}
</style>
</head>
<body topmargin="1" leftmargin="1" background="../images/bg.gif">
<table border="0" cellspacing="1" style="border-collapse: collapse" width="100%" background="../images/bg1.gif">
<%if csk3000MoveMsgType<>"" then%>
<tr>
<td width="100%" bgcolor="#FFFFFF"><font color="#FF0000"><%=csk3000MoveMsgType%></font></td>
</tr>
<%end if%>
<form name=1 method="post" action="admin_video_move.asp?csk3000MoveType=type">
<tr>
<td width="100%" bgcolor="#F4F4F4"><font color="#000080"><b>按电影分类移动</b></font></td>
</tr>
<tr>
<td width="100%" bgcolor="#FFFFFF">
<p align="center">↓将所有类别/编号为↓<br>
<select size="1" name="c_id_old">
<option selected>请选择旧分类</option>
<%=typelist%>
</select><br>
↓的网站全部移动到↓<br>
<select size="1" name="c_id_new">
<option selected>选择要转到的类目</option>
<%=typelist%>
</select><br>
<input name="change" class=buttonface value="确定移动" type='submit'></td>
</tr>
</form>
<form name=2 method="post" action="admin_video_move.asp?csk3000MoveType=id">
<tr>
<td width="100%" bgcolor="#F4F4F4" background="../images/bg1.gif"><font color="#000080"><b>按选定电影移动</b></font><font color="#808080">
多ID号请用豆号","分开,如(1)或(1,21,32)</font></td>
</tr>
<%if csk3000MoveMsgID<>"" then%>
<tr>
<td width="100%" bgcolor="#FFFFFF"><font color="#FF0000"><%=csk3000MoveMsgID%></font></td>
</tr>
<%end if%>
<tr>
<td width="100%" bgcolor="#FFFFFF">
<p align="center">↓将下列编号的电影↓<br>
<input type="text" name="csk3000ID" size="62" value="<%=request("csk3000ID")%>" style="width:100%;"><br>
↓全部移动到↓<br>
<select size="1" name="c_id_new">
<option selected>请选择要转到的类目</option>
<%=typelist%>
</select><br>
<input name="change1" class=buttonface value="确定移动" type='submit'></td>
</tr>
</form>
</table>
</body>
</html>
<%response.write admin_bar(titt,2,"99%")
response.write ender()%>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -