删除的时候怎么让这段代码实现
<!--#include file="../incc/const.asp"-->
<!--#include file="../checkUser.asp"-->
<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
<%
dim Numbers
dim sql
intId=Request("Number")
set rs=server.createObject("adodb.recordset")
sql="select * from Warehouse"
'response.write sql
'response.End
rs.open sql,conn,1,1
if rs.recordCount<=1 then%>
无法删除最后一个管理员。<br>
<a href="Javascript:window.history.go(-1)">backtrack</a>
<%
response.End
end if
sql="delete from Warehouse where Number="&Numbers
response.write sql
response.End
conn.execute (sql)
%>
<script language=Javascript>
<!--
alert("删除成功!");
window.location="<%=session("adminoldUrl")%>"
//-->
</script>
这段代码只能走到这一步sql="select * from Warehouse"
，是哪里的问题呢？
------解决方案--------------------
response.End不要乱用，调用后后面的代码就不会执行了。。

<!--#include file="../incc/const.asp"-->

<!--#include file="../checkUser.asp"-->

<meta http-equiv="Content-Type" content="text/html; charset=utf-8">

<%

dim intId

dim sql

intId=Request("Number")

set rs=server.createObject("adodb.recordset")

sql="select * from Warehouse"

'response.write sql'''''''''''''注释掉

'response.End'''''''''''''注释掉

rs.open sql,conn,1,1

if rs.recordCount<=1 then%>

无法删除最后一个管理员。<br>

<a href="Javascript:window.history.go(-1)">backtrack</a>

<%

response.End

end if

sql="delete from Warehouse where Number="&intId

'response.write sql'''''''''''''注释掉

'response.End'''''''''''''注释掉

conn.execute (sql)

%>

<script language=Javascript>

<!--

alert("删除成功!");

window.location="<%=session("adminoldUrl")%>"

//-->

</script>