cp_add_save.asp

来自「一个完全仿照阿里巴巴的网站管理系统 本软件没有版权问题」· ASP 代码 · 共 26 行

<!--#include file="top.asp"-->
<%if userflag1=0 then
response.redirect"ok.asp?action=flag"
end if

page=request("page")
if page="" then page=1

if request("action")="del" then
id=request("id")

conn.execute("delete From SMT_cp Where SMT_ID="&ID&" and SMT_yp_id="&session("id"))
conn.execute("delete from SMT_leaveword where SMT_book_sort=4 and SMT_book_table="&id&" and SMT_book_ypid="&session("id")&"")

Response.Redirect "cp.asp?page="&page

elseif request("action")="key" then
set rs=Server.CreateObject("Adodb.Recordset")
sql="select * from SMT_cp where SMT_id="&request("id")&" and SMT_yp_id="&session("id")
rs.open sql,conn,1,3
rs("SMT_key")=request("zt")
rs.update
rs.close
set rs=nothing
response.redirect"cp.asp?page="&page
end if%>