<!--#include file="inc/config.asp"-->
<!--#include file="inc/conn.asp"-->
<!--#include file="inc/function.asp"-->
<!--#include file="inc/strutil.asp"-->
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<title>删除信息</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
</head>
<body>
<%
dim id,delpass,rs,savepath
id=Clng(trim(request.Form("id")))
delpass=request.form("delpass")
delpass=replace(delpass,"'","")
set rs=server.CreateObject("adodb.recordset")
rs.open "select DelPass,SavePath from t_info where id="&id,conn,3,1
if not rs.eof then
	if(delpass=rs(0)) then
		savepath=rs(1)
		
		response.write("<script>alert('成功删除信息!');location.href='/';</script>")
	else
		response.write("<script>alert('密码错误');history.back();</script>")
	end if
else
	response.write("<script>alert('该信息不存在');history.back();</script>")	
end if
rs.close
set rs=nothing
%>
</body>
</html>
<%
call connclose
%>
</body>
</html>
