del.asp

有相关的置顶

<!--#include file="conn.asp"-->
<%
  if session("user")=""  then
      response.redirect "login.asp"
	  response.end
  end if
%>
<%
set rs=server.CreateObject("ADODB.RecordSet")
sql="delete from book where id="&request.QueryString("id")
rs.open sql,conn,1,3

set rs=nothing
response.write "<script language='javascript'>" & chr(13)
		response.write "alert('成功删除！');" & Chr(13)
		response.write "window.document.location.href='qj.asp';"&Chr(13)
		response.write "</script>" & Chr(13)
Response.End
%>