point til nitro - og tak for hjælpen

se hvor fint det virker :::


<!-- #include file="frontglobal.asp"--><%
<!-- #include file="include/tegn.asp"-->


set menurs=server.createobject("ADODB.recordset")

menuSQL="select * from menupunkter"
menurs.open menusql, conn, 3, 3

set spec_menurs=server.createobject("adodb.recordset")
spec_menuSQL="select * from sider where menupunkt="&menupunkt&" and level=0 order by id"
spec_menurs.open spec_menuSQL, conn, 3, 3


do until spec_menurs.eof or spec_menurs.bof
set this_spec_menu_rs=server.createobject("adodb.recordset")
this_spec_menu_SQL="select id from sider where menupunkt="&spec_menurs("menupunkt")
this_spec_menu_rs.open this_spec_menu_SQL, conn, 3, 3

menu = spec_menurs("titel")





If CInt(spec_menurs("id")) = CInt(0 & Request.Querystring("id")) Then
  menu = "<b>"&menu&"</b>"
Else
  menu = menu
End If

 
%>
<a class="menu" href="default.asp?p_id=<%=menupunkt%>&w_id=2&id=<%=spec_menurs("id")%>"><%=menu%></a>
&nbsp;

<%
spec_menurs.movenext
loop
%>