Änderung deer Strings welche dynamisch erzuegt wurden auf allen Seiten
This commit is contained in:
@@ -102,33 +102,33 @@
|
||||
<%
|
||||
For Each nav As cNavigation In navigation
|
||||
%>
|
||||
<li><a class="menu_01_link" href="<%Response.Write(navParent)%>?menuID=<%Response.Write(nav.id)%>&lan=<%Response.Write(laenderkuerzel) %>"><%= IIf(nav.bezeichnung <> "", nav.bezeichnung, "XXX") %></a>
|
||||
<li><a class="menu_01_link" href="<%Response.Write(navParent)%>?menuID=<%Response.Write(nav.id)%>&lan=<%Response.Write(laenderkuerzel) %>"><%Response.Write(IIf(nav.bezeichnung <> "", nav.bezeichnung, "XXX")) %></a>
|
||||
<% If nav.subnavigation.Count>0 then %>
|
||||
<div class="menu_01">
|
||||
<% If nav.slogan <> "" Then%>
|
||||
<%Response.Write("<div class='menu_slogan'>" & nav.slogan & "</div>")%>
|
||||
<% End If %>
|
||||
<% If nav.menu_logo <> "" Then %>
|
||||
<%="<div class='menu_logo'><img src='" & nav.menu_logo & "'/></div>"%>
|
||||
<%Response.Write("<div class='menu_logo'><img src='" & nav.menu_logo & "'/></div>")%>
|
||||
<% End If %>
|
||||
<ul>
|
||||
<%
|
||||
For Each nav2 As cNavigation In nav.subnavigation%>
|
||||
|
||||
<li><a href="<%Response.Write(navParent)%>?menuID=<%= nav2.id%>&lan=<%= laenderkuerzel %>"><%= nav2.bezeichnung %></a>
|
||||
<li><a href="<%Response.Write(navParent)%>?menuID=<%Response.Write(nav2.id)%>&lan=<%Response.Write(laenderkuerzel) %>"><%Response.Write(nav2.bezeichnung)%></a>
|
||||
<div class="menu_02">
|
||||
<table>
|
||||
<tr>
|
||||
<%
|
||||
Dim cells = 0
|
||||
If nav2.subnavigation.Count > 0 Then
|
||||
For Each nav3 As cNavigation In nav2.subnavigation
|
||||
If cells >= 3 Then
|
||||
Dim cells = 0
|
||||
If nav2.subnavigation.Count > 0 Then
|
||||
For Each nav3 As cNavigation In nav2.subnavigation
|
||||
If cells >= 3 Then
|
||||
%></tr><tr>
|
||||
<% cells = 0
|
||||
End If
|
||||
End If
|
||||
%>
|
||||
<td><a href="<%Response.Write(navParent)%>?menuID=<%= nav3.id%>&lan=<%= laenderkuerzel %>"><%= nav3.bezeichnung %></a></td>
|
||||
<td><a href="<%Response.Write(navParent)%>?menuID=<%Response.Write(nav3.id)%>&lan=<%Response.Write(laenderkuerzel) %>"><%Response.Write(nav3.bezeichnung) %></a></td>
|
||||
<% cells += 1
|
||||
Next
|
||||
End If%>
|
||||
|
||||
Reference in New Issue
Block a user