ayuda con sistema de usuarios sin BD

[TCL_ZIP]

Tengo el siguiente sistema de usuarios:

Código:

<%
if request.form("usuario") <> "" and request.form("clave") <> "" then
    user = "feaps"
    pass = "feaps"
    if (Lcase(request.form("usuario")) = LCase(user)) AND (LCase(request.form("clave")) = Lcase(pass)) then
       session("autorizado") = user
       response.redirect "restringido_mostrar.asp"
    else
       mensaje = "Error, usuario/contraseña incorrecta"
    end if
else
    mensaje = "Introduzca su usuario y su password"
end if
%>

y lo he intentado mejorar para que me acepte mas usuarios, mediante un array:

Código:

<%
if request.form("usuario") <> "" and request.form("clave") <> "" then
    user = array("feaps","genoillescas","Martes","Miercoles","Jueves","Vienes","Sabado")
    if (Lcase(request.form("usuario")) = LCase(user)) AND (LCase(request.form("clave")) = Lcase(user)) then
       session("autorizado") = request.form("usuario")
       response.redirect "restringido_mostrar.asp"
    else
       mensaje = "Error, usuario/contraseña incorrecta"
    end if
else
    mensaje = "Introduzca su usuario y su password"
end if
%>

Pero nose porque cuando envio el form, no me encuentra la pagina, pero solo me lo hace con el segundo script, ya que el primero funciona perfectamente...

Cual puede ser el problema? please me urge muchissimo, ya que lo necesito para esta mañana...

Gracias por adelantado

[Xculio]

Creo que tendria que ser hasi no???

Código:

<%
if request.form("usuario") <> "" and request.form("clave") <> "" then
    user = array("feaps","genoillescas","Martes","Miercoles","Jueves","Vienes","Sabado")
    user = array("feaps","genoillescas","Martes","Miercoles","Jueves","Vienes","Sabado")
numusers = 6 'porque tienes siete casos en el array
for x = 0 to numusers    
    if (Lcase(request.form("usuario")) = LCase(user(x))) AND (LCase(request.form("clave")) = Lcase(user(x))) then
       session("autorizado") = request.form("usuario")
       response.redirect "restringido_mostrar.asp"
    else
       mensaje = "Error, usuario/contraseña incorrecta"
    end if
next
else
    mensaje = "Introduzca su usuario y su password"
end if
%>

espero que fuese eso.

Saludos.