Pesquisa Dentro De Uma Array

[Guest - Nelson -]

Como faco para descobrir o indice de um elemento em uma array ?

array(0) = "A"

array(1) = "B"

array(2) = "C"

array(3) = "D"

no clipper ascan(array,"B") = 1

[Decio]

Acho que em vbscript não tem esta função. Seria preciso você desenvolver uma função que faça isto.

exemplo:

Dim MyArray(10),Ret

MyArray(0) = "A"

MyArray(1) = "B"

MyArray(2) = "C"

MyArray(3) = "D"

Ret = VerIndice("B") 'Aqui envia a string a ser procurada

response.Write Ret

Function VerIndice(string1)

For i = 0 To 3

If MyArray(i) = string1 Then Exit For

Next

VerIndice = i

End Function

Obs: este é apenas um exemplo, se não encontrar a srtring o retorno sera sempre 3, o que estaria errado.

[rockbilly]

Se é pra achar a posição de um array, tem que criar uma função para isso. ve se isso te ajuda:

dim rray(4)

Function posicao(expr,char)

junta = join(expr)

trata = split(junta," ")

For i = 0 to Ubound(trata)

  cache = cache & trata(i)

Next

pos = inStr(cache,char)

posicao = pos

End Function

rray(0) = "A"

rray(1) = "B"

rray(2) = "C"

rray(3) = "D"

  Response.Write posicao(rray,"D")

[Guest - Nelson -]

Eu não estava acreditando que não tinha uma funcao basica dessas mas valeu pessoal.