webForumDet fria alternativet

Trädstruktur på forum, rekursiva funktioner kanske ??

ASP

2 svar · 255 visningar · startad av ulf_kurt

Medlem sedan jan. 200615 inlägg
Frågan#1

Hejsan!

Mitt första inlägg!

Jag försöker göra ett forum av typen trädstruktur, där man kan besvara både den ursprungliga tråden och även svara på svaren om man säger så. :)

Och jag har kört fast. Tror att man behöver använda rekursiva funktioner för att lösa detta men jag kör fast på hur jag ska loopa recordseten. Är det någon här som har erfarenhet av att skapa den här typen av forum/gästbok med ASP.

Om jag ska försöka visa strukturen skulle det vara något liknande detta:

Hej på er
---sv. Hej på er
---sv. Hej på er
------sv.sv Hej på er
------sv.sv Hej på er
---sv. Hej på er
Ett till inlägg
---sv. Ett till inlägg

Hoppas på hjälp för jag har kört fast!! :(

mvh Ulf

Medlem sedan apr. 20003 174 inlägg
#2

Glutta lite på svaren i den här tråden, någon idé kanske dyker upp. :)

http://www.webforum.nu/showthread.php?s=&postid=936671

Medlem sedan jan. 200615 inlägg
#3

Hejsan!

Och tack för svaret.

Jag hittade en kod här i forumet som fungerar som det är tänkt

Sub ListMessages(ParentID,Indent)
dim rs
set rs=dbCon.execute("SELECT * FROM tbl_mess WHERE m_parent_id=" & ParentID)
do until rs.eof
response.write ("<tr><td valign='bottom'>")
for i=0 to Indent-1
response.write "    "
next
if (rs("m_parent_id")=0) then
response.write ("<br>")
end if
%>
<a href="#"><%=rs("m_mess")%></a></td><td valign="bottom"><a href="#"><%= rs("m_author") %></a>
<%
response.write ("</td><td valign='bottom'>" & rs("m_time") &"</td></tr>")
ListMessages rs("m_id"),Indent+1
rs.movenext
loop
End Sub

Men jag är lite osäker. Måste man inte stänga varje recordset. Men det kanske man inte behöver :q

266 ms totalt · 4 externa anrop · v20260731065814-full.1dc6f849
139 ms — deklarationer (db)
0 ms — hämta statistik (cache)
124 ms — hämta tråd, inlägg och bilagor (db)
123 ms — ändringar (db)