📄 classstudentdelok.asp
字号:
<!--#include file="connectionstring.asp"-->
<%
IdClass=request.cookies("IdClass")
if IdClass=" " then
response.write "非法操作！"
response.end
end if
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>New Page 1</title>
</head>
<body background="Back1.jpg">
<%
name=request("name")
id=request("id")
idc=left(id,8)
if idc<>IdClass then
response.write "输入学号错误，请重新输入！"
response.end
end if
Set Conn=Server.CreateObject("ADODB.Connection")
Conn.Open strConn
sql1 = "select * from stu where id='"&id&"'and name='"&name&"'"
set rs1=conn.Execute (sql1)
if rs1.eof then
response.write "输入学号或姓名错误，请确定删除名单！"
response.end
end if
name1=rs1("name")
sql = "delete stu where id='"&id&"'"
conn.Execute (sql)
sql1="delete sels where ids='"&id&"'"
conn.Execute (sql1)
%>
<p align="center"> </p>
<p align="center"> </p>
<p align="center"> </p>
<p align="center"><b><font color="#0000FF" size="6">已经成功删除</font></b></p>
<p align="center"></font><font color="#FF0000"><input type="button" value="删除下一个" onClick="history.back()" name="dd"></p>
</font>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -