del.asp

来自「《网上图书订购系统》 1.后台数据库：SQL Server 2000 2.在」· ASP 代码 · 共 16 行

<!--#include file="conn/conn.asp"-->
<%
if session("passed")="" or session("passed")=false then
   response.write "<script language='javascript'>alert('请先登录！');</script>"
   response.write "<script language='javascript'>location.href='adminlogin.asp';</script>"
end if
ID=request.QueryString("ID")
if ID<>"" then
  set rs=conn.execute("delete from tb_Poll where ID='"&ID&"'")
  'response.write "删除成功"
  response.write "<script language='javascript'>window.location.href='take1.asp'</script>"
else
  response.write "请选择记录"
  response.write "<script language='javascript'>setTimeout('window.close();',10)</script>"
end if
%>