Predmet:Slozi po parent
Cesto puta vam treba meni pa podmeni pa pod meni itd.
Ne samo to. Vidio sam cesto puta da ljudi zbog pripadnosti prave mnostvo tabela i uvijek jedna zafali.
Evo primjer kako to mozete napraviti u jednoj tabeli:
ID | Naziv | Pripadnost |
---|
1 | Glavni meni | |
2 | Podmeni1 | 1 |
3 | Podmeni2 | 1 |
4 | Pod Pod meni1 | 2 |
5 | Stavka U Pod Podmeniju1 | 4 |
6 | Stavka u podmeniju2 | 3 |
7 | Stavka u podmeniju1 | 2 |
8 | sss | 5 |
Zapisiste ovaj kod u neki modul:
PreuzmiIzvorni kôd (Visual Basic):Function Slaganje(ID As Variant) As String
Dim Parentni As Variant
Start:
Parentni = DLookup("Pripadnost", "Tree", "ID=" & ID)
If IsNull(Parentni) Then
GoTo Kraj
Else
Slaganje = Str(Parentni) & "." & Str(ID) & "." & Slaganje
ID = Parentni
GoTo Start
End If
Kraj:
End Functio
n
Zapisite ovaj kod u Query te pokrenite Query koji ce vam napraviti tabelu.
CREATE TABLE Tree(ID AUTOINCREMENT, Naziv TEXT(50), Pripadnost Integer );
Popunite tabelu po zelji po uzoru na gore navedenu.
Zapisiste sledeci Query te ga pokrenite:
PreuzmiIzvorni kôd (SQL):SELECT *
FROM Tree
ORDER BY slaganje(ID);
Podrska samo putem foruma, jer samo tako i ostali imaju koristi od toga.