[Resolvido] array de novo..

Estou querendo fazer o seguinte: com a funçao abaixo eu pego qualquer letra q eu quiser certo?

<%
sFiltro = "palavra1|palavra2|palavra3"
sTrataPalavras = Split(sFiltro, "|")
%>Se eu der um response.write sTrataPalavras(2)eu pego a "palavra3" certo? ok!

QUERO PEGAR DETERMINADA PALAVRA DE UM ARRAY.. OU SPLIT.. SEI LÁ.. MAS VINDO DO BANCO DE DADOS.

VEJA ABAIXO:

<%
Set pegatimes = Server.CreateObject("ADODB.Recordset")
pegatimes.Open "SELECT * FROM tabela order by codigo", Conexao
Do while not pegatimes.eof
mystring = pegatimes("clube")&", "
myarray = Split(mystring, ", ")

Response.Write myarray(3)

pegatimes.movenext
loop
%>
PORQUE O RESPONSE myarray(3) não funciona?????????

quero armazenar todos os times na mystring em uma array.. tipo:

myarray(0)

myarray(1)

...

Quem puder me ajudar.. agradeço desde já!!!!

Abraço.