webForumDet fria alternativet

Menyloop

ASPur ASP

7 svar · 298 visningar · startad av Asa

Medlem sedan dec. 20011 860 inlägg
Frågan#1

Jag skulle behöva lite hjälp!

Tänkte göra en meny där man lagrar id, uid, namn och länk.

Sen ska man med loopar skriva ut alla länkar på sidan så här:

Mig (id1 - uid 0)
--Ålder (id2 - uid 1)
----22 (id3 - uid 2)
--Bor (id4 - uid 1)
Annat (id5 - uid 0)
--Djur (id6 - uid 1)
----Katt (id7 - uid 6)
------Chips (id8 - uid 7)
Nöje (id9 - uid 0)

Hur ser loopen ut då??

OCh sen skulle jag vilja ha så man klickar på Mig då syns Ålder och Bor som underlänk och om man klickar på Ålder kommer 22 fram!

Jag skulle bli väldigt lycklig om jag fick ett bra exempel på hur man skriver.

Medlem sedan mars 20002 836 inlägg
#2

https://www.tilja.net finns det ngt liknande menysystem.

Ett annat sätt är ju javascript ..... kika i javascriptforumet. Det borde finnas ngt där.

cya,
PatrikB

Medlem sedan dec. 20011 860 inlägg
#3

Nej nej - jag vill inte ha en sådan! Det ska hämta från en databas och skriva ut dem efter det - typ som ett trädforum fast en meny!!

Som denna visar:

Mig (id1 - uid 0)
--Ålder (id2 - uid 1)
----22 (id3 - uid 2)
--Bor (id4 - uid 1)
Annat (id5 - uid 0)
--Djur (id6 - uid 1)
----Katt (id7 - uid 6)
------Chips (id8 - uid 7)
Nöje (id9 - uid 0)

Man ska enkelt kunna lägga till en meny i databasen.

Tänkte även ha det upplagt som en lista!

Medlem sedan dec. 20011 860 inlägg
#4

En liten klurigare sak som jag undrar över är om jag vill ha bilder. Ex streck som är framför.

Meny1
|__Undermeny 1
|__Undermeny 1.1
Meny 2
|__Undermeny 2
|__Undermeny 2.1

Ungefär som jag gjort här ovan!

(Blev inte utskrivet som jag ville - ovan)

Medlem sedan juli 2001514 inlägg
#5

Varför inte ta ut datat från databasen och lägga det i en array.
Och senda därefter loopa ut informationen man behöver....eller har jag fel?

Medlem sedan dec. 20011 860 inlägg
#6

Jag har fått hjälp på ett annat ställe men inte för bilderna!

Medlem sedan mars 20011 346 inlägg
#7

Har du lust att visa oss andra vad du fått för hjälp med lösningen?

Medlem sedan dec. 20011 860 inlägg
#8

<%Function Meny(Conn, HuvudId)
Set RS = Conn.Execute("SELECT * FROM meny WHERE uid = " & HuvudId)
If Not RS.EOF Then
Set ID = RS("id")
Set Namn = RS("namn")
Response.Write "<ul>"
Do Until RS.EOF
Response.Write "<li>"& Id &" - "& Namn &"</li>"
Meny Conn, ID
RS.MoveNext
Loop
Response.Write "</ul>"
End If
RS.Close
End Function

db = Server.MapPath("db/meny.mdb")

Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & db
Meny Conn, 0
Conn.Close%>

139 ms totalt · 3 externa anrop · v20260731065814-full.4bcf49fe
0 ms — hämta forumlista (cache)
0 ms — hämta statistik (cache)
137 ms — hämta tråd, inlägg och bilagor (db)