[Resolvido] Problemas com "Loop ou Repeat Region" em SELE

Depois do inner join, coloca o group by, assim irá agrupar os registros por algum parametro que eles tenham em comum

Pois é Vinícius, eu já havia tentado o GROUP BY mas não deu certo. Mesmo assim agradeço a tentativa! O meu caso está mesmo na questão do loop ou repeat region, tanto que se eu fizer apenas um loop o Menu e os Submenus vêm listados corretamentes com uma linha de Sessão e abaixo as subsessões correspondentes. Mas quando vou gerar o loop da 2ª sessão em diante aí dá um retorno de listagem que não quero.

Vou ficar aguardando uma outra ajuda ou sugestão, mas valeu!

Tentou fazendo assim:

sql= "select * from sessao"
....
...

sql2="select * from subsessao where codid ='"&rs("id")&"'"
...

A ideia seria mais ou menos essa, tenho algumas estruturas montadas assim, mas onde estou agora não tenho como postar um exemplo que esteja funcionando, mas caso precise, mais tarde posso postar.

Tentei montar conforme sua sugestão e não deu certo Vinícius. Mas eu pelo menos aproveitei a sua ideia de dois SQLs e então montei com dois RecordSets (RSmenu e RSsubmenu), sendo:

**RSmenu** com o select: "**SELECT * FROM sessoes**"

**RSsubmenu** com o select: "**SELECT * FROM subsessoes WHERE cod_id ='"&RSmenu("id")&"'**"

Sendo assim eu mudei a programação do Loop trabalhando com o Do While/Loop como se segue abaixo:

<%
Do While Not RSmenu.EOF

 Response.Write "<tr><td>"
 Response.Write "<b>"&RSmenu("sessao")&"</b>"
 Response.Write "</td></tr>"

 If Not RSsubmenu.EOF Then
 Response.Write "<tr><td>"

 Do While Not RSsubmenu.EOF
 Response.Write "[+] "&RSsubmenu("subsessao")
 Response.Write "<br>"
 RSsubmenu.MoveNext
 Loop

 Response.Write "</td></tr>"
 Response.Write "<tr><td><img src='linha.gif'/></td></tr>"
 End If

 RSmenu.MoveNext
 Loop

Com esse código aí quase deu certo, agora só precisamos fazer com que as "sessoes" que se seguem no Loop busquem suas respectivas "subssessoes". Na imagem abaixo dá pra você ter uma idéia de como ficou agora:

/applications/core/interface/imageproxy/imageproxy.php?img=http://www.hdwd.com.br/gif/menuLOOP.gif&key=c4a5a54f78dda866f9a0b97296d9de18c840c27de3a06aa41d425a6d9bf0c470" alt="menuLOOP.gif" />

Ou seja, a Sessão "Acessórios" está puxando suas respectivas Subsessões porém as Sessões "Musculação", "Cardiovascular" e "Esportes" não o estão fazendo. Porque será? O quê será que precisamos mudar no Loop para dar certo?

Acho que estamos quase lá!

Uhuuuul!!! Consegui Vinícius... quebrei um bocado a cabeça aqui mas consegui montar o Loop perfeito. O quê fiz dessa vez foi montar de acordo com a sua instrução inicial. Eu não estava colocando o SQL dentro do Loop... esse era o problema. E o pior de tudo é que você já havia me passado a dica da sintaxe correta, mas eu deixei passar.

Bom, agora o meu código com o Menu Dinâmico funcionando ficou assim:

1) Eu tenho um SQL (com outro nome) mas que SETa o RSmenu com o select: "SELECT * FROM sessoes"

2) Eu tenho o SQL que fica dentro do Loop e SETa o RSsubmenu com o select: "SELECT * FROM subsessoes WHERE cod_id ='"&RSmenu("id")&"'"

<%
Do While Not RSmenu.EOF

Response.Write "<tr><td>"
Response.Write "<b>"&RSmenu("sessao")&"</b>"
Response.Write "</td></tr>"

 SQL = "SELECT * FROM subsessoes WHERE cod_id ='"&RSmenu("id")&"'"
 Set RSsubmenu = conexao.execute(SQL)

	If Not RSsubmenu.EOF Then
 Response.Write "<tr><td>"
 Do While Not RSsubmenu.EOF
 Response.Write "[+] "&RSsubmenu("subsessao")
 Response.Write "<br>"
 RSsubmenu.MoveNext
 Loop
 Response.Write "</td></tr>"
 Response.Write "<tr><td><img src='linha.gif'/></td></tr>"
	End If

RSmenu.MoveNext
Loop
%>

Agora o meu Menu Dinâmico está funcionando perfeitamente e ficou assim:

/applications/core/interface/imageproxy/imageproxy.php?img=http://www.hdwd.com.br/gif/menuOK.gif&key=db352af47c7b5f9d2f6e59966db45dcd9506a4188e7968048d0da440ce1433e6" alt="menuOK.gif" />

Valeu pela ajuda Vinícius e podem postar este tópico como RESOLVIDO!!!

Que bom que resolveu !

Precisando, estamos ai :joia: