📄 delete.asp
字号:
<%@ language="vbscript" %>
<!--#include file="adovbs.inc"-->
<%
CurrBookID=request("SeggID")
DbPath = SERVER.MapPath("words.mdb")
Set conn = Server.CreateObject("ADODB.Connection")
conn.open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DbPath
sql="Delete * from Seggest Where SeggID="&CurrBookID&" "
conn.Execute(sql)
'response.write "删除成功，请返回上一步并涮新"
'response.write "<br>"
'response.write "<a href='javascript:window.history.go(-1)'>返回</a>"
response.redirect "manger.asp"
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" >
</head>
<body link="#005f02" vlink="#00b06f" >
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -