📄 del_revert.asp
字号:
<!--#include file="connections.asp" -->
<!--#include file="check.asp" -->
<%
id=Request("id")
action=Request("action")
If Not IsNumeric(Id) Then Id=0
If Id<>0 And Action="delete" Then
Set rs=Server.CreateObject("ADODB.Connection")
rs.Open datalink
strSQL="delete from revert Where id="&Id
rs.Execute(strSQL)
rs.close
set rs=Nothing
Response.Write("<script>alert('该回复已被删除!\n\n如要让它立刻在你眼前消失---\n\n请刷新')</script>")
Else
Response.Write("<script>if(confirm('是否删除?')){window.location='del_revert.asp?action=delete&id="&Id&"';}</script>")
End If
%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -