modi_infodata.asp

来自「购物系统时尚版.强大的后台文章编辑器的功能」· ASP 代码 · 共 84 行

ASP
84
字号
<!--#include file="chk.asp"-->
<!--#include file="../my_lib/my_request.asp" -->
<!--#include file="db_conn.asp" -->
<%
id=my_request("id",1)
action=my_request("action",0)
if action="save" then
call save()
end if
if id="" or isnull(id) or IsNumeric(id)=False then
response.write("<script>alert(""参数错误!"");location.href=""info.asp"";</script>")
response.end
end if
sql="select info_title from info_set where id="&id
set rs=conn.execute (sql)
info_title=rs(0)
rs.close
set rs=nothing
%>
<html>

<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<LINK href="style.css" rel=stylesheet type=text/css>
<title>信息添加</title>
<script src="edit.js" type="text/javascript"></script>
<SCRIPT>
function view1(url){ 
var url; window.open(url,'_blank','status=no,scrollbars=yes,top=20,left=50,width=600,height=400'); 
}
</SCRIPT>
</head>

<body>
<!--#include file="TopManu.asp"-->
<table border="0" width="100%" id="table1" cellspacing="0" style="border-collapse: collapse" cellpadding="0">
	<tr>
		<td background="image/admintoptdbg.gif">
		<p align="left">
		<img border="0" src="image/title_arrow.bmp" width="17" height="27" align="absmiddle"><font color="#808080"><b><%=info_title%>添加</b></font></td>
	</tr>
</table>
<div align="center">
<table border="1" width="100%" id="table1" cellspacing="1" cellpadding="4" bordercolor="#C0C0C0" style="border-collapse: collapse">
<form action=add_infodata.asp method=post name="form1">
	<tr>
		<td width="134" align="right" valign="middle">需要添加的内容:</td>
		<td width="619"><!--#include file="eokedit.asp"-->
<script language="javascript">
document.write ('<iframe src="info_textbox.asp?id=<%=id%>&action=modify" id="message" width="500" height="360"></iframe>')
frames.message.document.designMode = "On";
</script></td>
	</tr>
	<tr>
		<td width="753" align="right" colspan="2"><input type=hidden name=id value=<%=id%>>
		<input type=hidden name=action value="save">
		<input type="hidden" name="Content" value>
<p align="center">
<input type="submit" value="修改" name="B1" onclick="document.form1.Content.value = frames.message.document.body.innerHTML;"> </p>
		</td>
	</tr></form>
</table>

</div>

</body>

</html>
<%
sub save()
content=request("content")
id=my_request("id",1)
if id="" or content="" then
response.write("<script>alert(""内容不完整!"");location.href=""info.asp"";</script>")
response.end
else
id=cint(id)
sql="update info_set set info_content='"&content&"',istj=1,addtime='"&now()&"' where id="&id
conn.execute (sql)
response.redirect "info.asp"
end if
end sub
%>

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?