prøv at forklar hvad det er du ligger i ordene "liste det"? er det selve database udtrækket til (og i så fald hvilken type database) eller er det det at vise dem på siden?
Tja.... Jeg er usikker på hvordan du vil have det udskrevet så jeg udskriver det bare med den struktur jeg tænker på:
---- 'Jeg finder lige parents:
sql1 = "SELECT SiteID FROM IndsaetNavnPaaTabel WHERE SiteID IN (SELECT pID FROM IndsaetNavnPaaTabel)" Set rs1 = dbObj.Execute(sql1) Do while not rs1.EOF Response.Write "<p><h1>"&rs1("SiteID")&"</h1><br>" 'Jeg bruger det fundne siteID til at liste undermenuerne sql2 = "SELECT SiteID FROM IndsaetNavnPaaTabel WHERE SiteID ='"&rs1("SiteID")&"'" Set rs2 = dbObj.Execute(sql2) Do while not rs2.EOF Response.Write "<h2>"&rs2("SIteID")&"</h2><bR>" rs2.MoveNext Loop rs1.MoveNext Loop ----
Syntaksen til netop din db gik vist lidt stærkt men jeg håber at du kan bruge den alligevel. Hvis du bare vil skrive dem ud, kan du jo anvende <ul> og <li> hvis du vil have det lidt pænere. Hvis du vil bruge dem til menuer, så lav de sætninger med Response.Write helt om.
SQL = "SELECT a.siteID , a.pid, a.name " & _ "FROM menutabel a LEFT JOIN menutabel b ON a.siteID = b.pid " & _ "ORDER BY a.siteID, b.pid;" 'åbn dit recordset rs.open sql, connectionsstring '<--- sæt din connection osv. ind her
While rs.EOF = False if rs("pid") = 0 then Response.Write rs("name") & "<br>" else Response.Write "- " & rs("name") & "<br>" end if rs.movenext Wend
Din lister alle sammen på én gang. Det skal den ikke, den skal først vise et under link når man klikker på et hoved link. Du må lige sige til hvis du ikke er med på hvad jeg mener.
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.