Initial Commit Update Telerik

LPWeb20/Defaults/Footer.ascx

@@ -0,0 +1,56 @@
+<%@ Control Language="vb" AutoEventWireup="false" CodeBehind="Footer.ascx.vb" Inherits="LPWeb.Footer" %>
+
+<style type="text/css">
+
+ p.MsoNormal
+	{margin-top:0cm;
+	margin-right:0cm;
+	margin-bottom:10.0pt;
+	margin-left:0cm;
+	line-height:115%;
+	font-size:11.0pt;
+	font-family:"Calibri","sans-serif";
+	}
+    #footer
+    {
+        text-align: center;
+    }
+</style>
+
+<div class="footer" id="footer">
+    <asp:ImageMap ID="ImageMap1" runat="server" ImageUrl="~/Bilder/Logos.jpg" BorderColor="#b6b7bc">
+        <asp:RectangleHotSpot Bottom="1" Left="1"  
+            NavigateUrl="http://www.gewerbeeglisau.ch" Right="200" Target="_blank" 
+            Top="78" />
+        <asp:RectangleHotSpot Bottom="1" Left="380" 
+            NavigateUrl="http://www.shub.ch" 
+            Right="580" Target="_blank" Top="78" />
+        <asp:RectangleHotSpot Bottom="1" Left="760" 
+            NavigateUrl="http://www.schuleeglisau.ch" 
+            Right="960" Target="_blank" Top="78" />
+       <%-- <asp:RectangleHotSpot Bottom="76" Left="838" 
+            NavigateUrl="http://www.kloten.amag.ch" 
+            Right="913" Target="_blank" Top="42" />
+        <asp:RectangleHotSpot Bottom="37" Left="28" Right="138" Target="_blank" 
+            Top="3" NavigateUrl="http://www.schulekloten.ch" />
+        <asp:RectangleHotSpot Bottom="75" Left="442" 
+            NavigateUrl="http://www.isler-sanitaer.ch" Right="551" Target="_blank" 
+            Top="5" />
+        <asp:RectangleHotSpot Bottom="75" Left="555" 
+            NavigateUrl="http://www.specogna.ch" Right="657" Target="_blank" Top="5" />
+        <asp:RectangleHotSpot Bottom="75" Left="2" 
+            NavigateUrl="http://www.eberhard.ch/lehrstellen" Right="307" Target="_blank" 
+            Top="40" />
+        <asp:RectangleHotSpot Bottom="35" Left="166" NavigateUrl="http://www.scania.ch" 
+            Right="288" Target="_blank" Top="3" />
+        <asp:RectangleHotSpot Bottom="75" Left="314" 
+            NavigateUrl="http://www.letsdoit.ch" Right="436" Target="_blank" Top="5" />--%>
+    </asp:ImageMap>
+    <br />&nbsp;<asp:HyperLink ID="HyperLink1" runat="server" 
+        NavigateUrl="http://www.shub.ch" Target="_blank">© 2013 – Stefan Hutter Unternehmensberatung, Bülach</asp:HyperLink>
+</div>
+
+
+
+
+

LPWeb20/Defaults/Footer.ascx.designer.vb

@@ -0,0 +1,33 @@
+'------------------------------------------------------------------------------
+' <automatisch generiert>
+'     Der Code wurde von einem Tool generiert.
+'
+'     Änderungen an der Datei führen möglicherweise zu falschem Verhalten, und sie gehen verloren, wenn
+'     der Code erneut generiert wird. 
+' </automatisch generiert>
+'------------------------------------------------------------------------------
+
+Option Strict On
+Option Explicit On
+
+
+Partial Public Class Footer
+
+    '''<summary>
+    '''ImageMap1-Steuerelement
+    '''</summary>
+    '''<remarks>
+    '''Automatisch generiertes Feld
+    '''Um dies zu ändern, verschieben Sie die Felddeklaration aus der Designerdatei in eine Code-Behind-Datei.
+    '''</remarks>
+    Protected WithEvents ImageMap1 As Global.System.Web.UI.WebControls.ImageMap
+
+    '''<summary>
+    '''HyperLink1-Steuerelement
+    '''</summary>
+    '''<remarks>
+    '''Automatisch generiertes Feld
+    '''Um dies zu ändern, verschieben Sie die Felddeklaration aus der Designerdatei in eine Code-Behind-Datei.
+    '''</remarks>
+    Protected WithEvents HyperLink1 As Global.System.Web.UI.WebControls.HyperLink
+End Class

LPWeb20/Defaults/Footer.ascx.vb

@@ -0,0 +1,8 @@
+Public Class Footer
+    Inherits System.Web.UI.UserControl
+
+    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
+
+    End Sub
+
+End Class

LPWeb20/Defaults/Header.ascx

@@ -0,0 +1,30 @@
+<%@ Control Language="vb" AutoEventWireup="false" CodeBehind="Header.ascx.vb" Inherits="LPWeb.Header" %>
+<table width="100%" class="header">
+   <tr>
+   <td>
+     <div class="header">
+            <div class="title">
+                <h1 class="Header h1">
+                    <asp:Image ID="Image2" runat="server"  
+                        ImageUrl="~/Bilder/Kloten.jpg"  />
+                    &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
+                    &nbsp;<asp:Label  ID="SiteTitle" runat="server" Text="SiteTitle"></asp:Label>
+                 </h1>
+            </div>
+         </div>
+                     <div class="loginDisplay">
+                <asp:Label ID="lblUsername" runat="server" Text="Username" ForeColor="Orange"></asp:Label>
+                <asp:Label ID="lblStrich" runat="server" Text=" | " ForeColor="Orange"></asp:Label>
+                <asp:HyperLink ID="HyperLink1" runat="server" ForeColor="Orange"
+                    NavigateUrl="~/Default.aspx?fnkt=Logout">Abmelden</asp:HyperLink>
+                    </div>
+
+ </td>
+   </tr>
+   </table>
+<asp:Panel ID="Panel1" runat="server">
+</asp:Panel>
+<hr />
+
+
+   

LPWeb20/Defaults/Header.ascx.designer.vb

@@ -0,0 +1,60 @@
+'------------------------------------------------------------------------------
+' <automatisch generiert>
+'     Der Code wurde von einem Tool generiert.
+'
+'     Änderungen an der Datei führen möglicherweise zu falschem Verhalten, und sie gehen verloren, wenn
+'     der Code erneut generiert wird. 
+' </automatisch generiert>
+'------------------------------------------------------------------------------
+
+Option Strict On
+Option Explicit On
+
+
+Partial Public Class Header
+
+    '''<summary>
+    '''Image2-Steuerelement
+    '''</summary>
+    '''<remarks>
+    '''Automatisch generiertes Feld
+    '''Um dies zu ändern, verschieben Sie die Felddeklaration aus der Designerdatei in eine Code-Behind-Datei.
+    '''</remarks>
+    Protected WithEvents Image2 As Global.System.Web.UI.WebControls.Image
+
+    '''<summary>
+    '''SiteTitle-Steuerelement
+    '''</summary>
+    '''<remarks>
+    '''Automatisch generiertes Feld
+    '''Um dies zu ändern, verschieben Sie die Felddeklaration aus der Designerdatei in eine Code-Behind-Datei.
+    '''</remarks>
+    Protected WithEvents SiteTitle As Global.System.Web.UI.WebControls.Label
+
+    '''<summary>
+    '''lblUsername-Steuerelement
+    '''</summary>
+    '''<remarks>
+    '''Automatisch generiertes Feld
+    '''Um dies zu ändern, verschieben Sie die Felddeklaration aus der Designerdatei in eine Code-Behind-Datei.
+    '''</remarks>
+    Protected WithEvents lblUsername As Global.System.Web.UI.WebControls.Label
+
+    '''<summary>
+    '''lblStrich-Steuerelement
+    '''</summary>
+    '''<remarks>
+    '''Automatisch generiertes Feld
+    '''Um dies zu ändern, verschieben Sie die Felddeklaration aus der Designerdatei in eine Code-Behind-Datei.
+    '''</remarks>
+    Protected WithEvents lblStrich As Global.System.Web.UI.WebControls.Label
+
+    '''<summary>
+    '''HyperLink1-Steuerelement
+    '''</summary>
+    '''<remarks>
+    '''Automatisch generiertes Feld
+    '''Um dies zu ändern, verschieben Sie die Felddeklaration aus der Designerdatei in eine Code-Behind-Datei.
+    '''</remarks>
+    Protected WithEvents HyperLink1 As Global.System.Web.UI.WebControls.HyperLink
+End Class

LPWeb20/Defaults/Header.ascx.vb

@@ -0,0 +1,45 @@
+Imports System.Web.Configuration
+Public Class Header
+    Inherits System.Web.UI.UserControl
+
+    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
+
+        Dim dh As New clsDatahandling
+        Me.SiteTitle.Text = dh.Get_Option(2)
+        If Session("Logo") Is Nothing Then Session("Logo") = dh.Get_Option(12)
+        If Session("Logo_Height") Is Nothing Then Session("Logo_Height") = dh.Get_Option(13)
+        If Session("Logo_Width") Is Nothing Then Session("Logo_Width") = dh.Get_Option(14)
+        If Session("Style") Is Nothing Then Session("Style") = dh.Get_Option(22)
+        If Session("Style") = "" Then
+            System.Configuration.ConfigurationManager.AppSettings("Telerik.Skin") = "Windows7"
+        Else
+            System.Configuration.ConfigurationManager.AppSettings("Telerik.Skin") = Session("Style")
+        End If
+        If Session("Logo") = "" Then
+            Me.Image2.Visible = False
+        Else
+            Me.Image2.Visible = True
+            Me.Image2.ImageUrl = Session("logo").ToString
+            Me.Image2.Height = Session("Logo_Height").ToString
+            Me.Image2.Width = Session("Logo_Width").ToString
+        End If
+
+
+        'Me.SiteTitle.Text = WebConfigurationManager.AppSettings("SiteTitle")
+        If Session.Item("LogedIn") = "True" Then
+            Me.HyperLink1.Visible = True
+            Me.lblUsername.Visible = True
+            Me.lblUsername.Text = "Angemeldet als " + Session("Username")
+            Me.lblStrich.Visible = True
+        Else
+            Me.HyperLink1.Visible = False
+            Me.lblUsername.Visible = True
+            Me.lblUsername.Text = "Nicht angemeldet"
+            Me.lblStrich.Visible = False
+            Response.Redirect("~/Default.aspx")
+        End If
+        'MenuPane.Controls.Add(Page.LoadControl("~/UserControls/Menu.ascx"))
+    End Sub
+
+
+End Class

LPWeb20/Defaults/Header1.ascx

@@ -0,0 +1,27 @@
+<%@ Control Language="vb" AutoEventWireup="false" CodeBehind="Header1.ascx.vb" Inherits="LPWeb.Header1" %>
+<table width="100%" class="header">
+   <tr>
+   <td>
+     <div class="header">
+            <div class="title">
+                <h1 class="Header h1">
+                    <asp:Image ID="Image2" runat="server"  
+                        ImageUrl="~/Bilder/Kloten.jpg"  />
+                    &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
+                    &nbsp;<asp:Label  ID="SiteTitle" runat="server" Text="SiteTitle"></asp:Label>
+                 </h1>
+            </div>
+         </div>
+                     <div class="loginDisplay">
+                <asp:Label ID="lblUsername" runat="server" Text="Username" ForeColor="Orange"></asp:Label>
+                <asp:Label ID="lblStrich" runat="server" Text=" | " ForeColor="Orange"></asp:Label>
+                <asp:HyperLink ID="HyperLink1" runat="server" ForeColor="Orange"
+                    NavigateUrl="~/Default.aspx?fnkt=Logout">Abmelden</asp:HyperLink>
+                    </div>
+
+ </td>
+   </tr>
+   </table>
+<asp:Panel ID="Panel1" runat="server">
+</asp:Panel>
+<hr />

LPWeb20/Defaults/Header1.ascx.designer.vb

@@ -0,0 +1,69 @@
+'------------------------------------------------------------------------------
+' <automatisch generiert>
+'     Der Code wurde von einem Tool generiert.
+'
+'     Änderungen an der Datei führen möglicherweise zu falschem Verhalten, und sie gehen verloren, wenn
+'     der Code erneut generiert wird. 
+' </automatisch generiert>
+'------------------------------------------------------------------------------
+
+Option Strict On
+Option Explicit On
+
+
+Partial Public Class Header1
+
+    '''<summary>
+    '''Image2-Steuerelement
+    '''</summary>
+    '''<remarks>
+    '''Automatisch generiertes Feld
+    '''Um dies zu ändern, verschieben Sie die Felddeklaration aus der Designerdatei in eine Code-Behind-Datei.
+    '''</remarks>
+    Protected WithEvents Image2 As Global.System.Web.UI.WebControls.Image
+
+    '''<summary>
+    '''SiteTitle-Steuerelement
+    '''</summary>
+    '''<remarks>
+    '''Automatisch generiertes Feld
+    '''Um dies zu ändern, verschieben Sie die Felddeklaration aus der Designerdatei in eine Code-Behind-Datei.
+    '''</remarks>
+    Protected WithEvents SiteTitle As Global.System.Web.UI.WebControls.Label
+
+    '''<summary>
+    '''lblUsername-Steuerelement
+    '''</summary>
+    '''<remarks>
+    '''Automatisch generiertes Feld
+    '''Um dies zu ändern, verschieben Sie die Felddeklaration aus der Designerdatei in eine Code-Behind-Datei.
+    '''</remarks>
+    Protected WithEvents lblUsername As Global.System.Web.UI.WebControls.Label
+
+    '''<summary>
+    '''lblStrich-Steuerelement
+    '''</summary>
+    '''<remarks>
+    '''Automatisch generiertes Feld
+    '''Um dies zu ändern, verschieben Sie die Felddeklaration aus der Designerdatei in eine Code-Behind-Datei.
+    '''</remarks>
+    Protected WithEvents lblStrich As Global.System.Web.UI.WebControls.Label
+
+    '''<summary>
+    '''HyperLink1-Steuerelement
+    '''</summary>
+    '''<remarks>
+    '''Automatisch generiertes Feld
+    '''Um dies zu ändern, verschieben Sie die Felddeklaration aus der Designerdatei in eine Code-Behind-Datei.
+    '''</remarks>
+    Protected WithEvents HyperLink1 As Global.System.Web.UI.WebControls.HyperLink
+
+    '''<summary>
+    '''Panel1-Steuerelement
+    '''</summary>
+    '''<remarks>
+    '''Automatisch generiertes Feld
+    '''Um dies zu ändern, verschieben Sie die Felddeklaration aus der Designerdatei in eine Code-Behind-Datei.
+    '''</remarks>
+    Protected WithEvents Panel1 As Global.System.Web.UI.WebControls.Panel
+End Class

LPWeb20/Defaults/Header1.ascx.vb

@@ -0,0 +1,41 @@
+Public Class Header1
+    Inherits System.Web.UI.UserControl
+
+    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
+
+        Dim dh As New clsDatahandling
+        Me.SiteTitle.Text = dh.Get_Option(2)
+        If Session("Logo") Is Nothing Then Session("Logo") = dh.Get_Option(12)
+        If Session("Logo_Height") Is Nothing Then Session("Logo_Height") = dh.Get_Option(13)
+        If Session("Logo_Width") Is Nothing Then Session("Logo_Width") = dh.Get_Option(14)
+        If Session("Style") Is Nothing Then Session("Style") = dh.Get_Option(22)
+        If Session("Style") = "" Then
+            System.Configuration.ConfigurationManager.AppSettings("Telerik.Skin") = "Windows7"
+        Else
+            System.Configuration.ConfigurationManager.AppSettings("Telerik.Skin") = Session("Style")
+        End If
+
+        If Session("Logo") = "" Then
+            Me.Image2.Visible = False
+        Else
+            Me.Image2.Visible = True
+            Me.Image2.ImageUrl = Session("logo").ToString
+            Me.Image2.Height = Session("Logo_Height").ToString
+            Me.Image2.Width = Session("Logo_Width").ToString
+        End If
+        'Me.SiteTitle.Text = WebConfigurationManager.AppSettings("SiteTitle")
+        If Session.Item("LogedIn") = "True" Then
+            Me.HyperLink1.Visible = True
+            Me.lblUsername.Visible = True
+            Me.lblUsername.Text = "Angemeldet als " + Session("Username")
+            Me.lblStrich.Visible = True
+        Else
+            Me.HyperLink1.Visible = False
+            Me.lblUsername.Visible = True
+            Me.lblUsername.Text = "Nicht angemeldet"
+            Me.lblStrich.Visible = False
+        End If
+        'MenuPane.Controls.Add(Page.LoadControl("~/UserControls/Menu.ascx"))
+    End Sub
+
+End Class