立邦漆颜色选择建议:请教关于ASP的问题,这段程序有问题没有???

<%
dim strname,strpwd,strtitle,sql
strname=request.form("username")
strpwd=request.form("pwd")
strtitle=request.form("title")
if strtitle="teachers" then
set rs=server.CreateObject("adodb.recordset")
sql=" selcet * from teachers where UserName='" & strname & "'"and '"&pwd&"'"
rs.open sql,conn,1,3
if rs.bof or rs.eof then
response.write"<script language=javaScript> alert ('error id or password ');"
response.write"javascript:history.go(-1)</script>"
else
session =("puid")=username
response.Redirect("teachers.html")
end if
else
set rs=server.CreateObject("adodb.recordset")
sql=" selcet * from studenst where UserName='" & strname & "'"and '"&pwd&"'"
rs.open sql,conn,1,3
if rs.bof or rs.eof then
response.write"<script language=javaScript> alert ('error id or password ');"
response.write"javascript:history.go(-1)</script>"
else
session =("puid")=username
response.Redirect("students.html")
end if

%>