[Resolvido] Seraparação String por partes

[Marcos Coelho2 2]

Minha String eh a seguinte

 

codigo = "@|5º Temporada|#5x01 - Sympathy for the Devil#*©DepositFiles©http://www.depositfiles.com/?d=90JAT91H©MegaUpload©http://www.megaupload.com/?d=90JAT91H©**teste*#5x02 - Good God, Y’All#*©DepositFiles©http://www.depositfiles.com/?d=90JAT91H©MegaUpload©http://www.megaupload.com/?d=90JAT91H©**teste2*@@teste@@|6º Temporada|#Teste#*©DepositFiles©http://www.depositfiles.com/?d=90JAT91H©MegaUpload©http://www.megaupload.com/?d=90JAT91H©**teste*#5x02 - Good God, Y’All#*©DepositFiles©http://www.depositfiles.com/?d=90JAT91H©MegaUploa©http://www.megaupload.com/?d=90JAT91H©**teste2*@@teste@"

pretemporada = Replace(codigo,"@","[]") : pretemporada = Replace(codigo,"@","[]") : pretemporada = split(pretemporada,"[]")

Já consigo separar ela por partes atraves do codigo

 

pretemporada = Replace(codigo,"@","[]") : pretemporada = Replace(codigo,"@","[]") : pretemporada = split(pretemporada,"[]")
pretitulo = Replace(codigo,"*","[]") : pretitulo = Replace(codigo,"*","[]") : pretitulo = split(pretitulo,"[]")
temporada = Replace(codigo,"|","[]") : temporada = Replace(codigo,"|","[]") : temporada = split(temporada,"[]")
filme = Replace(codigo,"#","[]") : filme = Replace(codigo,"#","[]") : filme = split(filme,"[]")
servidor = Replace(codigo,"©","[]") : servidor = Replace(codigo,"©","[]") : servidor = split(servidor,"[]")

 

Só que após separar eu quero escrever corretamente na tela dessa forma

5º Temporada

 

5x01 - Sympathy for the Devil

©DepositFiles©http://www.depositfiles.com/?d=90JAT91H©MegaUpload©http://www.megaupload.com/?d=90JAT91H©

 

5x02 - Good God, Y’All

©DepositFiles©http://www.depositfiles.com/?d=90JAT91H©MegaUpload©http://www.megaupload.com/?d=90JAT91H©

 

6º Temporada

 

Teste

©DepositFiles©http://www.depositfiles.com/?d=90JAT91H©MegaUpload©http://www.megaupload.com/?d=90JAT91H©

 

5x02 - Good God, Y’All

©DepositFiles©http://www.depositfiles.com/?d=90JAT91H©MegaUpload©http://www.megaupload.com/?d=90JAT91H©

 

 

Está separando corretamente a string.

 

Mas não consigo escrever da forma que eu quero e escrevi acima

 

O Problema eh so fazer o loop correto

já que

pretemporada(1)=5º Temporada

pretitulo(1) = ©DepositFiles©http://www.depositfiles.com/?d=90JAT91H©MegaUpload©http://www.megaupload.com/?d=90JAT91H©

filme(1) = 5x01 - Sympathy for the Devil

 

Mas ai q ta meu problema

 

Já tentei de varias formas e nao consegui escrever como eu quero(buscando todos os dados com loop contando de 1 em 1)

[SemPapasNaLingua 0]

Utilize o for para fazer o loop... comece do 0 e vá até o numero de arrays criado pela Split

 

Se nao sabe como fazer, pesquise sobre laço for e sobre como pegar o numero de arrays criados pela Split...

[xanburzum 169]

usa um For..Next

[Marcos Coelho2 2]

Sim eu sei que eu terei que usar for...next e tmb while..wend

 

para buscar todos os dados eu faco assim

 

for x = lbound(filme) to ubound(filme)
        response.write "Filme: " & filme(x) & "<br />"
next

Mas o problema eh que eu tenho que ler primeiro uma temporada, depois dentro dessa temporada tenho que ler um filme e depois ler todos os links desse filme

esse eh meu separador entre temporadas @teste@ (toda vez que encontrar isso eh pq vai comecar uma nova temporada)

e entre filmes *teste* (toda vez que encontrar isso eh pq vai comecar uma novo filme)

 

Irei tentando e postarei as tentativas para voces me ajudarem...

Obs.: A string tmb pode ser pouco modificada se for atrapalhar no desenvolvimento do codigo.

[xanburzum 169]

quebra a string com SPLIT

 

Split([string],[delimitador])

[Marcos Coelho2 2]

Resolvido

Fiz um for pegando parte por parte da string

e depois outro for separando tudo

[xanburzum 169]

legal, beleza que resolveu, e se quiser colocar o code final como ficou, pode ser usado com referencia para outros users