[Resolvido] converter string para array

[champignoncpg 0]

E ae galera fimose....

 

estou com um probleminha aki e num consegui solucionar a dois dias.. aff

 

eu tenhu uma string e quero trasformar ela em um array

 

exemplo da string imprimida

 

campo1(0) = 11; campo1(1) = 12; campo1(2) = 13; campo1(3) = 14; campo1(4) = 15; campo2(0) = 21; campo2(1) = 22; campo2(2) = 23; campo2(3) = 24; campo2(4) = 25;

 

esta string veim de um array em javaScript .... se alguem souber tratar tbm d alguma forma em JS sera util tbm...

 

Obs: trasformando esta string para array poderia pegar o indice da posiçaõ desejada podenso trabalhar numa boa...

 

se alguem tiver duvida pod postar q estou d olho no post o dia todo !!!

 

Um abraço a todos !!!

[NaPraia 12]

cria um array com a quantidade de caracters que tem a string

e joga a letra 1 na posição 1, letra 2 na posição dois, .... Usa um laço de repetição para isso.

[DragonBR 0]

utiliza isso

dim novoVetor

novoVetor =split(strings, ";")

Isso transforma em vetor separando os indices pelo ";"

 

response.Write novoVetor(0)

depois faça um tratamento de string para pegar o valor desejado exemplo

response.Write right(novoVetor(0) ,(len(novoVetor(0) )- inStrRev(novoVetor(0) , "=")))

pronto

[champignoncpg 0]

Vlw ae pela dica mas nao funfo... rsrsrsrsrs

 

acho q num expliquei dirito tbm....

 

quero q esta string seja separada como array....

 

Exemplo:

 

vem assim >>> campo1(0) = 11; campo1(1) = 12; campo1(2) = 13; campo1(3) = 14; campo1(4) = 15;

 

 

desejado >>> "campo1(0) = 11"; "campo1(1) = 12"; "campo1(2) = 13"; "campo1(3) = 14";" campo1(4) = 15";

 

onde cada registro entre as aspas sejam um indice do array

[Mário Monteiro 179]

como voce fez o split?

 

deveria ter funcionado

[hargon 64]

Não deu certo? Você tentou acessar os índices através de campo1(x)?

 

Se for isso, você tem que fazer assim:

campo1 = "11;12;13;14;15"
campo1 = split(campo1 , ";")

[champignoncpg 0]

Opa .. beleza gente

 

hargon, na minha função JS retirei aquelas papagaiada q tava "campo1(0) = 11;" , e deixei apenas o value msm dos optios ....

 

assim consegui usar certinhu o SPLIT

 

ficando assim para ler !!!

 

combos = request("combos")

dim novoVetor
novoVetor = split(combos,":")
if request("busca") = "sim" then
	if Ubound(novoVetor) <> -1 then
		response.Write novoVetor(0) // este eh so um exemplo para ler a posição 0 do vetor
	end if
end if

 

Vlw gente pela colaboração !!!!

[champignoncpg 0]

Soh mais uma coisa gente...

 

Como coloco [resolvido] no topico igual a galera faz....

 

flw

[hargon 64]

Bacana fi. http://forum.imasters.com.br/public/style_emoticons/default/thumbsup.gif

 

Deixa que coloco resolvido pra você. rs