📄 savemoban.asp
字号:
<!--#include file="security.asp"-->
<!--#include file="articleconn.asp"-->
<%if session("flag")>3 then
response.write "<br><p align=center>您的操作权限不够!</p>"
response.end
end if
%>
<%
dim id
dim mobna
dim sql
dim rs
dim founderr
founerr=false
if trim(request.form("moban"))="" then
founderr=true
errmsg=errmsg+"<li>模板内容不能为空</li>"
end if
if founderr=false then
moban=request("moban")
set rs=server.createobject("adodb.recordset")
if request("action")="editmoban" then
call editmoban()
end if
sub editmoban()
sql="select * from moban where id="&request("id")
rs.open sql,conn,1,3
rs("moban")=moban
rs.update
end sub
set rs=nothing
conn.close
set conn=nothing
%>
<html>
<head>
<title></title>
<style type=text/css>
body { background:#799AE1; margin:0px; font:9pt 宋体; }
table { border:0px; }
td { font:normal 12px 宋体; }
img { vertical-align:bottom; border:0px; }
a { font:normal 12px 宋体; color:#000000; text-decoration:none; }
a:hover { color:#428EFF;text-decoration:underline; }
.sec_menu { border-left:1px solid white; border-right:1px solid white; border-bottom:1px solid white; overflow:hidden; background:#D6DFF7; }
.menu_title { }
.menu_title span { position:relative; top:2px; left:8px; color:#215DC6; font-weight:bold; }
.menu_title2 { }
.menu_title2 span { position:relative; top:2px; left:8px; color:#428EFF; font-weight:bold; }
</style>
</head>
<body bgcolor="#799AE1">
<br><br>
<table width="50%" border="0" cellpadding="3" cellspacing="1" align="center">
<tr>
<td width="100%" height="20">
<p align="center"><font color="#FFFFFF">
<%if request("action")=addmoban then%> </font><img src=images/dot_orange.jpg border=0><font color="#333333"><strong>添加
<%else%>
修改
<%end if%>
程序成功 </strong></font>
</td>
</tr>
<tr>
<td width="100%" bgcolor="#F3F5F5">
<p align="left"><br>
模板已经修改成功</p>
</td>
</tr>
</table>
<%
else
response.write "由于以下的原因不能保存数据:"
response.write errmsg
end if
%>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -