📄 delnewssort.asp
字号:
<%
'如果用户没有登陆，则终止响应
if session("admin_name")="" then response.end
'记录集对象
set rs=server.createobject("adodb.recordset")
%>
<!--#include file="conn.asp"-->
<head>
<link href=../style.css rel=stylesheet type=text/css>
</head>
<%
'如果是删除操作
if request("action")="del" then
'查询newsclass数据表，获得指定的新闻类别
sql="select * from newsclass where newsclass_id="&request("newsclass_id")
'打开记录集
rs.open sql,conn,3,3
'如果记录集为空
if rs.eof then
'则转向delnewssort.asp页面
response.redirect "delnewssort.asp"
else
'删除记录，并更新数据库
rs.delete
rs.update
'提示用户删除成功
'显示返回链接
response.write "类别删除成功"
response.write "<br>"
response.write "<a href=delnewssort.asp>返回</a>"
end if
'关闭记录集
rs.close
else
'查询所有新闻类别
sql="select * from newsclass"
'打开记录集
rs.open sql,conn,3,3
'如果记录集为空
if rs.eof then
'则显示没有类别
response.write "没有类别"
else
'循环显示新闻类别名称
do while not rs.eof
%>
<a href="delnewssort.asp?newsclass_id=<%=rs("newsclass_id")%>&action=del"><%=rs("newsclass_name")%></a><br>
<%
rs.movenext
loop
rs.close
end if
end if
%>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -