delnewssort.asp
来自「ASP+ACCESS 产品报价系统 开发环境简单 主要是周杰伦FANs的交互活动」· ASP 代码 · 共 41 行
ASP
41 行
<%
if session("admin_name")="" then response.end
set rs=server.createobject("adodb.recordset")
%>
<!--#include file="conn.asp"-->
<head>
<link href=../css.css rel=STYLESHEET type=text/css>
</head>
<%
if request("action")="del" then
sql="select * from newsclass where newsclass_id="&request("newsclass_id")
rs.open sql,conn,3,3
if rs.eof then
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 + =
减小字号Ctrl + -
显示快捷键?