Ir para conteúdo

POWERED BY:

Arquivado

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

mauriciocr

Menu com Submenus

Recommended Posts

<!--#include file="../includes/config.asp"--><table width="165" border="0" cellspacing="0" cellpadding="0"><%ComandoSQL = "select * from menu where CodPai is null order by Titulo" Set RS = Server.CreateObject("ADODB.Recordset")RS.Open ComandoSQL,Conn, 1, 2While Not RS.EOF %> <tr> <td><img src="../img/menu1.jpg" width="165" height="31"></td> </tr> <tr> <td> <table width="165" border="0" cellspacing="0" cellpadding="0"><%Set RS_titulo = Server.CreateObject("ADODB.Recordset")sqlmenu = "select * from menu where CodPai = "&RS("Codigo")&""RS_titulo.Open sqlmenu,Conn, 1, 2While not RS_titulo.EOF%> <tr> <td height="22" class="fundoMenu2">   <a href="interna.asp" class="linkBranco"><%=rs_titulo("titulo")%> </a></td> </tr><%RS_titulo.MoveNextwend%> </table></td> </tr><%rs.movenextwendrs.CloseSet rs = Nothing%> <tr> <td><img src="../img/menu.jpg" width="165" height="31"></td> </tr></table>------------------ INFORMAÇÕES ---------------------------------------O menu é mencionado com o codigo acima , é composto com os seguintes itens:--------------------------Contato-------------------------Corpo Docente------------------------Cursos-----------------------Empresa Junior----------------------Institucional---------------------Ouvidoria----------------------Secretaria Acadêmica-----------------------Vestibular------------------------Bom , este é o MENU , as categoras e cada categoria dessa , tem SUBMENUS ( no banco de dados , tenho TITULO e CODIGOPAIele tem que ficar assim:--------------------------- + Centro Acadêmico |-Histórico |--Infra - Estrutura |--Parcerias |--Horários--------------------------+ Fatec Rio Preto |--Organograma |--Regimento |--Semanatec |--Centro Paula Souza--------------------------+ Semanatec |--Semantec 2006 |--Semanatec 2005--------------------------+ Manuais |----------------------------Alguém poderia me ajudar,desde já eu agradeço a ajuda

Compartilhar este post


Link para o post
Compartilhar em outros sites

Puts, eu também gostaria de saber como se faz isso em ASP.você quer fazer um menu que vem do banco, que são categorias e cada categoria do menu tem subcategorias.O que nós queremos é igual ao a menu do site www.paodeacucar.com.brEu também gostaria de saber como faz isso.Alguém ae pode nos ajudar?

Compartilhar este post


Link para o post
Compartilhar em outros sites

Fiz um código pra ficar mais fácil de entender, más como fazer para aparecer um submenu?

 

Tem que ser igual ao site do www.paodeacucar.com.br

 

<!--#include file="bib_conexao.asp"--><%Dim Conexao, rsCategoria, strSQLstrSQL = "SELECT * FROM Categoria ORDER BY cod_categoria"call abre_conexao'abre conexãoCall abre_conexaoSet rsCategoria = Conexao.Execute(strSQL)%><style type="text/css"><!--.style2 {	font-size: 8pt;	font-family: Verdana, Arial, Helvetica, sans-serif;}body {	margin-left: 0px;	margin-top: 0px;}--></style><table width="141" border="0" cellpadding="0" cellspacing="0">  <!--DWLayoutTable-->  <tr>	<td width="147" height="5"></td>  </tr>  <tr>	<td height="374" valign="top"><table width="135" border="0" align="right" cellpadding="0" cellspacing="0" bordercolor="#CCCCCC">	  <%  While Not rsCategoria.EOF  %>	  <tr>		<td width="57%"><span class="style2"><a href="categoria.asp?cat=<%= rsCategoria("Cod_Categoria")%>" class="menu"><%= rsCategoria("Categoria") %></b></a></span></td>	  </tr>	  <%rsCategoria.MoveNext   Wend   %>	</table></td>  </tr></table><%Call fecha_conexaoSet rsCategoria = Nothing%>

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.