resgatar no menu list resultados separados por ","

[Carlos Moreira 0]

Olá pessoal eu tenho uma tabela de produtos com um campo cores onde eu gravo os Id da tabela cores separando-as por "," quero colocalo num menu list, mas o que estou tentando fazer aqui esta com PAU.

 

aparece vários menus list cada um com as cores e o nome na frente.

 

Eis o meu código:

 

<%Call abre_conexao(ConnString,Conn)cores= RSProduto("cores")If cores <> "" ThenarrayCores= split(RS("cores"),",")for i=0 to ubound(arrayCores)Set RScores = Server.CreateObject("ADODB.Recordset") msql = "SELECT * FROM cores where id="&cint(arrayCores(i))&" "RScores.Open msql, Conn,3,3%><select name="cor" id="cor" style="FONT-SIZE: 8pt; FONT-FAMILY: Verdana"><%If Not RScores.eof thencores=(RScores("cor")&"")%><option value="<%=cores%>"><%=cores%></option><%End IfNextElse%><span class="texto">Não há cores cadastradas</span> <%End IfSet RScores = Nothing %></select>

[jrcardozo 4]

você tem que separar os valores e coloca-los em um array, como no exemplo dos códigos que passei pra você ontem

[Carlos Moreira 0]

é o que estou tentando fazer no exemplo acimaa realidade é que nunca mechi com array sou novo nissode uma olhada no código que posteiseria alguma coisa aquicores=(RScores("cor")&"")dentro do código?

[jrcardozo 4]

http://forum.imasters.com.br/index.php?showtopic=225297

[Carlos Moreira 0]

Poxa Johnatan legal o artigo! muito utilaté salvei no FavoritosMas é que estou testando no código acima e só esta dando esse pau que citei acima