北京昌平区苹果专卖店:看看我的ASP程序怎么了呀 /

我想实现不同的人登陆，引导到不同的页面，在登陆页面我在表单里用了以下元素：一个下拉菜单里面的直有“老师”“学生”“管理员”还有就是两个TEXT，分别是帐户和密码。先根据下拉菜单里传来的直是“老师”“学生”“管理员”来决定查数据库中的哪个表teacher,student,admin.的到rs 集合中的teacher_num,name;student_num,name;admin_num,name分别与传过来的表单里的name,psw进行比较，判断是不是正确登陆，如果成功就redirect到相应的页面，不正确就给出提示信息。这里还有判断name和psw<>""
我的代码如下：可是没有报错，也没有其他反映，页面空白，怎么回是呀？
如能修改则改之，如不行给个代码，谢谢了！！！
<%
dim select2 ,name1, psw1, check1
select2=request.Form("select1")
name1=request.Form("name")
psw1=request.form("psw")
if name1<>"" and psw1<>"" then
dim conn, connstr, rs,sql1,sql2,sql3
connstr="dbq="&server.MapPath("skin\data.mdb")&";driver={microsoft access driver (*.mdb)};"
set conn=server.CreateObject("adodb.connection")
conn.open connstr
set rs=server.CreateObject("adodb.recordset")
sql1="select student_num,name from student where student_num='"&psw1&"'and name='"&name1&"'"
sql2="select teacher_num,name from teacher where teacher_num='"&psw1&"'and name='"&name1&"'"
sql3="select admin_num,name from teacher where admin_num='"&psw1&"'and name='"&name1&"'"
if select2="学生" then
rs.open sql1,conn,1,1
if rs.recordcount=0 then
response.write"<font size='+1' color='#ff0000'>"&"对不起！此用户不存在或者密码不正确！"&"</font>"
else
response.Redirect"student_index.asp"
end if
end if

if select2="教师" then
rs.open sql2,conn,1,1
if rs.recordcount=0 then
response.write"<font size='+1' color='#ff0000'>"&"对不起！此用户不存在或者密码不正确！"&"</font>"
else
response.Redirect"teacher_index.asp"
end if
end if
if select2="管理员" then
rs.open sql3,conn,1,1
if rs.recordcount=0 then
response.write"<font size='+1' color='#ff0000'>"&"对不起！此用户不存在或者密码不正确！"&"</font>"
else
response.Redirect"admin_index.asp"
end if
end if
else
response.write"请输入帐号和密码！"
end if

%>