logdel.asp

一个互联网络公司网站源码

<!--#include file="conn.asp" -->
<%
		ID=trim(request.QueryString("ID"))
		if not isnumeric(ID) and id="" then
		id=0
		end if
		sql="select loginID,insertTime from [summary] where id="&id
		set rs=conn.execute(sql)
		if not rs.eof then
		loginID=rs(0)
		end if
	if session("flag") then
		sql="delete * from [summary] where id="&ID
		conn.execute(sql)
	elseif loginID=session("loginID") and formatdatetime(now,vbshortdate)=formatdatetime(rs("insertTime"),vbshortdate) then
		sql="delete * from [summary] where id="&ID
		conn.execute(sql)
	end if
%>
<%
	response.Redirect(request.ServerVariables("HTTP_REFERER"))
%>