Tjek om der er poster under en hovegruppe

Hejsa

Har en lille sag, har en db hvor der er nogle hovedpunkter og under denne har nogle af disse nogle underpunkter. Hovedpunkter er deklareret med værdien 0 i tabelenne menu_parent. Såfremt det er en undergruppe er den deklareret med en værdi højere end 0 i samme tabel. Såfremt der ikke er nogle underpunkter under et hovedpunkt skal den udskrive et link, ellers skal den udskrive (som angivet forneden i koden):

aI("text=<%=objRS("menu_short")%>;showmenu=<%=objRS("menu_short")%>;");

Kode er som følger:

strSQL = "SELECT *  FROM menustruktur WHERE menu_Parent=0 ORDER BY menu_zorder"

Set objRS = Server.CreateObject("ADODB.Recordset")
objRS.Open strSQL, objConn, adOpenStatic, adLockReadOnly, adCmdText
If Not objRS.EOF Then
    objRS.MoveFirst
    Do While Not objRS.EOF
        %>

aI("text=<%=objRS("menu_short")%>;showmenu=<%=objRS("menu_short")%>;");
<%
        objRS.MoveNext
    Loop
End If
objRS.Close
Set objRS = Nothing
%>

Håber der er nogle der kan hjælpe på en søndag :)