帮忙看一下有什么错误呢？
<%if IsEmpty(Session("Passed")) then
Session("Passed")=False
End if
if Session("Passed")=False then
username=Trim(Request.Form("username"))
password=Request.Form("password")
if username="" or password="" then
Errmsg="请输入用户名和密码"
Else
if not IsNumeric(Request.Form("confirm")) Then
Response.Write"<script>alert('你输入的验证码为非数字!');</script>"
Response.End
End if
if (int(Session("CheckCode")))=int(Request.Form("confirm")) then
set rs=server.CreateObject("adodb.recordset")
sql="select * from People where username='"&username& "'"
rs.open sql,conn,1,3
if rs.EOF then
Emrrsg="用户不存在"
conn.Colse
Set conn=nothing
Else
if md5("password")<>rs.Fields("password") then
Emrrsg="密码不正确"
conn.Close
Set conn=nothing
Else
Emrrsg=""
Session("Passed")=True
Session("username")=rs.Fields("username")
Session("Id")=rs.Fields("Id")
end if
end if
else
Emrrsg="验证码输入错误！"
end if
end if
end if
if not Session("Passed") then
%>
