📄 saveforcast.asp
字号:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="primary_admin.asp"-->
<!--#include file="HMconnection.asp"-->
<%dim forRS,nfID,filmName,mainactors,directors,proDay,productor,filmlevel,madeBy,goodlevel,imagesname,imagefile,content
nfID=trim(request("nfID"))
filmName=request.Form("filmName")
mainactors=trim(request.Form("mainactors"))
directors=trim(request.Form("directors"))
proDay=trim(request.Form("proDay"))
productor=trim(request.Form("productor"))
filmlevel=trim(request.Form("filmlevel"))
madeBy=trim(request.Form("madeBy"))
goodlevel=trim(request.Form("goodlevel"))
imagesname=trim(request.Form("imagesname"))
imagefile=trim(request.Form("imagefile"))
content=trim(request.Form("content"))
if imagesname="" or imagesname="abcd.jpg" then imagesname=""
imagefile=trim(trim(request.Form("imagefile")))
content=trim(request.Form("content"))
content=replace(content," "," ")
content=replace(content,Chr(13),"<br>")
set forRS=server.createobject("adodb.recordset")
if nfID<>"" then
forRS.open "select * from NewFilm where nfID="&nfID,conn,1,3
else
forRS.open "select * from NewFilm",conn,1,3
forRS.addnew
end if
forRS("filmName")=filmName
forRS("mainactors")=mainactors
forRS("directors")=directors
forRS("picfile")=imagefile
forRS("filmpic")=imagesname
forRS("proDay")=DateValue(proDay)
forRS("productor")=productor
forRS("filmlevel")=filmlevel
forRS("madeBy")=madeBy
forRS("goodlevel")=goodlevel
forRS("FilmCont")=content
forRS.update
forRS.close
set forRS=nothing
set conn=nothing
%>
<html>
<head>
<title>顶级影视 设计维护:QQ:1243619 Email:hipboy@sohu.com</title>
<link rel="stylesheet" type="text/css" href="../style/style.css">
</head>
<body>
<div align="center" >
<%if nfID="" then%>
<table border="1" cellspacing="0" width="450" bgcolor="#00FFFF">
<tr bgcolor="#0099FF">
<td width="100%" height="27">
<p align="center"><font color="#FFFFFF">添加成功</font>
</td>
</tr>
<tr>
<td width="100%">
<p align="center"><br>
您刚刚添加的公告名称为：
<%response.write filmName%>
</p>
<p align="center">是否继续添加？按否返回管理页面。<br>
<br>
<a href="addforcast.asp"> 是</a>
<a href="admin.asp">否</a><br><br>
</p>
</td>
</tr>
</table>
<%else%>
<table border="1" cellspacing="0" width="450" bgcolor="#00FFFF">
<tr bgcolor="#0099FF">
<td width="100%" height="27">
<p align="center"><font color="#FFFFFF">修改成功</font>
</td>
</tr>
<tr>
<td width="100%">
<p align="center"><br>
您刚刚修改的公告名称为：
<%response.write filmName%>
</p>
<p align="center">是否继续修改？按否返回管理页面。<br>
<br>
<a href="newfilm.asp"> 是</a>
<a href="admin.asp">否</a><br><br>
</p>
</td>
</tr>
</table>
<%end if%>
</div>
</body>
</html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -