Tipos incompativeis usando array

E ai Galera, beleza??!!

Estou desenvolvendo um chat ultilizando global.asa e gostaria de saber o que pode estar errado na linha que esta acuzando:

erro:

Tipo de erro:

Erro de tempo de execução do Microsoft VBScript (0x800A000D)

Tipos incompatíveis

/marlon/entrar.asp, line 10

la vai o codigo da pagina entrar.asp

ASP [/tr][tr]<%

dim user, cor, userlist, cheia, existe, y

y=0

existe= "nao"

user= server.HTMLEncode(request.form("user"))

cor= server.HTMLEncode(request.Form("cor"))

numchar = len(user)'le a quantidade de caracteres, nao esta sendo usado aqui

session("apelido")= user

application.lock

userlist= application("usuarios")

for y=1 to 20

if user = userlist(y) then 'esta é a linha de erro

response.redirect("default.asp?existe=sim")

existe= "sim"

exit for

end if

next

if existe <> "sim" then

for x=1 to 20

if userlist(x) = "" then

cheia= "nao"

userlist(x)= session("apelido")

exit for

else

cheia="sim"

end if

next

end if

application("usuarios")= userlist

application.UnLock

if cheia = "sim" then

response.redirect("default.asp?cheia=sim")

end if

%>

[/tr]

não sei o que faço mais... por favor se souberem, deem um help...

Ate mais..