Smyth

Obrigado pela ajuda Rafael, funcionou na perfeição! Fica aqui o código (resumido), pode eventualmente ajudar outro pessoal: connSTR = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.Mappath("../../db/bd.mdb") & ";Persist Security Info=False" set rsItems = Server.CreateObject("ADODB.Recordset") rsItems.ActiveConnection = connSTR rsItems.Source = "SELECT DISTINCT parent FROM tabela" rsItems.Open() If rsItems.EOF Then Response.write "Não há dados" else Do Until rsItems.EOF response.write "<table><tr><td> & rsItems.Fields.Item("parent").Value & "</td></tr>" parent = rsItems.Fields.Item("parent").Value set rsItems2 = Server.CreateObject("ADODB.Recordset") rsItems2.ActiveConnection = connSTR rsItems2.Source = "SELECT * FROM tabela WHERE parent='" & parent & "'" rsItems2.Open() Do Until rsItems2.EOF response.write "<tr><td>" & rsItems2.Fields.Item("child").Value & "</td></tr>" rsItems2.MoveNext Loop rsItems2.Close rsItems2=null response.write "</table><br>" rsItems.MoveNext Loop end if rsItems.Close rsItems=null Cumptos. Smyth

Alguém me pode ajudar? Tenho vários registos num base de dados e quero quero agrupá-los numa tabela da página, de forma que em vez de aparecer: Parent 1 Child 1 Parent 1 Child 2 Parent 1 Child 3 Parent 2 Child 1 Parent 2 Child 2 Parent 2 Child 3 Parent 3 Child 1 Parent 3 Child 2 Parent 3 Child 3 apareça assim: Parent 1 Child 1 Child 2 Child 3 Parent 2 Child 1 Child 2 Child 3 Parent 3 Child 1 Child 2 Child 3 Qualquer ajuda será apreciada! Muito obrigado! Smyth