studel.aspx

来自「学生成绩管理 学生成绩管理」· ASPX 代码 · 共 32 行

ASPX
32
字号
<%@ page language="vb" debug=true %>
<%@ Import Namespace="System.Data" %>
<%@ Import Namespace="System.Data.OleDb" %>
<script language="vb" runat="server" >
sub Btn_del(sender as Object, e as Eventargs)
    Dim conn as new OleDbConnection()
    conn.ConnectionString = "provider=Microsoft.Jet.OLEDB.4.0; Data Source="& _
	Server.MapPath("基本信息.mdb")
	dim str as String = "delete from student where 学号 = '" & inf.text & " '"
    conn.open()
	Dim cmd As new OleDbcommand(str,conn)
	if cmd.ExecuteNonQuery() = 1 then
	showMeg.text = "删除成功!"
	else
	showMeg.text = "该数据不存在!"
	end if                 
	conn.Close()  
end sub

</script>
<html>
<head><title>删除学生信息界面</title></head>
<body><center>
<H1 Align="Center">请 输 入 删 除 的 信 息</H1>
<Hr color="#003366" Border="2"><br>
<form runat="server">
输入要删除的学生学号:<Asp:TextBox Runat="Server" Id="inf" Columns="10"/>
<asp:button runat="server" Text="删除"  OnClick="Btn_del" />
<br><br><br>
<asp:Label runat="server" ID="showMeg" />
</form></center></body>
</html>

⌨️ 快捷键说明

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