Es facilmente observable que te sobra un else.
Para que verifiques, le he quitado todas las lineas que no estan involucradas.
Código:
if (iUserId <> "") then
If not oRec.eof then
if len(Request.Form("password")) = 0 then
else
end if
end if
else
If oRec.eof then
if len(Request.Form("password")) = 0 then
else
end if
end if
if (isarray(aEncSel)) then
end if
else
end if