📄 savefilm.asp
字号:
<!--#include file="articleconn.asp"-->
<!--#include file="security.asp"-->
<!--#include file="inc/articlechar.inc"-->
<%
if request.form("title")="" then
response.write "错误提示:请输入影片名称!"
response.end
end if
if request.form("no")="" then
response.write "错误提示:请输入影片集数!"
response.end
end if
for j=1 to int(request.form("no"))+int(request("count"))
if request.form("url"&j)="" then
response.write "错误提示:请输入影片地址!"
response.end
end if
next
if request.form("dog")="" then
response.write "错误提示:请输入演员名称!"
response.end
end if
if request.form("daikuan")="" then
response.write "错误提示:请输入影片带宽!"
response.end
end if
if request.form("content")="" then
response.write "错误提示:请输入内容简介!"
response.end
end if
if request.form("typeid")="" then
response.write "错误提示:所属类别不能为空!"
response.end
end if
title=htmlencode2(request.form("title"))
content=htmlencode2(request.form("content"))
no=htmlencode2(request.form("no"))
images=htmlencode2(request.form("images"))
dog=htmlencode2(request.form("dog"))
daikuan=htmlencode2(request.form("daikuan"))
best=request.form("best")
dim zhuid,typename
zhuid=request.form("zhuid")
typename=request.form("typename")
set rs=server.createobject("adodb.recordset")
sql="select * from film where (id is null)"
rs.open sql,conn,1,3
rs.addnew
rs("typeid")=Request.Form("typeid")
rs("filmlevel")=Request.Form("softlevel")
rs("runsystem")=Request.Form("runsystem")
rs("title")=title
rs("daikuan")=daikuan
rs("content")=content
rs("dog")=dog
rs("images")=images
rs("best")=best
rs("dateandtime")=now()
rs.update
filmid=rs("id")
rs.close
set rs=server.createobject("adodb.recordset")
for i=1 to no
sql="select * from url where (id is null)"
rs.open sql,conn,1,3
rs.addnew
url=request("url"&i&"")
num=request("no"&i&"")
rs("filmid")=filmid
rs("title")=title
rs("daikuan")=daikuan
rs("url")=url
rs("no")=num
rs.update
next
rs.close
%><head>
</head>
<div align="center">
<table border="1" cellspacing="0" width="50%" bordercolorlight="#333333">
<tr bgcolor="#333333">
<td width="100%" height="20">
<p align="center"><font color="#FFFFFF">添加影片成功</font>
</td>
</tr>
<tr>
<td width="100%">
<p align="left"><br>
影片名称为：
<%response.write title%>
</p>
<p align="center">是否继续添加？<br>
<br>
<a href="addfilm.asp"> 是</a>
<a href="mimi.asp">否</a><br>
<br>
</p>
</td>
</tr>
</table>
</div>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -