求助

[xiaobai20191129]

<!--#include file="open.asp" -->
<%
admin=Request("admin")
pwd=Request("pwd")
if admin<>"" and pwd<>"" then
SQL="select * from admin where admin='"&replace(request.form("admin"),"'","''")&"' and pwd='"&replace(request.Form("pwd"),"'","''")&"'"
Set rs=Server.CreateObject("ADODB.RecordSet")
rs.Open SQL,con,1,1
if rs.Eof thenResponse.Write("<script>alert('对不起，用户名密码不正确！')</script>")p")
rs.Close
Set rs=nothing
else
rs.Close
Set rs=nothing
con.Close
Set con=nothing
Session("admin")=true
Response.redirect("admin.asp")
end if
end if
%>
<%



这个网页代码在运行的时候提示缺少then，请问需要如何修改，下面是错误提示
Microsoft VBScript 编译器错误 错误 '800a03f9'

缺少 'Then'

/admin/admin_login.asp，行 9

if rs.Eof thenResponse.Write("<script>alert('对不起，用户名密码不正确！')</script>")p")

另外请问要怎么修改才能登陆的时候不判断账号密码直接登陆？

[VB业余爱好者]

if rs.Eof thenResponse.Write("<script>alert('对不起，用户名密码不正确！')</script>")p")

这个then后面加个空格