del_area.asp

一个关于房产的asp程序

<!--#include file=../include/config.asp-->
<!--#include file=../include/conn_view.asp-->
<!--#include file=../include/access.asp-->
<!--#include file=../include/function.asp-->

<%
'if request("del")=1 then
if request("id")="" or not isnumeric(request("id")) then
outerr("参数传递出错！")
		out("<a href=""javascript:window.go(-1)"">返回</a>！")
response.end
end if
	dim id,strSql1
	strSql1="delete from [area] where id=" & request("id")
	conn.execute(strSql1)
    response.redirect Request.ServerVariables("HTTP_REFERER")
    response.end
'end if
%>