Jump to content


Photo

Pequeno Sistema De Árvore Temática


  • Faça o login para participar
6 replies to this topic

#1 betonit

betonit

    Normal

  • Usuários
  • 61 posts
  • Sexo:Não informado

Posted 15/04/2004, 10:01

:wacko: Gente,

Estou com um grande problema referente a um relacionamento entre tabelas num bd q estou criando. O sistem funciona +/- envolta de uma arvore de temas (semelhantes a uma arvores de diretorios). Existiria um tema onde dentro deste, existiria outros(n) subtemas e dentro de cada subtemas exisitiria outros(n) subtemas. Cada tema, subtema1 ou subtema2 possuira um ou mais documentos, na realidade um link, onde este podera se repetir entre eles. Gostaria de saber uma maneira eficaz de eu trabalhar neste relacionamentos de forma a evitar mts links q os proprios relacionamentos evitariam.... Vejam abaixo num exemplo de arvore deste sistema.

Árvore do Sistema

1) TEMA
    1.1) SUBTEMA1
    1.2) SUBTEMA1
          1.1.1) SUBTEMA2
          1.1.1) SUBTEMA2
    1.3) SUBTEMA1
2) TEMA
3) TEMA
    3.1) SUBTEMA1
    3.2) SUBTEMA1


Notem q cada tema poderá n ter subtema e seus documentos poderao ficar dispersos nestes. Ja pensei numa solucao q n sei se funcionaria, mas gostaria de saber de vcs alguma q realmente possa ser eficaz neste caso. Utilizarei um bd Access e ASP.

Conto com a ajuda de vcs.
Um abraço!
Carlos Alberto - BNDES - Banco Nacional de Desenv. Econ. e Social

#2 betonit

betonit

    Normal

  • Usuários
  • 61 posts
  • Sexo:Não informado

Posted 20/04/2004, 10:21

??
Carlos Alberto - BNDES - Banco Nacional de Desenv. Econ. e Social

#3 wozniak

wozniak

    Arquiteto de software

  • Usuários
  • 578 posts
  • Sexo:Masculino
  • Localidade:Rio de Janeiro / RJ

Posted 20/04/2004, 10:28

??

mano se ninguém respondeu é pq ninguém sabe ou, ninguém pode, então, não adianta vc apenas postar duas iinterrogações, isso não vai fazer ninguém responder, a não ser um moderador te dando um alerta, então na boa, manera ai

abraços

t+

#4 .:Matrix:.

.:Matrix:.

    12 Horas

  • Usuários
  • 123 posts
  • Sexo:Não informado
  • Localidade:Sampa
  • Interesses:Muitos menos Delphi, PHP e Adjacentes hauahaua

Posted 20/04/2004, 11:13

kra eu não entendi o que você quer saber.

Qual exatamente a sua duvida??

Abraço
Este post é dedicado a Yasmin minha linda filhinha hauhauahau
-----------------------------------------------------------------------
Visite ::: www.destroyers.com.br (onde sou o Fundador hauahua)
-----------------------------------------------------------------------
Se puder ajudar fico grato se naum puder, fico do mesmo jeito, pelo menos leu neh :-D

#5 betonit

betonit

    Normal

  • Usuários
  • 61 posts
  • Sexo:Não informado

Posted 23/04/2004, 11:15

A duvida é de como fazer as tabelas desta arvore dentro do access como seus relacionamentos e como acessa-las com o ASP.
Carlos Alberto - BNDES - Banco Nacional de Desenv. Econ. e Social

#6 Tarkan

Tarkan

    Powered by Linux - Que inglês! ;)

  • Ex-Admins
  • 651 posts
  • Sexo:Masculino
  • Localidade:Copacabana - RJ

Posted 23/04/2004, 12:26

O que você pode fazer, inicialmente é criar 3 tabelas.
Uma dela será a "tbl_tema", que terá um campo auto-numeração, chamado "ID".
Depois, criar outras duas, sendo uma "tbl_nivel_1" e a outra "tbl_nivel_2"

A "tbl_nivel_1" terá um campo chamado "NivelID", com o mesmo valor do "ID" da tabela "tbl_tema" e um campo auto-numeração, chamado "ID".
A "tbl_nivel_2" terá um campo chamado "NivelID" também, com o mesmo valor do "ID" da tabela "tbl_nivel_1".

Até aí, deu pra entender?
Depois, você faz a união das tabelas, aninhando uma consulta com a outra.

Um exemplo de relacionamento, por exemplo, que pode ser alterado:

<%
ConnString = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("bd.mdb")
Set Conexao = Server.CreateObject("ADODB.Connection")
Conexao.Open ConnString

Set rsVerLicao = Conexao.Execute("select * from LICAO order by ID ASC")

If rsVerLicao.EOF = True Then
Response.Write "Nenhuma lição encontrada"
Else
Do Until rsVerLicao.EOF
  Set rsVerModulo = Conexao.Execute("select * from MODULO where CatID=" & rsVerLicao("ID"))
  Set rsVerQuestao = Conexao.Execute("select * from QUESTAO where CatID=" & rsVerLicao("ID"))

  Response.Write "-&nbsp;&nbsp;" & rsVerLicao("Licao") & "<br>"
  Response.Write "&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;" & rsVerModulo("Modulo") & "<br>"
  Response.Write "&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;" & rsVerQuestao("Questao") & "<br>"
  Response.Write "<br><br>"

  rsVerQuestao.Close
  Set rsVerQuestao = Nothing

  rsVerModulo.Close
  Set rsVerModulo = Nothing

rsVerLicao.Movenext
Loop

rsVerLicao.Close
Set rsVerLicao = Nothing
End If

Conexao.Close
Set Conexao = Nothing
%>

Espero que tenha ajudado!
Qualquer coisa, volte a postar!

Abraços!

:D
' nome: gustavo veiga
' profissão: ALOG Data Centers do Brasil (analista de sistemas)
' publicidade: ALOG Data Centers do Brasil

#7 yakko

yakko

    Turista

  • Usuários
  • 37 posts
  • Sexo:Não informado

Posted 23/04/2004, 16:48

ve se isto aqui te ajuda, td bem q eh sqlserver, mas pode te dar uma forca... mesclue o access ao asp

Armazenando estruturas de categoria

http://www.imasters....p?codcoluna=253
[]´s

yakko




1 user(s) are reading this topic

0 membro(s), 1 visitante(s) e 0 membros anônimo(s)

IPB Skin By Virteq