[Resolvido] Split ASP

[xanburzum 169]

joga o valor de Valor do MeuString = 2,3,5,8,9,10,11

em um array e recupera eles e compara com seu valor ba tabela de cores...

[Eduardo Fonseca 0]

joga o valor de Valor do MeuString = 2,3,5,8,9,10,11

em um array e recupera eles e compara com seu valor ba tabela de cores...

 

Se você observar no código, isso já foi feito!

 

O valor do "Meu Array" é justamente esse:

 

Meu Array(0) = 2

Meu Array(1) = 3

Meu Array(2) = 5

Meu Array(3) = 8

Meu Array(4) = 9

Meu Array(5) = 10

Meu Array(6) = 11

 

E qdo uso o FOR... ele retorna okay... mas o foco não é esse... preciso que ele use esses valores como sendo os ID's da tbCores... e isso já foi feito através do "SELECT WHERE IN" mas ele só pega o ultimo valor...

[Eduardo Fonseca 0]

Mudei o foco do meu raciocínio e resolvi o problema, pelo menos nessa primeira instância... vou ver qdo eu for usar a mesma lógica pros produtos relacionados...

 

simplesmente resgatei os dois campos da tbCores e usei eles mesmos... simples demais e eu com o foco errado!

 

Muito obrigado à todos!

 

Vejam o que fiz:

 

Set vProdutos = Server.CreateObject("ADODB.Recordset")
vProdutos.CursorLocation = 3
vProdutos.CursorType = 0
vProdutos.LockType = 3

strSQL = "SELECT * FROM tbProdutos WHERE id=1 ORDER BY id DESC"
vProdutos.Open strSQL, db
Dim MeuString, MeuArray, Msg
Response.write MeuString
If Not vProdutos.Eof Then
While Not vProdutos.EOF

MeuString = vProdutos("cores")

Set vCores = Server.CreateObject("ADODB.Recordset")
strSQL = "SELECT id,cor FROM tbCores WHERE id IN (" & MeuString & ")"
vCores.Open strSQL, db


While Not vCores.EOF
nome_da_cor = vCores("cor")
id_da_cor = vCores("id")


Response.Write "<img src='images/cores/"& id_da_cor &".gif' width='18' height='18'> - "& nome_da_cor &"<br>"
vCores.MoveNext


Wend

vProdutos.MoveNext
Wend
End If

Response.Write "<br><b>Valor do MeuString</b> = " & MeuString

[hargon 64]

Parabéns por ter encontrado uma solução. http://forum.imasters.com.br/public/style_emoticons/default/thumbsup.gif

[xanburzum 169]

beleza, kker coisa , estamos ai...