delete.aspx

来自「小新闻发布程序.net」· ASPX 代码 · 共 43 行

ASPX
43
字号
<%@ Page Language="VB" %>
<%@ import Namespace="System.Data" %>
<%@ import Namespace="System.Data.OleDb" %>
<script runat="server">

    sub page_load()
    
    dim delid as string =request.querystring("id")
    
    
    dim conn as oledbconnection
    
                dim sql as string
    
                sql="delete * from notice where id="&delid
    
                conn=new OleDbConnection("Provider=Microsoft.Jet.OleDb.4.0;Data Source="+Server.MapPath("notice.mdb"))
    
    
            dim cmd as oledbcommand = new oledbcommand(sql,conn)
    
            conn.open()
            cmd.executenonquery()
            conn.close()
    
    label1.text="删除成功!"
    end sub

</script>
<html>
<head>
</head>
<body>
    <form runat="server">
        <div align="center"><asp:Label id="Label1" runat="server"></asp:Label>
        </div>
        <div align="center">
            <asp:HyperLink id="HyperLink1" runat="server" NavigateUrl="more.aspx">返回管理</asp:HyperLink>
        </div>
        <!-- Insert content here -->
    </form>
</body>
</html>

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?