Cambie hasta los nombres de los campos de la tabla administrador en mi base de datos, lo q se llamaba login paso a ser text2 y lo que llamaba password paso a ser text3. pero aun nada sigue dando el error de Usuario No Permitido
<% Dim rs1, ObjADO
Dim sql
Set ObjADO=Server.CreateObject("ADODB.Connection")
Set rs1=Server.CreateObject("ADODB.Recordset")
ObjADO.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath ("/portalweb/bdatos/catedra.mdb")
txt2=request.form ("txt2")
txt3=request.form ("txt3")
sql="SELECT * From administrador WHERE txt2= '" & txt2 & "' AND txt3 = '" & txt3 & "'"
rs1.Open sql, ObjADO,1,2
if rs1.eof then
response.write "Usuario No Permitido"
else
response.redirect "administrador1.asp"
end if
%>