Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

~= Fidel =~

Repetir Região - Horizontal e Vertical

Recommended Posts

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

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

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

×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.