3 Niavuer men kun et ID
http://www.wild-game.dk/test/default.asp?TemplateID=73Jeg har en top menu med links og afhængig af hvilket man trykker på kommer der et nyt Niavu under når man klikker på et af disse kan der også komme et menu punkt i siden, MEN når man klikker på et af disse forsvinder de link der er i niavu 2.
Default.asp
<!--#include file="include/variabler.asp"-->
<html>
<head>
<link href="css/style.css" rel="stylesheet" type="text/css">
</head>
<body leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
<table width="750" height="100%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr class="toplogo">
<td bgcolor="#CCCCCC" height="71"><a href="default.asp"><img src="images/top-logo.gif" border="0"></a></td>
</tr>
<tr class="blue-line">
<td> </td>
</tr>
<tr class="level-1">
<td align="right">
<!--#include file="include/level-1.asp"-->
</td>
</tr>
<tr class="level-2">
<td><!--#include file="include/level-2.asp"--></td>
</tr>
<tr>
<td valign="top">
<table width="100%" height="100%" border="0" cellpadding="0" cellspacing="0">
<tr>
<td valign="top" class="level-3"><!--#include file="include/level-3.asp"--> </td>
<td valign="top" class="content"><!--#include file="include/content.asp"--> </td>
</tr>
</table>
</td>
</tr>
<tr>
<td height="169">
<table width="750" border="0" cellpadding="0" cellspacing="0">
<tr align="center" class="over">
<td height="169" class="koekken"><a href="default.asp?TemplateID=74">KØKKEN</a> </td>
<td height="169" class="farve"><a href="default.asp?TemplateID=78">FARVESHOP</a></td>
<td height="169" class="bjaelke"><a href="default.asp?TemplateID=77">BJÆLKEHYTTER</a></td>
<td height="169" class="laerke"><a href="default.asp?TemplateID=73">LÆRKEVINDUET</a></td>
<td height="169" class="service"><a href="default.asp?TemplateID=80">SERVICE</a></td>
</tr>
</table>
</td>
</tr>
</table>
</body>
</html>
<%
set connect = nothing
%>
Level-1.asp
<%
set rs = connect.Execute("Select * FROM navigation_menu Where NAV_PARENT = 0 AND InMenu = 'Yes' ORDER BY Order_By")
if not rs.EOF then
Do until rs.EOF
If rs("IS_Link") = true then
%>
<a href="<%=rs("Page_Link")%>" target="<%=rs("Page_Target")%>"><%=rs("NAV_TITLE")%></a>
<%
else
%>
<a href="default.asp?TemplateID=<%=rs("NAV_PKEY")%>"><%=rs("NAV_TITLE")%></a>
<%
end if
rs.MoveNext
Loop
else
'Der er ingen menu punkter
end if
%>
Level-2.asp
<%
PageID2 = request.querystring("TemplateID")
set rs = connect.Execute("Select * from navigation_menu where NAV_PARENT = "&PageID2&" AND InMenu = 'Yes' AND NIAVU = 2")
if not rs.EOF then
Do until rs.EOF
Session("PageID2") = PageID2
PageID2 = PageID2
rs.MoveNext
Loop
else
PageID2 = Session("PageID2")
end if
SQL = "Select * From navigation_menu where NAV_PKEY = "&request.querystring("TemplateID")&" "
Set rs = Connect.Execute(SQL)
If rs("NAV_PARENT") = Cint(Session("PageID2")) OR rs("NAV_PKEY") = Cint(Session("PageID2")) Then
Else
PageID2 = 0
End If
SQL = "Select * from navigation_menu where NAV_PARENT = "&PageID2&" AND InMenu = 'Yes' AND NIAVU = 2 ORDER BY Order_By"
Set rs = Connect.Execute(SQL)
if not rs.EOF then
Do until rs.EOF
If rs("IS_Link") = true then
%>
<a href="<%=rs("Page_Link")%>" target="<%=rs("Page_Target")%>"><%=rs("NAV_TITLE")%></a>
<%
else
%>
<a href="default.asp?TemplateID=<%=rs("NAV_PKEY")%>"><%=rs("NAV_TITLE")%></a>
<%
end if
rs.MoveNext
Loop
else
%>
<%
end if
'rs.close
'set rs = nothing
%>
Level3.asp
<%
PageID3 = request.querystring("TemplateID")
set rs = connect.Execute("Select * from navigation_menu where NAV_PARENT = "&PageID3&" AND InMenu = 'Yes' AND NIAVU = 3 ")
if not rs.EOF then
Do until rs.EOF
Session("PageID3") = PageID3
PageID3 = PageID3
rs.MoveNext
Loop
else
PageID3 = Session("PageID3")
end if
SQL = "Select * From navigation_menu where NAV_PKEY = "&request.querystring("TemplateID")&" "
Set rs = Connect.Execute(SQL)
If rs("NAV_PARENT") = Cint(Session("PageID3")) OR rs("NAV_PKEY") = Cint(Session("PageID3")) Then
Else
PageID3 = 0
End If
SQL = "Select * from navigation_menu where NAV_PARENT = "&PageID3&" AND InMenu = 'Yes' AND NIAVU = 3 ORDER BY Order_By"
Set rs = Connect.Execute(SQL)
if not rs.EOF then
Do until rs.EOF
If rs("IS_Link") = true then
%>
<a href="<%=rs("Page_Link")%>" target="<%=rs("Page_Target")%>"><%=rs("NAV_TITLE")%></a><br>
<%
else
%>
<a href="default.asp?TemplateID=<%=rs("NAV_PKEY")%>"><%=rs("NAV_TITLE")%></a><br>
<%
end if
rs.MoveNext
Loop
else
%>
<%
end if
'rs.close
'set rs = nothing
%>
Hvordan retter jeg lige det når jeg max må have en variabel på min Querystring ??
