我的程序一段代码如下，发现数据写进数据库了，但是却没有信息提示窗口弹出，急需解决，有劳各位了！

<% 

 set rs=server.createobject("adodb.recordset")
  set rs1=server.createobject("adodb.recordset")
  sql="select * from  incident where 品='"& j_num &"'"
  rs.Open sql,conn,1,1
if rs.EOF  and rs.bof then
  rs1.Open "Incident",conn,1,3
  rs1.addnew array("品","品","品位"),_
             array(j_num, cas_ad,   chk_tim)
%>    
<script language="vbscript">
    alert ("息映晒!")
    window.location.href = "all.asp"
</script>
<%else%>
<script language="vbscript">
   alert ("品菘丫诘息突!!!!")
   window.location.href = "add_case.asp"
</script>
<%
end if   
rs1.Close
set rs1=nothing
%>

感谢楼上的，你说对了，我改成response.write 输出后是正确的，关键是我以前就是用这样的语句就可以弹出来，只不过现在将程序整合在用select case一起了，所以我想知道原因。

回版主，这是vbscript,程序是用asp写的。