Ir para conteúdo

POWERED BY:

Arquivado

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

acwill

Problema

Recommended Posts

pessoal, tenho q fazer no seguite código com q essas categorias e subcategorias sejam distribuidas em tabelas para q fiquem dispostas desta forma:

 

Categoria 1                                                          Categoria 2sub 1, sub1, sub1                                                sub2, sub 2, sub2Categoria 3                                                          Categoria 4sub 3, sub3, sub3                                                sub4, sub4, sub4

ppreciso fazer isso nete codigo:

 

<%

Dim conexao

Dim rs

Dim rs2

Dim acao

Set conexao = Server.CreateObject("ADODB.Connection")

conexao.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("bd.mdb")

Set rs = Server.CreateObject("ADODB.Recordset")

Set rs2 = rs

 

acao = "SELECT artigos_categorias.categoria, artigos_categorias.id FROM artigos_categorias;"

Rs.Open acao, conexao

 

do While not Rs.EOF

 

Response.Write Rs("categoria") & "<br><br>"

 

 

 

categoria = Rs("id")

Set Rs2 = conexao.Execute("select artigos_subcategorias.subcategoria, artigos_subcategorias.categoria From artigos_subcategorias WHERE categoria = " & categoria )

 

do while not rs2.eof

 

response.write Rs2("subcategoria") & ", <br>"

 

rs2.movenext

 

loop

 

Rs.Movenext

loop

 

rs2.Close

Set rs2 = nothing

 

rs.Close

Set rs = Nothing

Set conexao = Nothing

%>

Compartilhar este post


Link para o post
Compartilhar em outros sites

é o seguinte, eu tenho categoria e subcategorias,

 

fazer com que fique desta forma é fácil:

 

 

categoria1

subcategoria de 1, subcategoria de 1, subcategoria de 1...

 

 

categoria2

subcategoria de 2, subcategoria de 2, subcategoria de 2...

 

 

categoria3

subcategoria de 3, subcategoria de 3, subcategoria de 3...

 

 

categoria4

subcategoria de 4, subcategoria de 4, subcategoria de 4...

 

 

mas eu queria que ficasse disposto da seguinte maneira:

 

Categoria 1                                                          Categoria 2sub 1, sub1, sub1                                                sub2, sub 2, sub2Categoria 3                                                          Categoria 4sub 3, sub3, sub3                                                sub4, sub4, sub4

porém utilizando este script:

 

<%

Dim conexao

Dim rs

Dim rs2

Dim acao

Set conexao = Server.CreateObject("ADODB.Connection")

conexao.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("bd.mdb")

Set rs = Server.CreateObject("ADODB.Recordset")

Set rs2 = rs

 

acao = "SELECT artigos_categorias.categoria, artigos_categorias.id FROM artigos_categorias;"

Rs.Open acao, conexao

 

do While not Rs.EOF

 

Response.Write Rs("categoria") & "<br><br>"

 

 

 

categoria = Rs("id")

Set Rs2 = conexao.Execute("select artigos_subcategorias.subcategoria, artigos_subcategorias.categoria From artigos_subcategorias WHERE categoria = " & categoria )

 

do while not rs2.eof

 

response.write Rs2("subcategoria") & ", <br>"

 

rs2.movenext

 

loop

 

Rs.Movenext

loop

 

rs2.Close

Set rs2 = nothing

 

rs.Close

Set rs = Nothing

Set conexao = Nothing

%>

 

 

 

é isso.

Compartilhar este post


Link para o post
Compartilhar em outros sites

Não li o tópico todo, ta tarde e to com preguiça.... hehehehe.. To zuando...Mas..Resolvi um problema de sub categoria quando quis fazer o meu forum parecido com o sistema desse aqui. Subforuns.Na tabela foruns fiz assim:ForIDCategoriaForumDescriçãoSubforumDataHoraDeu para ter uma noção, né? Você cria um forum bonitinho com a categoria e os caraio a quatro. Quando você quiser colocar um sub forum Cria o forum bonitinho tb com sua categoria e descrição. E em subforum coloca o nome do forum que você quer como sub forum.Se você quiser listar todas as subcategorias de sua categoria. Agora se você for fazer de outro jeito. faça outra tabela indicando tipo:ForIDCategoriaForumDescriçãoSubforumSubforumNumeroDataHoraAli você coloca o forum e o numero. 1, 2, 3... E pega la no ASP.Sacou??Abraços...

Compartilhar este post


Link para o post
Compartilhar em outros sites

Eu fiz algo parecido ... infelizmente naum tenho o codigo aqui mas ai vai a logica ....crie um campo na tabela de categoria e subcategoria eu chamei de pare insira uma altonumeraçao nele e ai faça com que os numeros pares fique de um lado e os impares fique do outro o calculo de par e impar é que naum me lembro mas deve ser algo assim Numero / 2 = num = PARnumero / 2 = num,5 = Imparbom espero ter ajudado[/`s<%= Armando Ferraz Santos %>

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.