请大家帮我看看这段代码哪里出了问题？

<!--#include virtual="conn.asp"-->

<%

schoolname1=request("schoolname")
    set rs1=conn.execute("select * from tb_MedicineType where schoolname='"&schoolname1&"'")
    typename1=trim(request("typename"))
   
set rs0=conn.execute("select * from tb_Medicinetype where typename='"&typename1&"'")
if not rs0.eof then
%>
<script language="javascript">
  alert("已存在此门牌！");
  window.location.href="addgoodsname.asp";
</script>
<%
    response.End()
    end if
    set rs=server.CreateObject("adodb.recordset")
    strsql="insert into tb_Medicinetype (schoolId,typename,intime) values ("&rs1("schoolId")&",'"&typename1&"','"&cstr(now())&"')"
rs.open strsql,conn,3,3
%>
<script language="javascript">
alert("门牌信息添加成功!");
window.location.href="goodslist.asp";
</script>