~= Fidel =~ 0 Denunciar post Postado Junho 28, 2012 Possuo uma tabela TB_Departamentos (Departamento_ID) e TB_Unidades (unidade_ID - chave prim. e Departamento_ID chave estrang.). Não consigo listar dentro de cada Tabela Departamento suas unidades conforme a primeira coluna, conforme exemplo abaixo... MCR....................MCJ...................MCB...................MCS...................MCD...................MCI (departamentos) - MCRE - MCRE01 - MCRI - MCRS - MCRS01 - MCRS02 - MCRV - MCRV01 - MCRV02 Gostaria de um HELP dos senhores, abaixo segue código.... Abraço a todos... <%@LANGUAGE="VBSCRIPT"%> <!--#include file="Connections/cnx.asp" --> <% Dim RsDepto Dim RsDepto_cmd Dim RsDepto_numRows Set RsDepto_cmd = Server.CreateObject ("ADODB.Command") RsDepto_cmd.ActiveConnection = MM_cnx_STRING RsDepto_cmd.CommandText = "SELECT * FROM TB_Departamentos" RsDepto_cmd.Prepared = true Set RsDepto = RsDepto_cmd.Execute RsDepto_numRows = 0 %> <% Dim rsDivisao__MMColParam rsDivisao__MMColParam = "1" If (Request("MM_EmptyValue") <> "") Then rsDivisao__MMColParam = Request("MM_EmptyValue") End If %> <% Dim rsDivisao Dim rsDivisao_cmd Dim rsDivisao_numRows Set rsDivisao_cmd = Server.CreateObject ("ADODB.Command") rsDivisao_cmd.ActiveConnection = MM_cnx_STRING rsDivisao_cmd.CommandText = "SELECT * FROM TB_Unidades WHERE departamento_ID = ?" rsDivisao_cmd.Prepared = true rsDivisao_cmd.Parameters.Append rsDivisao_cmd.CreateParameter("param1", 5, 1, -1, rsDivisao__MMColParam) ' adDouble Set rsDivisao = rsDivisao_cmd.Execute rsDivisao_numRows = 0 %> <% Dim Repeat1__numRows Dim Repeat1__index Repeat1__numRows = -1 Repeat1__index = 0 rsDivisao_numRows = rsDivisao_numRows + Repeat1__numRows %> <% Dim HLooper1__numRows HLooper1__numRows = -8 Dim HLooper1__index HLooper1__index = 0 RsDepto_numRows = RsDepto_numRows + HLooper1__numRows %> <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"> <html xmlns="http://www.w3.org/1999/xhtml"> <head> <meta http-equiv="Content-Type" content="text/html; charset=utf-8" /> <title>Documento sem título</title> <link href="sty.css" rel="stylesheet" type="text/css" /> <style type="text/css"> body { margin-left: 0px; margin-top: 0px; margin-right: 0px; margin-bottom: 0px; } </style> </head> <body> <p> </p> <table width="310"> <% startrw = 0 endrw = HLooper1__index numberColumns = 8 numrows = -1 while((numrows <> 0) AND (Not RsDepto.EOF)) startrw = endrw + 1 endrw = endrw + numberColumns %> <tr align="center" valign="top"> <% While ((startrw <= endrw) AND (Not RsDepto.EOF)) %> <td><table width="116%"> <tr> <td bgcolor="#CCCCCC" class="Titulo_14_Azul"><%=(RsDepto.Fields.Item("departamento_Sigla").Value)%></td> </tr> <tr> <td bgcolor="#CCCCCC"><% While ((Repeat1__numRows <> 0) AND (NOT rsDivisao.EOF) ) %> <div align="left"><span class="Label_14_Preto_SemSerifa">- <%=(rsDivisao.Fields.Item("unidade_sigla").Value)%></span><br /> </div> <% Repeat1__index=Repeat1__index+1 Repeat1__numRows=Repeat1__numRows-1 rsDivisao.MoveNext() Wend %></td> </tr> <tr> <td bgcolor="#CCCCCC"> </td> </tr> </table></td> <% startrw = startrw + 1 RsDepto.MoveNext() Wend %> </tr> <% numrows=numrows-1 Wend %> </table> <p> </p> </body> </html> <% RsDepto.Close() Set RsDepto = Nothing %> <% rsDivisao.Close() Set rsDivisao = Nothing %> Compartilhar este post Link para o post Compartilhar em outros sites
Vitor Ferrari 1 Denunciar post Postado Junho 28, 2012 Aconselho que você apague a tabela já feita, e no dreamweaver vá até: Insert > Data > Dynamic Data > Dynamic Table, ele vai montar a tabela e o repeat region de maneria simples, rapida e na horizontal, depois você só adciona uma class e coloque seu CSS. Se essa não foi sua Dúvida me avise :grin: . Compartilhar este post Link para o post Compartilhar em outros sites
~= Fidel =~ 0 Denunciar post Postado Junho 29, 2012 Aconselho que você apague a tabela já feita, e no dreamweaver vá até: Insert > Data > Dynamic Data > Dynamic Table, ele vai montar a tabela e o repeat region de maneria simples, rapida e na horizontal, depois você só adciona uma class e coloque seu CSS. Se essa não foi sua Dúvida me avise :grin: . OK, vou tentar, valeww Vitão!!! Compartilhar este post Link para o post Compartilhar em outros sites
morpheus 0 Denunciar post Postado Julho 5, 2012 Acho que voce esta querendo listar cada departamento numa tabela e em cada uma dessas tabelas as unidades certo? Compartilhar este post Link para o post Compartilhar em outros sites