---
title: "ASP genererad meny"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/14108-asp-genererad-meny"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "jehander"
published: "2002-01-30T21:16:00.000Z"
updated: "2002-01-31T13:00:00.000Z"
replies: 1
views: 189
page: 1
pages: 1
language: "sv-SE"
site: "webForum — webforum.nu"
rights: "Upphovsrätten till varje inlägg tillhör dess författare."
attribution: "Citera som: webForum, https://www.webforum.nu/amne/asp/14108-asp-genererad-meny"
---

# ASP genererad meny

## #1 — jehander, 2002-01-30T21:16Z

Hej!

Jag har en Meny som genereras med ASP från en databas. Det finns huvudkategorier och sen lägger den till underkategorier!

Mitt problem är nu att jag inte vill att undermenyerna ska synas förrän man trycker på huvudkategorin!

Koden ser ut som följer...

\<%

Session("databas1") = "filedsn=" & Server.MapPath("osterang.dsn") & ";DBQ=" & Server.MapPath("osterang.mdb")&";"

set databas1=server.createobject("adodb.connection")
databas1.open session("databas1")
set RS1 = server.createobject("adodb.recordset")
set RS3 = server.createobject("adodb.recordset")

SQLStmt = "SELECT \* FROM base"
RS1.open SQLStmt, databas1,1

Do until RS1.EOF

if RS1("undersida") = 0 then

\----\> Huvudrubriker

Response.write "\<a href='index.asp?id=" & Rs1("id") & "&meny=" & Rs1("id") & " '\>" & Rs1("meny") & "\</a\>\<br\>"

\----\> Underrubriker

SQLStmt = "SELECT \* FROM base where tillhorighet =" & RS1("id")
RS3.open SQLStmt, databas1,1

Do until RS3.EOF 

Response.write "- \<a href='index.asp?id=" & Rs3("id") & "'\>" & Rs3("meny") & "\</a\>\<br\>"

RS3.movenext

Loop

RS3.close

\----\> Slut på underubriker

end if

Rs1.MoveNext

Loop

RS1.close
databas1.close

%\>

Nån som har ett förslag?

/Anders

Permalänk: https://www.webforum.nu/p/14108

## #2 — brw, 2002-01-31T13:00Z

Denna är väl likvärdig.. prova den:

 <http://cgi.webforum.nu/wf/Forum11/HTML/003142.html>

Permalänk: https://www.webforum.nu/p/308922

---

Tråden på webben: https://www.webforum.nu/amne/asp/14108-asp-genererad-meny