📄 gbookdel.asp
字号:
<%
if isnull(session("xpUser")) or isnull(Session("xpPwd")) then
%>
<script language=javascript>
history.back()
alert("你还没有登陆!")
</script>
<%
Response.End
end if
gburl1=request("gburl1")
gburl=replace(gburl1,"@","&")
if gburl="" then
ifgburl=""
else
ifgburl="&"
end if
if session("UserLevel")>=8 then%>
<!--#include file="conn.asp"-->
<%
BigClassID=request("BigClassID")
BigClassName=request("BigClassName")
BigClassType=request("BigClassType")
SmallClassID=request("SmallClassID")
SmallClassName=request("SmallClassName")
SmallClassType=request("SmallClassType")
NewsID=request("NewsID")
PageName1=request("PageName1")
page=request("page")
SpecialName=request("SpecialName")
add=Request("add")
sql="delete from gstbook where id="&request("ID")
rs.open sql,conn,1,1
conn.close
set conn=nothing
end if
if request("ismore")="yes" then
page=request("page")
response.redirect "gbookmore.asp?PageName1="+PageName1+"&page="+page+"&"+gburl+"&add="+add
elseif PageName1="shownews" then
Response.Redirect "shownews.asp?NewsID="+NewsID+"&add="+add
elseif PageName1="BigClass" then
Response.Redirect "BigClass.asp?BigClassID="+BigClassID+"&BigClassName="+BigClassName+"&BigClassType="+BigClassType
elseif PageName1="SmallClass" then
Response.Redirect "SmallClass.asp?BigClassID="+BigClassID+"&BigClassName="+BigClassName+"&SmallClassID="+SmallClassID+"&SmallClassName="+SmallClassName+"&SmallClassType="+SmallClassType
elseif PageName1="Special" then
Response.Redirect "Special.asp?SpecialName="+SpecialName
else
Response.Redirect "default.asp"
end if
%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -