Vis emner i aktiv kategori.

Eks.:

Ingen valgt

Menupunkt 1
Menupunkt 2
Menupunkt 3
Menupunkt 4

Valgt

Menupunkt 1
Menupunkt 2
- Underpunkt 1
- Underpunkt 2
- Underpunkt 3
Menupunkt 3
Menupunkt 4

Håber det kan forklare det lidt bedre.

hvad med noget i stilen af:

<%
str = Henvisning til din database

set rs = server.createObject("adodb.connection")
rs.open str

if request.querystring("id") <> "" then
sqlUnder = "select * from tabel2 where ParentID = " request.querystring("id")
set rs2 = server.createObject("adodb.connection")
rs2.open str
set rs2 = rs2.execute(sqlUnder)
end if
sql = "select * from tabel1"
set rs = rs.execute(sql)

while not rs.eof
if request.querystring("id") = rs.fields("id") then
response.write <a href='dinside.asp?id=" & rs.fields("id") & "'>" & rs.fields("menupunkt")
while not rs2.eof
response.write <a href='" & rs2.fields("side") & "'>- " & rs2.fields("underpunkt")
rs2.movenext
wend
else
response.write <a href='dinside.asp?id=" & rs.fields("id") & "'>" & rs.fields("menupunkt")
rs.movenext
wend
%>

Noget i den stil...
Så skal du selv tilpasse tabelnavnene, databaseforbindelse, og feltnavnene i databasen...
Håber det er forståeligt...!

dinside.asp er den side du arbejder på...

rs2.fields("side") er det felt i databasen hvor du har defineret hvilken side der skal sendes videre til når der trykkes på et link...

Hej Ellebaek,

Jeg tager lige et kig på det.

MVH
Wolfgang

Hej du...

Har du fundet ud af noget ?

Wolfgang ?

Hej Ellebaek,

Beklager den lange svartid.

Jeg får følgende fejl:
Der opstod en Microsoft VBScript-kompileringsfejl (0x800A0401)
Slut på sætning var ventet
/webshop/default.asp, line 55, column 58
sqlUnder = "select * from tbl_SubCategory where CatID = " Request.QueryString("CatID") ""

Håber det kan hjælpe.

MVH
Wolfgang

sqlUnder skal rettes til dette..!

sqlUnder = "select * from tbl_SubCategory where CatID = & " request.querystring("id")

Hej Ellebaek,

Nu har jeg rettet koden til og færdiggjort koden.

Jeg er sgu ked af det, men det giver slet ikke det ønskede resultat.
Der bliver godt nok skrevet links ud, men der hentes ingen underpunkter mv.

MVH
Wolfgang

kan jeg se din side et sted ?

Hej,

Jeg skal nok skynde mig at finde et sted hvor du kan se den.

MVH
Wolfgang

sqlunder skulle se ud som:

sqlUnder = "select * from tbl_SubCategory where CatID = " & request.querystring("id")

Ved ikke om du rettede den til det... og ikke det jeg skrev..!

Hej ellebaek,

Efter nogen tilretning har jeg fundet noget der kunne bruges :D

Tak for din hjælp og ihærdighed.

MVH
Wolfgang

Anytime

Takker for points..
..Ellebæk!