del_house.asp

<1> 优化了部分代码及一些BUG.提高了浏览速度 <2> 可以通过会员助手自由管理各种信息 <3> 修正了反馈信息及询价订单错误 <4>

<!--#include file=../system/include/config.asp-->
<!--#include file=../share/conn_system.asp-->
<!--#include file=../system/include/function.asp-->
<!--#include file=../system/include/access_zj.asp-->

<%
	dim checkbox,strSql
	checkbox=request("checkbox")

	if checkbox="" then %>

<SCRIPT LANGUAGE=vbscript>
<!--
msgbox("您未选择要删除的记录!")
Sub window_onload
window.history.back
End Sub
-->
</SCRIPT>

	<% response.end
	 end if

checkbox=replace(checkbox," ","")
checkbox=replace(checkbox,","," or id=")

if session("house")="hack" then
   strSql="delete from [house_hack] where id=" & checkbox
end if
if session("house")="hire" then
   strSql="delete from [house_hire] where id=" & checkbox
end if
if session("house")="sell" then
   strSql="delete from [house_sell] where id=" & checkbox
end if
if session("house")="buy" then
   strSql="delete from [house_buy] where id=" & checkbox
end if
	conn.execute(strSql)
        response.redirect "view_house.asp?house=" & session("house")

%>