npost_modify.asp

来自「shopxp网上购物系统v6.6已经调试,百分百可用」· ASP 代码 · 共 41 行

ASP
41
字号
<%@ codepage ="936" %>
<!--#include file="../nUser/config.asp"-->
<!--#include file="../nUser/conn.asp"-->
<!-- #include file="inc/Session.asp" -->

<% 
id=request("id")
act=request("act")
if act="ok" then
sql="update kheu_nPost set show_flag=true where id="&id 
conn.execute(sql)
sql1="update kheu_nType set build_flag=false where id="&request("ntype")  
conn.execute(sql1)
conn.close
set conn=nothing
response.redirect "nPost.asp?page="&request("Page")&" "
elseif act="first" then
sql="update kheu_nPost set first_flag=true where id="&id 
conn.execute(sql)
sql1="update kheu_nType set build_flag=false where id="&request("ntype") 
conn.execute(sql1)

conn.close
set conn=nothing
response.redirect "nPost_All.asp?page="&request("Page")&" "

elseif act="nofirst" then
sql="update kheu_nPost set first_flag=false where id="&id 
conn.execute(sql)
conn.close
set conn=nothing
response.redirect "nPost_All.asp?page="&request("Page")&" "

else
sql="update kheu_nPost set show_flag=false where id="&id 
conn.execute(sql)
conn.close
set conn=nothing
response.redirect "nPost_All.asp?page="&request("Page")&" "
end if
%>

⌨️ 快捷键说明

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