📄 del.asp
字号:
<%
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("examination.mdb")
%>
<%
Subject=Request.QueryString("id")
questionNo=Request.QueryString("No")
'response.write"questionNo="&No
delsql="delete from "&Subject &" where 题目序号="&questionNo
'response.write delsql
conn.execute(delsql)
conn.close
%>
<script language="vbscript">
msgbox "你已经成功删除了该题!请刷新查看结果!"
location.href="javascript:history.back()"
</script>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -