180 lines
10 KiB
Plaintext
180 lines
10 KiB
Plaintext
<head>
|
|
<meta http-equiv="Content-Type" content="text/html; charset=UTF-8"/>
|
|
<title>VERAG Spedition AG</title>
|
|
|
|
<style>
|
|
.dropbtn {
|
|
background-color: #043381;
|
|
top: 5%;
|
|
left: 95%;
|
|
width: 100px;
|
|
height: 40px;
|
|
position: absolute;
|
|
color: white;
|
|
padding: 16px;
|
|
font-size: 16px;
|
|
border: none;
|
|
}
|
|
|
|
/* Dropdown Content (Hidden by Default) */
|
|
.dropdown-content {
|
|
display: none;
|
|
position: absolute;
|
|
left: 95%;
|
|
background-color: #fff;
|
|
min-width: 160px;
|
|
box-shadow: 0px 8px 16px 0px rgba(0,0,0,0.2);
|
|
z-index: 1;
|
|
}
|
|
|
|
/* Links inside the dropdown */
|
|
.dropdown-content a {
|
|
color: black;
|
|
padding: 12px 16px;
|
|
text-decoration: none;
|
|
display: block;
|
|
}
|
|
|
|
/* Change color of dropdown links on hover */
|
|
.dropdown-content a:hover {
|
|
background-color: #043381;
|
|
color: #fff;
|
|
}
|
|
|
|
/* Show the dropdown menu on hover */
|
|
.dropdown:hover .dropdown-content {
|
|
display: block;
|
|
}
|
|
|
|
/* Change the background color of the dropdown button when the dropdown content is shown */
|
|
.dropdown:hover .dropbtn {
|
|
background-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="<%Response.Write(navParent)%>?menuID=1">
|
|
<!-- <div id="art-logo"></div> -->
|
|
</a>
|
|
<div id="art-banner"></div>
|
|
<div id="art-banner_top"></div>
|
|
|
|
|
|
<!-- <ul><div id="art-banner2"></div>
|
|
<%
|
|
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>
|
|
<% 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>"%>
|
|
<% 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>
|
|
<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
|
|
%>
|
|
<td><a href="<%Response.Write(navParent)%>?menuID=<%= nav3.id%>&lan=<%= laenderkuerzel %>"><%= nav3.bezeichnung %></a></td>
|
|
<% cells += 1
|
|
Next
|
|
End If%>
|
|
</tr>
|
|
</table>
|
|
</div>
|
|
</li>
|
|
<%
|
|
Next
|
|
|
|
%>
|
|
</ul>
|
|
</div>
|
|
<% End If
|
|
Next
|
|
|
|
%> -->
|
|
<!-- <div id="art-flags">
|
|
<a href="<%Response.Write(navParent)%>?menuID=<%Response.Write( curentMenuId)%>&lan=bg"><img src="<%Response.Write(imgPath)%>images/flags/flagge_BG.gif" <% If laenderkuerzel = "bg" Then Response.Write("style='border:1px solid #000'")%>><span></span></a>
|
|
<a href="<%Response.Write(navParent)%>?menuID=<%Response.Write( curentMenuId)%>&lan=yu"><img src="<%Response.Write(imgPath)%>images/flags/flagge_BIH.gif" <% If laenderkuerzel = "yu" Then Response.Write("style='border:1px solid #000'")%>><span></span></a>
|
|
<a href="<%Response.Write(navParent)%>?menuID=<%Response.Write( curentMenuId)%>&lan=yu"><img src="<%Response.Write(imgPath)%>images/flags/flagge_SM.gif" <% If laenderkuerzel = "yu" Then Response.Write("style='border:1px solid #000'")%> ><span></span></a>
|
|
<a href="<%Response.Write(navParent)%>?menuID=<%Response.Write( curentMenuId)%>&lan=ro"><img src="<%Response.Write(imgPath)%>images/flags/flagge_RO.gif" <% If laenderkuerzel = "ro" Then Response.Write("style='border:1px solid #000'")%>><span></span></a>
|
|
<a href="<%Response.Write(navParent)%>?menuID=<%Response.Write( curentMenuId)%>&lan=tr"><img src="<%Response.Write(imgPath)%>images/flags/flagge_TR.gif" <% If laenderkuerzel = "tr" Then Response.Write("style='border:1px solid #000'")%>><span></span></a>
|
|
<a href="<%Response.Write(navParent)%>?menuID=<%Response.Write( curentMenuId)%>&lan=en"><img src="<%Response.Write(imgPath)%>images/flags/flagge_GB.gif" <% If laenderkuerzel = "en" Then Response.Write("style='border:1px solid #000'") %>><span></span></a>
|
|
<a href="<%Response.Write(navParent)%>?menuID=<%Response.Write( curentMenuId)%>&lan=de"><img src="<%Response.Write(imgPath)%>images/flags/flagge_D.gif" <% If laenderkuerzel = "de" Then Response.Write("style='border:1px solid #000'") %>><span></span></a>
|
|
<a href="<%Response.Write(navParent)%>?menuID=<%Response.Write( curentMenuId)%>&lan=de"><img src="<%Response.Write(imgPath)%>images/flags/flagge_A.gif" <% If laenderkuerzel = "de" Then Response.Write("style='border:1px solid #000'") %>><span></span></a> -->
|
|
|
|
<!-- <div Class="dropdown">
|
|
<button Class="dropbtn"> <img id="myImage" src="images/flags/flagge_A.gif" style="border:1px solid #000;width:30px;"/></button>
|
|
<div Class="dropdown-content"> -->
|
|
<!-- <a id="ButtonOesterreichLangPicker" class="btn btn-primary btn-sm" onclick="changeflag(A)" href="<%Response.Write(navParent)%>?menuID=<%Response.Write(curentMenuId) %>&lan=de"><img src="<%Response.Write(imgPath)%>images/flags/flagge_A.gif" <% If laenderkuerzel = "de" Then Response.Write("style='border:1px solid #000'")%> /> DE</a> -->
|
|
<!-- <a id="ButtonDeutschLangPicker" class="btn btn-primary btn-sm" onclick="changeflag(D)" href="<%Response.Write(navParent)%>?menuID=<%Response.Write( curentMenuId)%>&lan=de"><img src="<%Response.Write(imgPath)%>images/flags/flagge_DE_AT.gif" <% If laenderkuerzel = "de" Then Response.Write("style='border:1px solid #000'")%>/>DE/AT</a>
|
|
<a id="ButtonEnglischLangPicker" class="btn btn-primary btn-sm" onclick="changeflag(GB)" href="<%Response.Write(navParent)%>?menuID=<%Response.Write( curentMenuId)%>&lan=EN"><img src="<%Response.Write(imgPath)%>images/flags/flagge_GB.gif" <% If laenderkuerzel = "en" Then Response.Write("style='border:1px solid #000'")%>/>EN</a>
|
|
<a id="ButtonSerbischLangPicker" class="btn btn-primary btn-sm" onclick="changeflag(BIH)" href="<%Response.Write(navParent)%>?menuID=<%Response.Write( curentMenuId)%>&lan=SRB"><img src="<%Response.Write(imgPath)%>images/flags/flagge_BIH.gif" <% If laenderkuerzel = "yu" Then Response.Write("style='border:1px solid #000'")%> />BIH</a>
|
|
<a id="ButtonSerbischZweiLangPicker" class="btn btn-primary btn-sm" onclick="changeflag(SM)" href="<%Response.Write(navParent)%>?menuID=<%Response.Write( curentMenuId)%>&lan=SRB"><img src="<%Response.Write(imgPath)%>images/flags/flagge_SM.gif" <% If laenderkuerzel = "yu" Then Response.Write("style='border:1px solid #000'")%> />SRB</a>
|
|
<a id="ButtonBulgariaLangPicker" class="btn btn-primary btn-sm" onclick="changeflag(BG)" href="<%Response.Write(navParent)%>?menuID=<%Response.Write( curentMenuId)%>&lan=BG"><img src="<%Response.Write(imgPath)%>images/flags/flagge_SM.gif" <% If laenderkuerzel = "bg" Then Response.Write("style='border:1px solid #000'")%>/>BG</a>
|
|
<a id="ButtonTürkeiLangPicker" class="btn btn-primary btn-sm" onclick="changeflag(TR)" href="<%Response.Write(navParent)%>?menuID=<%Response.Write( curentMenuId)%>&lan=TR"><img src="<%Response.Write(imgPath)%>images/flags/flagge_TR.gif" <% If laenderkuerzel = "tr" Then Response.Write("style='border:1px solid #000'")%>/>TR</a>
|
|
</div>
|
|
</div> -->
|
|
|
|
</div>
|
|
<div id="art-banner-pic" style="display:none"></div>
|
|
<div id="main-menu">
|
|
</ul>
|
|
|
|
</div>
|
|
</div>
|
|
|