delete.asp

来自「一个非常好的旅游网站程序.」· ASP 代码 · 共 17 行

<%
If Request("id")="" Then
	Response.Write"<center>数据意外丢失！</center>"
	Response.End
End If
%>
<!--#include file="conn.asp"-->
<%
Set rs=Server.CreateObject("ADODB.Recordset")
sql="SELECT * FROM fankui Where id="& Request("id")
rs.Open sql,conn,1,3
rs.Delete
rs.Update
rs.Close
Set rs=Nothing
Response.Redirect"admin_manage.asp"
%>