---
title: "Meny"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/43462-meny"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "danielpetersson"
published: "2002-05-10T11:29:45.000Z"
updated: "2002-05-10T15:24:38.000Z"
replies: 1
views: 220
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/43462-meny"
---

# Meny

## #1 — danielpetersson, 2002-05-10T11:29Z

Hej!

Jag hade tänkt med en databas bestående av två tabeller, huvudgrupp och varugrupp, presentera en meny. Menyn ska vara uppbyggd så att man ser huvudgrupperna i menyn och sedan om man klickar på huvudgruppen så ska varugrupperna med relation till denna huvudgrupp visas. Jag har börjat med att läsa in huvudgruppens och varugruppens recordset i vektorer. Jag klarar utan problem att skriva ut bara huvudgrupperna, men hur tusan gör jag för att presentera varugrupperna när man trycker på huvudgruppen?

If Not hgrRs.EOF Then
    arrHgr = hgrRs.GetRows()
End If
If Not vgrRs.EOF Then
    arrVgr = vgrRs.GetRows()
End If

Response.Write "\<OL\>"
For i = 0 TO UBound(arrHgr,2)
Response.Write "\<LI\>" & arrHgr(1,i)
next
Response.Write "\</OL\>"

Jag måste väl skriva \<LI onClick="?"\>
Men hur ska denna funtionen se ut?

Någon som har förslag på hur man bäst löser detta?

Tacksam för svar

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

## #2 — danielpetersson, 2002-05-10T15:24Z

Har försökt skriva så här nu:
Response.Write "\<OL\>"

For i = 0 TO UBound(arrHgr,2)
if arrHgr(1,i) \<\> "Borttagen varugrupp" then
dim tempHgr 
tempHgr = arrHgr(1,i)
Response.Write "\<LI\>" & tempHgr
else
tempHgr = 0
end if
For j = 1 TO Ubound(arrVgr, 2)
Response.Write "\<UL\>"
if arrVgr(2,j) = tempHgr and tempHgr \<\> 0 then
dim tempVgr 
tempVgr = arrVgr(1,j)
Response.Write "\<LI\>" & tempVgr & "\</LI\>"
else
'varugruppen tillhör inte denna huvudgruppen
end if
next
Response.Write "\</UL\>"	
next
Response.Write "\</OL\>"

Det som händer nu är att webläsaren bara står och laddar. Någon som har ngt förslag?

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

---

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