Files
VERAG_Homepage/navigation_Julius.aspx

205 lines
11 KiB
Plaintext

<head>
<title> VERAG Spedition AG Navigation new</title>
<meta http-equiv="Content-Type" content="text/html; charset=UTF-8"/>
<!-- Bootstrap -->
<html lang="en">
<!-- Required meta tags -->
<meta charset="utf-8"/>
<meta name="viewport" content="width=device-width, initial-scale=1">
<!-- Bootstrap CSS -->
<link href="https://cdn.jsdelivr.net/npm/bootstrap@5.0.2/dist/css/bootstrap.min.css" rel="stylesheet" integrity="sha384-EVSTQN3/azprG1Anm3QDgpJLIm9Nao0Yz1ztcQTwFspd3yD65VohhpuuCOmLASjC" crossorigin="anonymous">
<link rel="stylesheet" href="https://unpkg.com/bootstrap-table@1.18.3/dist/bootstrap-table.min.css">
<!-- Bootstrap CSS -->
<link href="https://cdn.jsdelivr.net/npm/bootstrap@5.0.2/dist/css/bootstrap.min.css" rel="stylesheet" integrity="sha384-EVSTQN3/azprG1Anm3QDgpJLIm9Nao0Yz1ztcQTwFspd3yD65VohhpuuCOmLASjC" crossorigin="anonymous">
<link rel="stylesheet" href="https://unpkg.com/bootstrap-table@1.18.3/dist/bootstrap-table.min.css">
<style>
/*Button Dropdown Menue Language Picker*/
.dropbtn {
background-color: #fff;
left: 60%;
right: auto;
width: 100px;
height: 20%;
position: relative;
color: #043381;
padding: 0px;
font-size: 16px;
border: none;
z-index:512;
}
/* Dropdown Content (Hidden by Default) */
.dropdown-content {
display: none;
position: relative;
left: 60%;
color:#043381;
background-color: white;
min-width: 160px;
box-shadow: 0px 8px 16px 0px rgba(0,0,0,0.2);
z-index: 1000;
}
/* Links inside the dropdown */
.dropdown-content a {
color: black;
padding: 12px 16px;
text-decoration: none;
z-index:812;
}
/* Change color of dropdown links on hover */
.dropdown-content a:hover {
color: #043381;
background-color: floralwhite;
}
/* Show the dropdown menu on hover */
.dropdown:hover .dropdown-content {
display: block;
z-index:5000;
background-color:#fff;
color:#043381;
}
/* Change the background color of the dropdown button when the dropdown content is shown */
.dropdown:hover .dropbtn {
background-color: #fff;
color:#043381;
}
</style>
<link rel="stylesheet" type="text/css" href="css/style.css"/>
<script type="text/javascript" src="js/languageupdatescript.js"></script>
</head>
<%
Dim cnt1 As Integer = 1
Dim DB As New cDBFunctions
Dim curentMenuId As String = "1"
If Not Request.QueryString("menuID") Is Nothing Then
curentMenuId = Request.QueryString("menuID")
End If
Dim laenderkuerzel As String = "de"
If Not Request.QueryString("lan") Is Nothing Then
laenderkuerzel = Request.QueryString("lan")
End If
Dim navParent As String = "newpageJulius_Sidebar.aspx"
Dim imgPath As String = ""
If HttpContext.Current.Request.Url.AbsoluteUri.ToString.Contains("admin.aspx") Then
navParent = "admin.aspx"
imgPath= "../"
End If
'If Session("navParent") = "admin" Then
' If Request.QueryString("navParent") = "admin" Then
'Session("navParent") = Nothing
'End If
' End If
Dim navigation As List(Of cNavigation) = Nothing
navigation = DB.qry_menu_tags(laenderkuerzel)
%>
<!-- <div id="nav-main">-->
<!-- <a href="<%'= navParent%>?menuID=1">
<!-- <div id="art-logo"></div> -->
<!-- </a>-->
<!-- <div id="art-banner"></div>
<div id="art-banner_top"></div>-->
<!-- <div id="art-flags">-->
<!-- <a href="<%'= navParent%>?menuID=<%'= curentMenuId %>&lan=bg"><img src="<%'= imgPath%>images/flags/flagge_BG.gif" <%' If laenderkuerzel = "bg" Then Response.Write("style='border:1px solid #000'")%>><span></span></a>
<a href="<%'= navParent%>?menuID=<%'= curentMenuId %>&lan=yu"><img src="<%'= imgPath%>images/flags/flagge_BIH.gif" <% 'If laenderkuerzel = "yu" Then Response.Write("style='border:1px solid #000'")%>><span></span></a>
<a href="<%'= navParent%>?menuID=<%'= curentMenuId %>&lan=yu"><img src="<%'= imgPath%>images/flags/flagge_SM.gif" <% 'If laenderkuerzel = "yu" Then Response.Write("style='border:1px solid #000'")%> ><span></span></a>
<a href="<%'= navParent%>?menuID=<%'= curentMenuId %>&lan=ro"><img src="<%'= imgPath%>images/flags/flagge_RO.gif" <% 'If laenderkuerzel = "ro" Then Response.Write("style='border:1px solid #000'")%>><span></span></a>
<a href="<%'= navParent%>?menuID=<%'= curentMenuId %>&lan=tr"><img src="<%'= imgPath%>images/flags/flagge_TR.gif" <% 'If laenderkuerzel = "tr" Then Response.Write("style='border:1px solid #000'")%>><span></span></a>
<a href="<%'= navParent%>?menuID=<%'= curentMenuId %>&lan=en"><img src="<%'= imgPath%>images/flags/flagge_GB.gif" <% 'If laenderkuerzel = "en" Then Response.Write("style='border:1px solid #000'") %>><span></span></a>
<a href="<%'= navParent%>?menuID=<%'= curentMenuId %>&lan=de"><img src="<%'= imgPath%>images/flags/flagge_D.gif" <% 'If laenderkuerzel = "de" Then Response.Write("style='border:1px solid #000'") %>><span></span></a>
<a href="<%'= navParent%>?menuID=<%'= curentMenuId %>&lan=de"><img src="<%'= imgPath%>images/flags/flagge_A.gif" <% 'If laenderkuerzel = "de" Then Response.Write("style='border:1px solid #000'") %>><span></span></a> -->
<!-- </div>-->
<div id="main-menu">
<!-- <ul><div id="art-banner2"></div> -->
<nav class="navbar navbar-expand-lg navbar-light">
<a class="navbar-brand" href="newpageJulius_Sidebar.aspx?lan2=DE"><img src="images/Logo_small.png" alt="Schriftzug: Verag AG Blaue Schrift: Verag Spedition Graue Schrift: AG" data-toggle="tooltip" data-placement="top" title="https://www.verag.ag"></a>
<%
Dim flagpath = "images/flags/flagge_DE_AT.gif"
Select Case laenderkuerzel
Case "DE" : flagpath = "images/flags/flagge_DE_AT.gif"
Case "EN" : flagpath = "images/flags/flagge_GB.gif"
Case "SRB" : flagpath = "images/flags/flagge_BIH.gif"
Case "SRB" : flagpath = "images/flags/flagge_SM.gif"
Case "BG" : flagpath = "images/flags/flagge_BG.gif"
Case "TR" : flagpath = "images/flags/flagge_TR.gif"
End Select %>
<%
For Each nav As cNavigation In navigation
%>
<li Class="nav-item dropdown">
<a Class="nav-link dropdown-toggle" href="<%= navParent%>?menuID=<%= nav.id %>&lan=<%= laenderKuerzel %>" id="navbarDropdown" role="button" data-toggle="dropdown" aria-haspopup="true" aria-expanded="false" style="background-color:#fff; color:#043381;">
<%= IIf(nav.bezeichnung <> "", nav.bezeichnung, "XXX") %>
</a>
<div class="dropdown-menu" aria-labelledby="navbarDropdown">
<!-- <li><a class="menu_01_link" href="<%= navParent%>?menuID=<%= nav.id %>&lan=<%= laenderKuerzel %>"><%= IIf(nav.bezeichnung <> "", nav.bezeichnung, "XXX") %></a> -->
<% If nav.subnavigation.Count>0 then %>
<div class="menu_01">
<% If nav.slogan <> "" Then%>
<%="<div class='menu_slogan'>" & nav.slogan & "</div>"%>
<% End If %>
<% If nav.menu_logo <> "" Then %>
<%="<div class='menu_logo'><img src='" & nav.menu_logo & "'/></div>"%>
<% End If %>
<ul>
<li Class="nav-item">
<%For Each nav2 As cNavigation In nav.subnavigation%>
<!-- <li><a href="<%= navParent%>?menuID=<%= nav2.id%>&lan=<%= laenderkuerzel %>"><%= nav2.bezeichnung %></a> -->
<a class="dropdown-item" href="<%= navParent%>?menuID=<%= nav2.id%>&lan=<%= laenderkuerzel %>"><%= 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
%></tr><tr>
<% cells = 0
End If
%>
<div class="dropdown-divider"></div>
<!--<td><a href="<%= navParent%>?menuID=<%= nav3.id%>&lan=<%= laenderkuerzel %>"><%= nav3.bezeichnung %></a></td> -->
<a class="dropdown-item" href="<%= navParent%>?menuID=<%= nav3.id%>&lan=<%= laenderkuerzel %>"><%= nav3.bezeichnung %></a>
</div>
<% cells += 1
Next
End If%>
</tr>
</table>
</div>
</li>
<%
Next
%>
</li>
</ul>
<% End If
Next
%>
</nav>
</div>
<!-- </ul> -->