⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 gbookdel.asp

📁 庐江二中
💻 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 + -