Avatar billede dr_nielsen Nybegynder
29. april 2002 - 11:54 Der er 11 kommentarer og
1 løsning

threading

Jeg har et problem med at folde nogle 'træer' ud

denne kode virker men folder kun en gren ud, og melder rs.eof:
function Debate(ParentID)
sql = "SELECT * FROM Message where MessageParent = " & ParentID
set rs = conn.execute ( sql )
do while not rs.eof
  response.write rs("MessageContent") & "<br>"
  ParentID = rs("MessageID")
  rs.movenext
  Debate(ParentID)   
loop
end function   

'kald
<%=Debate(0)%>

Hvad går der galt
Avatar billede keysersoze Ekspert
29. april 2002 - 11:58 #1
Avatar billede dr_nielsen Nybegynder
29. april 2002 - 12:04 #2
Den tager også kun første tråd, (som jeg bruger den)
Avatar billede keysersoze Ekspert
29. april 2002 - 12:09 #3
hvad mener du med "tager kun første tråd"? hvis du kigger på din sql har du jo begrænset antallet...

så forklar evt nærmere..
Avatar billede dr_nielsen Nybegynder
29. april 2002 - 12:31 #4
ok, det er et messageboard med flere beskeder og deres svar

det jeg mener er at begge forslag(mit og Dit kun tage besked 1 og tilhørende svar. Herefter fejler den
Avatar billede keysersoze Ekspert
29. april 2002 - 13:05 #5
jeg har brugt det eksempel fra html.dk uden problemer...

hvad kommer der af fejl?
Avatar billede dr_nielsen Nybegynder
29. april 2002 - 13:11 #6
nu kommer der ikke fejl, den skriver kun første besked og tilhørende svar ud

Ikke at det skulle have en effekt, men jeg bruger sql server
Avatar billede keysersoze Ekspert
29. april 2002 - 13:25 #7
og det har ikke noget med at du bruger "MessageParent = " & ParentID" i din sql?
Avatar billede dr_nielsen Nybegynder
29. april 2002 - 13:39 #8
den bruger jeg ikke længere, jeg bruger den du viste, men samme fejl desværre :.
Se her:
dbinit()
sql = "SELECT * FROM Message where MessageEstateID = " & Session("EstateID")
set rs = conn.execute ( sql )

Do while not rs.eof
  arrID = arrID & "," & rs("MessageID")
  arrRE = arrRE & "," & rs("MessageParent")
  arrSU = arrSU & "," & rs("MessageContent")
  arrDATE = arrDATE & "," & rs("MessageCreated") 
  rs.MoveNext
Loop

arrID = Split(arrID,",")
arrRE = Split(arrRE,",")
arrSU = Split(arrSU,",")
arrDATE = Split(arrDATE,",")

dbDone()

Function Threads(intID)   
For m = 1 to Ubound(arrID)
  If Cint(arrRE(m)) = Cint(intID) Then
    Threads = Threads & "<ul><li><span class=""txtsmallGray"">"&arrDATE(m)&" ::</span> <a href=""bb.asp?State=Reply&MessageID=" & arrID(m) & """>" & arrSU(m) & "</a>" & Threads(arrID(m)) & "</li></ul>"   
    End If       
Next
End Function

Response.Write Threads(0)
Avatar billede keysersoze Ekspert
29. april 2002 - 13:49 #9
du har stadig ikke svaret på hvilket fejl der kom...

har du et sted jeg kan se det?
Avatar billede dr_nielsen Nybegynder
29. april 2002 - 14:07 #10
Jo, det er den samme fejl - Ingen, men der skrives kun første besked og svar ud.

Andre beskeder (ID = 0) bliver ikke skrevet.

Jeg har det kun lokalt desværre
Avatar billede keysersoze Ekspert
29. april 2002 - 14:23 #11
hvis det kun er den første besked og tilhørende svar er det ikke scriptets skyld - for det har virket fint for mig
Avatar billede dr_nielsen Nybegynder
29. april 2002 - 14:46 #12
Forstås, har lige testet det med access - tak indtil videre
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester