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 + -
显示快捷键?