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

<% dim username,password username=trim(request.form("username")) password=trim(request.form("password")) if username="" then response.redriect "login1.asp" else

sql="select * from adminid where username=username " set rs=server.createobject("adodb.recordset") re.open sql,conn,1,1 if not rs.eof then if rs("password")=password then response.redriect "loginsuccess.asp" rs.close set rs=nothing

%> 这段代码执行后是出

Microsoft VBScript 编译器错误 错误 '800a03f6'

缺少 'End'

/han/admin/check.asp，行 19