Initial Commit Update Telerik
This commit is contained in:
51
LPWeb20/Firmen/Firmenaktualisierung.aspx
Normal file
51
LPWeb20/Firmen/Firmenaktualisierung.aspx
Normal file
@@ -0,0 +1,51 @@
|
||||
<%@ Page Language="vb" AutoEventWireup="false" CodeBehind="Firmenaktualisierung.aspx.vb" Inherits="LPWeb.Firmenaktualisierung" %>
|
||||
<%@ Register Src="~/Defaults/Header.ascx" TagPrefix="shu" TagName="Header" %>
|
||||
<%@ Register Src="~/Defaults/Footer.ascx" TagPrefix="shu" TagName="Footer" %>
|
||||
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
|
||||
|
||||
<html xmlns="http://www.w3.org/1999/xhtml">
|
||||
<head id="Head1" runat="server">
|
||||
<title></title>
|
||||
<link href="~/Styles/Site.css" rel="stylesheet" type="text/css" />
|
||||
<style type="text/css">
|
||||
.style1
|
||||
{
|
||||
width: 136px;
|
||||
}
|
||||
</style>
|
||||
</head>
|
||||
|
||||
<body>
|
||||
<form id="form1" runat="server">
|
||||
<telerik:RadScriptManager ID="ScriptManager1" runat="server"
|
||||
EnableTheming="True">
|
||||
<scripts>
|
||||
<asp:ScriptReference Assembly="Telerik.Web.UI"
|
||||
Name="Telerik.Web.UI.Common.Core.js">
|
||||
</asp:ScriptReference>
|
||||
<asp:ScriptReference Assembly="Telerik.Web.UI"
|
||||
Name="Telerik.Web.UI.Common.jQuery.js">
|
||||
</asp:ScriptReference>
|
||||
<asp:ScriptReference Assembly="Telerik.Web.UI"
|
||||
Name="Telerik.Web.UI.Common.jQueryInclude.js">
|
||||
</asp:ScriptReference>
|
||||
</scripts>
|
||||
</telerik:RadScriptManager>
|
||||
<div class="page">
|
||||
<shu:Header runat="Server" ID="Header1"></shu:Header>
|
||||
|
||||
<div class="main">
|
||||
<h2>Verwendung bereits erfasster Daten</h2>
|
||||
<p>
|
||||
<asp:Label ID="Label2" runat="server" Text="Label"></asp:Label>
|
||||
</p>
|
||||
|
||||
<telerik:RadButton ID="RadButton1" runat="server" Text="Aktivieren">
|
||||
</telerik:RadButton>
|
||||
</div>
|
||||
</div>
|
||||
|
||||
</form>
|
||||
<shu:Footer runat="Server" ID="Footer1"></SHU:Footer>
|
||||
</body>
|
||||
</html>
|
||||
78
LPWeb20/Firmen/Firmenaktualisierung.aspx.designer.vb
generated
Normal file
78
LPWeb20/Firmen/Firmenaktualisierung.aspx.designer.vb
generated
Normal file
@@ -0,0 +1,78 @@
|
||||
'------------------------------------------------------------------------------
|
||||
' <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 Firmenaktualisierung
|
||||
|
||||
'''<summary>
|
||||
'''Head1-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 Head1 As Global.System.Web.UI.HtmlControls.HtmlHead
|
||||
|
||||
'''<summary>
|
||||
'''form1-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 form1 As Global.System.Web.UI.HtmlControls.HtmlForm
|
||||
|
||||
'''<summary>
|
||||
'''ScriptManager1-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 ScriptManager1 As Global.Telerik.Web.UI.RadScriptManager
|
||||
|
||||
'''<summary>
|
||||
'''Header1-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 Header1 As Global.LPWeb.Header
|
||||
|
||||
'''<summary>
|
||||
'''Label2-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 Label2 As Global.System.Web.UI.WebControls.Label
|
||||
|
||||
'''<summary>
|
||||
'''RadButton1-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 RadButton1 As Global.Telerik.Web.UI.RadButton
|
||||
|
||||
'''<summary>
|
||||
'''Footer1-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 Footer1 As Global.LPWeb.Footer
|
||||
End Class
|
||||
14
LPWeb20/Firmen/Firmenaktualisierung.aspx.vb
Normal file
14
LPWeb20/Firmen/Firmenaktualisierung.aspx.vb
Normal file
@@ -0,0 +1,14 @@
|
||||
Public Class Firmenaktualisierung
|
||||
Inherits System.Web.UI.Page
|
||||
|
||||
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
|
||||
Dim dh As New clsDatahandling
|
||||
Me.Label2.Text = dh.Get_Option(15)
|
||||
End Sub
|
||||
|
||||
Protected Sub RadButton1_Click(sender As Object, e As EventArgs) Handles RadButton1.Click
|
||||
Dim dh As New clsDatahandling
|
||||
dh.Firma_aktivieren(Session.Item("Firmanr"), Session.Item("Userid"))
|
||||
Response.Redirect("~/firmen/firmendaten1.aspx")
|
||||
End Sub
|
||||
End Class
|
||||
343
LPWeb20/Firmen/Firmenangebot.ascx
Normal file
343
LPWeb20/Firmen/Firmenangebot.ascx
Normal file
@@ -0,0 +1,343 @@
|
||||
<%@ Control Language="vb" AutoEventWireup="false" CodeBehind="Firmenangebot.ascx.vb" Inherits="LPWeb.Firmenangebot" %>
|
||||
<style type="text/css">
|
||||
</style>
|
||||
<script type="text/javascript" id="telerikClientEvents1">
|
||||
//<![CDATA[
|
||||
function alertCallBackFn(arg) {
|
||||
window.location = "../default.aspx"
|
||||
//radalert("<strong>radalert</strong> returned the following result: <h3 style='color: #ff0000;'>" + arg + "</h3>", null, null, "Result");
|
||||
}
|
||||
function alertCallBackFn1(arg) {
|
||||
//radalert("<strong>radalert</strong> returned the following result: <h3 style='color: #ff0000;'>" + arg + "</h3>", null, null, "Result");
|
||||
}
|
||||
|
||||
//]]>
|
||||
</script>
|
||||
|
||||
<table style="width:100%;">
|
||||
<tr>
|
||||
<td align="center" bgcolor="#F97364" colspan="2">
|
||||
<asp:Label ID="Label1" runat="server" Font-Bold="True" ForeColor="Black"
|
||||
Text="Bitte alle Ihnen möglichen Berufsbilder und Durchführungszeiten eintragen."></asp:Label>
|
||||
</td>
|
||||
</tr>
|
||||
|
||||
</table>
|
||||
<asp:Panel ID="Panel1" runat="server" Height="354px">
|
||||
<div class="main">
|
||||
<table style="width:100%;">
|
||||
<tr>
|
||||
<td valign="top">
|
||||
<table style="width:100%;">
|
||||
<tr>
|
||||
<td valign="top">
|
||||
<strong>Berufe</strong><br />
|
||||
<telerik:RadListBox ID="RadListBox1" runat="server" Culture="de-DE"
|
||||
DataSourceID="SqlDataBerufe" DataTextField="Bezeichnung"
|
||||
DataValueField="Berufnr" height="100px"
|
||||
Width="350px">
|
||||
</telerik:RadListBox>
|
||||
</td>
|
||||
<td valign="top">
|
||||
<strong>Ansprechpartner </strong>
|
||||
<telerik:RadButton ID="RadButton2" runat="server" Height="18px"
|
||||
Image-ImageUrl="~/bilder/refresh.gif" Text="" Width="18px">
|
||||
</telerik:RadButton>
|
||||
<br />
|
||||
<telerik:RadListBox ID="RadListBox2" runat="server" Culture="de-DE"
|
||||
DataSourceID="SqlDataAnsprechpartner" DataTextField="AName"
|
||||
DataValueField="AnsprechpartnerNr" Height="100px"
|
||||
Width="150px">
|
||||
</telerik:RadListBox>
|
||||
</td>
|
||||
<td valign="top">
|
||||
<strong>Zeiten</strong><br />
|
||||
<telerik:RadListBox ID="RadListBox3" runat="server" Culture="de-DE"
|
||||
DataSourceID="SqlDataZeiten" DataTextField="Bezeichnung"
|
||||
DataValueField="ZeitNr" Height="100px"
|
||||
Width="150px" >
|
||||
</telerik:RadListBox>
|
||||
</td>
|
||||
<td valign="top">
|
||||
<strong>Max. Anzahl Plätze<br /> </strong><telerik:RadComboBox ID="RadComboBox1" Runat="server"
|
||||
Culture="de-DE">
|
||||
<Items>
|
||||
<telerik:RadComboBoxItem runat="server" Selected="True" Text="0" Value="0" />
|
||||
<telerik:RadComboBoxItem runat="server" Text="1" Value="1" />
|
||||
<telerik:RadComboBoxItem runat="server" Text="2" Value="2" />
|
||||
<telerik:RadComboBoxItem runat="server" Text="3" Value="3" />
|
||||
<telerik:RadComboBoxItem runat="server" Text="4" Value="4" />
|
||||
<telerik:RadComboBoxItem runat="server" Text="5" Value="5" />
|
||||
<telerik:RadComboBoxItem runat="server" Text="6" Value="6" />
|
||||
<telerik:RadComboBoxItem runat="server" Text="7" Value="7" />
|
||||
<telerik:RadComboBoxItem runat="server" Text="8" Value="8" />
|
||||
<telerik:RadComboBoxItem runat="server" Text="9" Value="9" />
|
||||
<telerik:RadComboBoxItem runat="server" Text="10" Value="10" />
|
||||
</Items>
|
||||
</telerik:RadComboBox>
|
||||
<br />
|
||||
<strong>Mindestanforderung</strong><br />
|
||||
<telerik:RadComboBox ID="RadComboboxKlasse" Runat="server" Culture="de-DE"
|
||||
DataSourceID="SqlDataSourceKlasse" DataTextField="bezeichnung"
|
||||
DataValueField="Klassenr">
|
||||
<Items>
|
||||
<telerik:RadComboBoxItem runat="server" Owner="RadComboboxKlasse"
|
||||
Selected="True" Text="0" Value="0" />
|
||||
<telerik:RadComboBoxItem runat="server" Owner="RadComboboxKlasse" Text="1"
|
||||
Value="1" />
|
||||
<telerik:RadComboBoxItem runat="server" Owner="RadComboboxKlasse" Text="2"
|
||||
Value="2" />
|
||||
<telerik:RadComboBoxItem runat="server" Owner="RadComboboxKlasse" Text="3"
|
||||
Value="3" />
|
||||
<telerik:RadComboBoxItem runat="server" Owner="RadComboboxKlasse" Text="4"
|
||||
Value="4" />
|
||||
<telerik:RadComboBoxItem runat="server" Owner="RadComboboxKlasse" Text="5"
|
||||
Value="5" />
|
||||
<telerik:RadComboBoxItem runat="server" Owner="RadComboboxKlasse" Text="6"
|
||||
Value="6" />
|
||||
<telerik:RadComboBoxItem runat="server" Owner="RadComboboxKlasse" Text="7"
|
||||
Value="7" />
|
||||
<telerik:RadComboBoxItem runat="server" Owner="RadComboboxKlasse" Text="8"
|
||||
Value="8" />
|
||||
<telerik:RadComboBoxItem runat="server" Owner="RadComboboxKlasse" Text="9"
|
||||
Value="9" />
|
||||
<telerik:RadComboBoxItem runat="server" Owner="RadComboboxKlasse" Text="10"
|
||||
Value="10" />
|
||||
</Items>
|
||||
</telerik:RadComboBox>
|
||||
<br />
|
||||
<br />
|
||||
<telerik:RadButton ID="RadButton1" runat="server"
|
||||
Text="Angebot einfügen">
|
||||
</telerik:RadButton>
|
||||
</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td valign="top">
|
||||
Ihr Beruf fehlt? Klicken Sie -><telerik:RadButton ID="RadButton4" runat="server"
|
||||
Height="16px" Image-EnableImageButton="true"
|
||||
Image-ImageUrl="~/bilder/Button.gif" Text="" Width="16px">
|
||||
</telerik:RadButton>
|
||||
<-</td>
|
||||
<td valign="top">
|
||||
</td>
|
||||
<td valign="middle" align="center"> </td>
|
||||
<td valign="top"></td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td valign="top" colspan="4">
|
||||
<telerik:RadGrid ID="RadGrid1" runat="server" AllowAutomaticDeletes="True"
|
||||
AllowAutomaticUpdates="True" AllowPaging="True" AllowSorting="True"
|
||||
AutoGenerateColumns="False" CellSpacing="0" Culture="de-DE"
|
||||
DataSourceID="SqlDataFirmaBeruf" GridLines="None" Height="184px" >
|
||||
<ClientSettings>
|
||||
<Scrolling AllowScroll="True" UseStaticHeaders="True" />
|
||||
</ClientSettings>
|
||||
<MasterTableView AllowAutomaticUpdates="true" DataKeyNames="FirmaBerufNr"
|
||||
DataSourceID="SqlDataFirmaBeruf" EditMode="PopUp"
|
||||
NoMasterRecordsText="Keine Datensätze vorhanden" TableLayout="Fixed">
|
||||
<CommandItemSettings AddNewRecordText="Neuer Datensatz"
|
||||
ExportToExcelText="Excel-Export" ExportToPdfText="PDF-Export"
|
||||
RefreshText="Aktualisieren" ShowAddNewRecordButton="False"
|
||||
ShowRefreshButton="False" />
|
||||
<RowIndicatorColumn FilterControlAltText="Filter RowIndicator column"
|
||||
Visible="True">
|
||||
</RowIndicatorColumn>
|
||||
<ExpandCollapseColumn FilterControlAltText="Filter ExpandColumn column"
|
||||
Visible="True">
|
||||
</ExpandCollapseColumn>
|
||||
<Columns>
|
||||
<telerik:GridBoundColumn FilterControlAltText="Filter column column"
|
||||
HeaderText="Firmaberufnr" ReadOnly="True" UniqueName="column" Visible="False">
|
||||
</telerik:GridBoundColumn>
|
||||
<telerik:GridBoundColumn DataField="Beruf"
|
||||
FilterControlAltText="Filter column1 column" HeaderText="Beruf" ReadOnly="True"
|
||||
UniqueName="column1">
|
||||
<HeaderStyle Width="150px" Wrap="false" />
|
||||
<ItemStyle Wrap="False" />
|
||||
</telerik:GridBoundColumn>
|
||||
<telerik:GridBoundColumn DataField="Ansprechp"
|
||||
FilterControlAltText="Filter column2 column" HeaderText="Ansprechpartner"
|
||||
ReadOnly="True" UniqueName="column2">
|
||||
<HeaderStyle Width="100px" />
|
||||
<ItemStyle Wrap="False" />
|
||||
</telerik:GridBoundColumn>
|
||||
<telerik:GridDropDownColumn DataField="ZeitNr" DataSourceID="SQLDataZeiten"
|
||||
FilterControlAltText="Filter column6 column" HeaderText="Zeit"
|
||||
ListTextField="Bezeichnung" ListValueField="ZeitNr" UniqueName="column6">
|
||||
<HeaderStyle Width="70px" />
|
||||
<ItemStyle Wrap="False" />
|
||||
</telerik:GridDropDownColumn>
|
||||
<%-- <telerik:GridBoundColumn DataField="Anzahl"
|
||||
FilterControlAltText="Filter column4 column" HeaderText="Anz. Plätze"
|
||||
UniqueName="column4">
|
||||
</telerik:GridBoundColumn>
|
||||
--%>
|
||||
<telerik:GridDropDownColumn ColumnEditorID="DropAnzahl" DataField="Anzahl"
|
||||
DataSourceID="SqlDataSourceAnzahl" HeaderText="Anzahl" ListTextField="Anzahl"
|
||||
ListValueField="Anzahl" UniqueName="Anzahl">
|
||||
<ItemStyle Width="40px" />
|
||||
<HeaderStyle Width="50px" Wrap="False" />
|
||||
</telerik:GridDropDownColumn>
|
||||
<telerik:GridDropDownColumn DataField="Klassenr"
|
||||
DataSourceID="SQLDataSourceKlasse" FilterControlAltText="Filter column5 column"
|
||||
HeaderText="Mind. Anf." ListTextField="Bezeichnung" ListValueField="Klassenr"
|
||||
UniqueName="column5">
|
||||
<ItemStyle Width="40px" />
|
||||
<HeaderStyle Width="60px" Wrap="False" />
|
||||
</telerik:GridDropDownColumn>
|
||||
<telerik:GridBoundColumn ColumnEditorID="EditSchuelerBemerkung"
|
||||
DataField="Schuelerbemerkung" FilterControlAltText="Filter column2 column"
|
||||
HeaderText="Bem. f. Schüler"
|
||||
HeaderTooltip="Folgendes muss der Schüler mitbringen (spezielle Kleidung, Ausweis usw.)"
|
||||
UniqueName="Schuelerbemerkung">
|
||||
<HeaderStyle Width="100px" />
|
||||
<ItemStyle Wrap="False" />
|
||||
</telerik:GridBoundColumn>
|
||||
<telerik:GridBoundColumn ColumnEditorID="EditStandortBemerkung"
|
||||
DataField="standortbemerkung" FilterControlAltText="Filter column2 column"
|
||||
HeaderText="Bem. Treffpunkt"
|
||||
HeaderTooltip="Treffpunkt für Schüler, falls abweichend von der Geschäftsadresse"
|
||||
UniqueName="standortbemerkung">
|
||||
<HeaderStyle Width="100px" />
|
||||
<ItemStyle Wrap="False" />
|
||||
</telerik:GridBoundColumn>
|
||||
<telerik:GridBoundColumn ColumnEditorID="MinZuteilung"
|
||||
DataField="MinZuteilung" FilterControlAltText="Filter column2 column"
|
||||
HeaderText="MZ"
|
||||
HeaderTooltip="Mindest Anzahl Zuteilung"
|
||||
UniqueName="MinZuteilung">
|
||||
<HeaderStyle Width="40px" />
|
||||
<ItemStyle Wrap="False" />
|
||||
</telerik:GridBoundColumn>
|
||||
<telerik:GridEditCommandColumn ButtonType="ImageButton"
|
||||
FilterControlAltText="Filter EditCommandColumn column" HeaderText=""
|
||||
ItemStyle-HorizontalAlign="Center">
|
||||
<HeaderStyle Width="40px" />
|
||||
<ItemStyle HorizontalAlign="Center" />
|
||||
</telerik:GridEditCommandColumn>
|
||||
<telerik:GridButtonColumn ButtonType="ImageButton" CommandName="Delete"
|
||||
ConfirmDialogType="RadWindow" ConfirmText="Angebot wirklich löschen?"
|
||||
ConfirmTitle="Delete" HeaderText="" ItemStyle-HorizontalAlign="Center"
|
||||
Text="Delete" UniqueName="DeleteColumn">
|
||||
<ItemStyle CssClass="MyImageButton" HorizontalAlign="Center" />
|
||||
<HeaderStyle Width="40px" />
|
||||
</telerik:GridButtonColumn>
|
||||
</Columns>
|
||||
<EditFormSettings>
|
||||
<EditColumn ButtonType="ImageButton" CancelText="Abbruch"
|
||||
FilterControlAltText="Filter EditCommandColumn column" InsertText="Einfügen"
|
||||
UpdateText="Speichern">
|
||||
</EditColumn>
|
||||
</EditFormSettings>
|
||||
</MasterTableView>
|
||||
<FilterMenu EnableImageSprites="False">
|
||||
</FilterMenu>
|
||||
</telerik:RadGrid>
|
||||
<telerik:GridTextBoxColumnEditor runat="server" ID="EditSchuelerBemerkung" TextBoxMode="MultiLine" ></telerik:GridTextBoxColumnEditor>
|
||||
<telerik:GridTextBoxColumnEditor runat="server" ID="EditStandortBemerkung" TextBoxMode="MultiLine"></telerik:GridTextBoxColumnEditor>
|
||||
</td>
|
||||
</tr>
|
||||
</table>
|
||||
</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td valign="top">
|
||||
</td>
|
||||
</tr>
|
||||
</table>
|
||||
</div>
|
||||
</asp:Panel>
|
||||
<telerik:RadButton ID="RadButton3" runat="server"
|
||||
Text="< Zurück">
|
||||
</telerik:RadButton>
|
||||
<telerik:RadButton ID="RadButton5" runat="server"
|
||||
Text="Abschliessen">
|
||||
</telerik:RadButton>
|
||||
|
||||
<telerik:RadButton ID="RadButton6" runat="server" Text="Erfasste Daten drucken">
|
||||
</telerik:RadButton>
|
||||
|
||||
|
||||
|
||||
<telerik:RadButton ID="btnPrintReport" runat="server" Text="Parcoursdaten drucken">
|
||||
</telerik:RadButton>
|
||||
|
||||
|
||||
|
||||
<asp:SqlDataSource ID="SqlDataBerufe" runat="server"
|
||||
ConnectionString="<%$ ConnectionStrings:LPConnectionString %>"
|
||||
ProviderName="<%$ ConnectionStrings:LPConnectionString.ProviderName %>"
|
||||
SelectCommand="SELECT Berufnr, Bezeichnung FROM Beruf WHERE (Aktiv = 1) order by bezeichnung">
|
||||
</asp:SqlDataSource>
|
||||
|
||||
<asp:SqlDataSource ID="SqlDataZeiten" runat="server"
|
||||
ConnectionString="<%$ ConnectionStrings:LPConnectionString %>"
|
||||
ProviderName="<%$ ConnectionStrings:LPConnectionString.ProviderName %>"
|
||||
SelectCommand="SELECT ZeitNr, Bezeichnung FROM Zeiten WHERE (Aktiv = 1) order by reihenfolge">
|
||||
</asp:SqlDataSource>
|
||||
<asp:SqlDataSource ID="SqlDataAnsprechpartner" runat="server"
|
||||
ConnectionString="<%$ ConnectionStrings:LPConnectionString %>"
|
||||
ProviderName="<%$ ConnectionStrings:LPConnectionString.ProviderName %>"
|
||||
SelectCommand="SELECT AnsprechpartnerNr, Ansprechpartner.name + ' '+ Ansprechpartner.Vorname as AName
|
||||
FROM Ansprechpartner where aktiv=1 and firmanr=@Firmanr order by name, vorname">
|
||||
<SelectParameters>
|
||||
<asp:SessionParameter Name="Firmanr" SessionField="Firmanr" />
|
||||
</SelectParameters>
|
||||
</asp:SqlDataSource>
|
||||
<asp:SqlDataSource ID="SqlDataFirmaBeruf" runat="server"
|
||||
ConnectionString="<%$ ConnectionStrings:LPConnectionString %>"
|
||||
DeleteCommand="Update Firmaberuf set aktiv=0, mutiert_am=getdate(), mutierer=@mutierer where firmaberufnr=@firmaberufnr"
|
||||
ProviderName="<%$ ConnectionStrings:LPConnectionString.ProviderName %>"
|
||||
SelectCommand="SELECT firmaberuf.FirmaBerufNr, beruf.Bezeichnung as Beruf, ansprechpartner.Name+' '+ansprechpartner.Vorname as Ansprechp,ZeitNr, firmaberuf.Anzahl, FirmaBeruf.KlasseNr, firmaberuf.schuelerbemerkung, firmaberuf.standortbemerkung, firmaberuf.minzuteilung
|
||||
FROM firmaberuf INNER JOIN
|
||||
beruf ON firmaberuf.Berufnr = beruf.Berufnr INNER JOIN
|
||||
ansprechpartner ON firmaberuf.AnsprechpartnerNr = ansprechpartner.AnsprechpartnerNr
|
||||
where Firmaberuf.aktiv=1 and firmaberuf.firmanr=@Firmanr "
|
||||
|
||||
UpdateCommand="Update Firmaberuf set anzahl=@Anzahl, klassenr=@Klassenr, ZeitNr=@ZeitNr, mutiert_am=getdate(), mutierer=@mutierer,standortbemerkung=@standortbemerkung, schuelerbemerkung=@schuelerbemerkung, minzuteilung=@minzuteilung where firmaberufnr=@firmaberufnr ">
|
||||
<DeleteParameters>
|
||||
<asp:Parameter Name="firmaberufnr" />
|
||||
<asp:SessionParameter Name="mutierer" Type="Int32" sessionfield="UserID" />
|
||||
</DeleteParameters>
|
||||
<SelectParameters>
|
||||
<asp:SessionParameter Name="Firmanr" SessionField="Firmanr" />
|
||||
</SelectParameters>
|
||||
<UpdateParameters>
|
||||
<asp:Parameter Name="Anzahl" />
|
||||
<asp:Parameter Name="Klassenr" />
|
||||
<asp:Parameter Name="firmaberufnr" />
|
||||
<asp:Parameter Name="ZeitNr" />
|
||||
<asp:Parameter Name="Schuelerbemerkung" />
|
||||
<asp:Parameter Name="Standortbemerkung" />
|
||||
<asp:Parameter Name="Minzuteilung" />
|
||||
<asp:SessionParameter Name="mutierer" Type="Int32" sessionfield="UserID" />
|
||||
</UpdateParameters>
|
||||
</asp:SqlDataSource>
|
||||
<asp:SqlDataSource ID="SqlDataSourceKlasse" runat="server"
|
||||
ConnectionString="<%$ ConnectionStrings:LPConnectionString %>"
|
||||
ProviderName="<%$ ConnectionStrings:LPConnectionString.ProviderName %>"
|
||||
SelectCommand="SELECT klassenr as Klassenr, bezeichnung FROM web_klasse where aktiv=1 and bezeichnung <> 'n. relevant' order by klassenr">
|
||||
</asp:SqlDataSource>
|
||||
|
||||
|
||||
<telerik:RadWindowManager ID="RadWindowManager1" ShowContentDuringLoad="false" VisibleStatusbar="false"
|
||||
ReloadOnShow="true" runat="server" EnableShadow="true" Skin="Default">
|
||||
<Windows>
|
||||
<telerik:RadWindow ID="RadWindow1" runat="server" Behaviors="Close"
|
||||
NavigateUrl="~/UserControls/Berufsanfrage.aspx">
|
||||
</telerik:RadWindow>
|
||||
</Windows>
|
||||
</telerik:RadWindowManager>
|
||||
|
||||
|
||||
|
||||
|
||||
<asp:SqlDataSource ID="SqlDataSourceAnzahl" runat="server"
|
||||
ConnectionString="<%$ ConnectionStrings:LPConnectionString %>"
|
||||
SelectCommand="SELECT * FROM [Web_Anzhal]"></asp:SqlDataSource>
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
240
LPWeb20/Firmen/Firmenangebot.ascx.designer.vb
generated
Normal file
240
LPWeb20/Firmen/Firmenangebot.ascx.designer.vb
generated
Normal file
@@ -0,0 +1,240 @@
|
||||
'------------------------------------------------------------------------------
|
||||
' <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 Firmenangebot
|
||||
|
||||
'''<summary>
|
||||
'''Label1-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 Label1 As Global.System.Web.UI.WebControls.Label
|
||||
|
||||
'''<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
|
||||
|
||||
'''<summary>
|
||||
'''RadListBox1-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 RadListBox1 As Global.Telerik.Web.UI.RadListBox
|
||||
|
||||
'''<summary>
|
||||
'''RadButton2-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 RadButton2 As Global.Telerik.Web.UI.RadButton
|
||||
|
||||
'''<summary>
|
||||
'''RadListBox2-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 RadListBox2 As Global.Telerik.Web.UI.RadListBox
|
||||
|
||||
'''<summary>
|
||||
'''RadListBox3-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 RadListBox3 As Global.Telerik.Web.UI.RadListBox
|
||||
|
||||
'''<summary>
|
||||
'''RadComboBox1-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 RadComboBox1 As Global.Telerik.Web.UI.RadComboBox
|
||||
|
||||
'''<summary>
|
||||
'''RadComboboxKlasse-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 RadComboboxKlasse As Global.Telerik.Web.UI.RadComboBox
|
||||
|
||||
'''<summary>
|
||||
'''RadButton1-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 RadButton1 As Global.Telerik.Web.UI.RadButton
|
||||
|
||||
'''<summary>
|
||||
'''RadButton4-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 RadButton4 As Global.Telerik.Web.UI.RadButton
|
||||
|
||||
'''<summary>
|
||||
'''RadGrid1-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 RadGrid1 As Global.Telerik.Web.UI.RadGrid
|
||||
|
||||
'''<summary>
|
||||
'''EditSchuelerBemerkung-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 EditSchuelerBemerkung As Global.Telerik.Web.UI.GridTextBoxColumnEditor
|
||||
|
||||
'''<summary>
|
||||
'''EditStandortBemerkung-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 EditStandortBemerkung As Global.Telerik.Web.UI.GridTextBoxColumnEditor
|
||||
|
||||
'''<summary>
|
||||
'''RadButton3-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 RadButton3 As Global.Telerik.Web.UI.RadButton
|
||||
|
||||
'''<summary>
|
||||
'''RadButton5-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 RadButton5 As Global.Telerik.Web.UI.RadButton
|
||||
|
||||
'''<summary>
|
||||
'''RadButton6-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 RadButton6 As Global.Telerik.Web.UI.RadButton
|
||||
|
||||
'''<summary>
|
||||
'''btnPrintReport-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 btnPrintReport As Global.Telerik.Web.UI.RadButton
|
||||
|
||||
'''<summary>
|
||||
'''SqlDataBerufe-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 SqlDataBerufe As Global.System.Web.UI.WebControls.SqlDataSource
|
||||
|
||||
'''<summary>
|
||||
'''SqlDataZeiten-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 SqlDataZeiten As Global.System.Web.UI.WebControls.SqlDataSource
|
||||
|
||||
'''<summary>
|
||||
'''SqlDataAnsprechpartner-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 SqlDataAnsprechpartner As Global.System.Web.UI.WebControls.SqlDataSource
|
||||
|
||||
'''<summary>
|
||||
'''SqlDataFirmaBeruf-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 SqlDataFirmaBeruf As Global.System.Web.UI.WebControls.SqlDataSource
|
||||
|
||||
'''<summary>
|
||||
'''SqlDataSourceKlasse-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 SqlDataSourceKlasse As Global.System.Web.UI.WebControls.SqlDataSource
|
||||
|
||||
'''<summary>
|
||||
'''RadWindowManager1-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 RadWindowManager1 As Global.Telerik.Web.UI.RadWindowManager
|
||||
|
||||
'''<summary>
|
||||
'''RadWindow1-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 RadWindow1 As Global.Telerik.Web.UI.RadWindow
|
||||
|
||||
'''<summary>
|
||||
'''SqlDataSourceAnzahl-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 SqlDataSourceAnzahl As Global.System.Web.UI.WebControls.SqlDataSource
|
||||
End Class
|
||||
116
LPWeb20/Firmen/Firmenangebot.ascx.vb
Normal file
116
LPWeb20/Firmen/Firmenangebot.ascx.vb
Normal file
@@ -0,0 +1,116 @@
|
||||
Imports System.Web.Configuration
|
||||
Public Class Firmenangebot
|
||||
Inherits System.Web.UI.UserControl
|
||||
|
||||
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
|
||||
If Not Page.IsPostBack Then
|
||||
Try
|
||||
Me.RadListBox1.SelectedIndex = 0
|
||||
Catch
|
||||
End Try
|
||||
Try
|
||||
Me.RadListBox2.SelectedIndex = 0
|
||||
Catch
|
||||
End Try
|
||||
Try
|
||||
Me.RadListBox3.SelectedIndex = 0
|
||||
Catch
|
||||
End Try
|
||||
Try
|
||||
Me.RadComboBox1.SelectedIndex = 0
|
||||
Catch
|
||||
End Try
|
||||
End If
|
||||
If Session("admin") <> "True" Then
|
||||
Me.SqlDataZeiten.SelectCommand = "SELECT ZeitNr, Bezeichnung FROM Zeiten WHERE (Aktiv = 1 and Oeffentlich=1) order by reihenfolge"
|
||||
Me.RadGrid1.Columns(8).Visible = False
|
||||
End If
|
||||
' If Me.RadListBox2.Items.Count < 3 Then
|
||||
'System.Web.HttpContext.Current.Response.Write("<SCRIPT LANGUAGE='JavaScript'>alert('Hello this is an Alert')</SCRIPT>")
|
||||
'End If
|
||||
Dim DH As New clsDatahandling
|
||||
If UCase(DH.Get_Option(10)) = "JA" And Session("Admin") <> "True" Then
|
||||
RadButton1.Visible = False
|
||||
RadButton2.Visible = False
|
||||
RadButton3.Visible = False
|
||||
RadButton4.Visible = False
|
||||
RadButton5.Visible = False
|
||||
RadButton1.Enabled = False
|
||||
RadButton2.Enabled = False
|
||||
RadButton3.Enabled = False
|
||||
RadButton4.Enabled = False
|
||||
RadButton5.Enabled = False
|
||||
Me.RadGrid1.Enabled = False
|
||||
End If
|
||||
If DH.Get_Option(24) = "True" Then
|
||||
Me.btnPrintReport.Visible = True
|
||||
Else
|
||||
Me.btnPrintReport.Visible = False
|
||||
End If
|
||||
End Sub
|
||||
|
||||
|
||||
Protected Sub RadButton1_Click(sender As Object, e As EventArgs) Handles RadButton1.Click
|
||||
Me.RadWindowManager1.Windows.Clear()
|
||||
If Me.RadComboBox1.SelectedValue = 0 Then
|
||||
Showmessage(1, "Bitte die Anzahl Plätze angeben.")
|
||||
Me.RadComboBox1.Focus()
|
||||
Exit Sub
|
||||
End If
|
||||
If Me.RadListBox2.Items.Count = 0 Then
|
||||
System.Web.HttpContext.Current.Response.Write("<SCRIPT LANGUAGE='JavaScript'>alert('Sie müssten zuerst mind. einen Ansprechpartner festlegen.')</SCRIPT>")
|
||||
Exit Sub
|
||||
End If
|
||||
Dim dh As New clsDatahandling
|
||||
dh.Insert_FirmaBeruf(Session.Item("Firmanr"), RadListBox1.SelectedValue, RadListBox2.SelectedValue, RadListBox3.SelectedValue, RadComboBox1.SelectedValue, Me.RadComboboxKlasse.SelectedValue, Session.Item("Userid"))
|
||||
Me.RadGrid1.MasterTableView.Rebind()
|
||||
End Sub
|
||||
|
||||
|
||||
Protected Sub RadButton2_Click(sender As Object, e As EventArgs) Handles RadButton2.Click
|
||||
Me.RadListBox2.DataBind()
|
||||
End Sub
|
||||
|
||||
Protected Sub RadButton3_Click(sender As Object, e As EventArgs) Handles RadButton3.Click
|
||||
Response.Redirect("~/Firmen/Firmendaten1.aspx?Tab=2")
|
||||
End Sub
|
||||
|
||||
Protected Sub RadButton4_Click(sender As Object, e As EventArgs) Handles RadButton4.Click
|
||||
Response.Redirect("~/usercontrols/Berufsanfrage1.aspx")
|
||||
'ShowWindow()
|
||||
End Sub
|
||||
|
||||
Private Sub ShowWindow()
|
||||
Dim newwindow As New Telerik.Web.UI.RadWindow
|
||||
|
||||
newwindow.NavigateUrl = "~/UserControls/Berufsanfrage.aspx"
|
||||
newwindow.ID = "RadWindow2"
|
||||
newwindow.Skin = "Default"
|
||||
newwindow.VisibleOnPageLoad = True
|
||||
newwindow.Height = 220
|
||||
newwindow.Width = 500
|
||||
|
||||
'newwindow.AutoSize = True
|
||||
RadWindowManager1.Windows.Clear()
|
||||
RadWindowManager1.Windows.Add(newwindow)
|
||||
End Sub
|
||||
|
||||
Protected Sub RadButton5_Click(sender As Object, e As EventArgs) Handles RadButton5.Click
|
||||
Dim image As String = WebConfigurationManager.AppSettings("Imagepath") + "info1.png"
|
||||
RadWindowManager1.RadAlert("Besten Dank für Ihre aktive Mitarbeit.", 330, 100, "Bestätigung", "alertCallBackFn", image)
|
||||
'Response.Redirect("~/default.aspx")
|
||||
End Sub
|
||||
Private Sub Showmessage(ByVal typ As Integer, ByVal meldung As String)
|
||||
Dim image As String = WebConfigurationManager.AppSettings("Imagepath") + "info1.png"
|
||||
RadWindowManager1.RadAlert(meldung, 330, 100, "Bestätigung", "alertCallBackFn1", image)
|
||||
End Sub
|
||||
|
||||
Protected Sub RadButton6_Click(sender As Object, e As EventArgs) Handles RadButton6.Click
|
||||
Response.Redirect("~/Firmen/FirmenReport.aspx?Report=ReportFirma")
|
||||
End Sub
|
||||
|
||||
|
||||
Protected Sub btnPrintReport_Click(sender As Object, e As EventArgs) Handles btnPrintReport.Click
|
||||
Response.Redirect("~/Firmen/FirmenReport.aspx?Report=ReportFirma1")
|
||||
End Sub
|
||||
End Class
|
||||
203
LPWeb20/Firmen/Firmenansprechpartner.ascx
Normal file
203
LPWeb20/Firmen/Firmenansprechpartner.ascx
Normal file
@@ -0,0 +1,203 @@
|
||||
<%@ Control Language="vb" AutoEventWireup="false" CodeBehind="Firmenansprechpartner.ascx.vb" Inherits="LPWeb.Firmenansprechpartner" %>
|
||||
<script type="text/javascript" id="telerikClientEvents1">
|
||||
//<![CDATA[
|
||||
function alertCallBackFn(arg) {
|
||||
window.location = "../Firmen/Firmendaten1.aspx?Tab=3"
|
||||
//radalert("<strong>radalert</strong> returned the following result: <h3 style='color: #ff0000;'>" + arg + "</h3>", null, null, "Result");
|
||||
}
|
||||
function alertCallBackFnError(arg) {
|
||||
//window.location = "../Firmen/Firmendaten1.aspx?Tab=3"
|
||||
//radalert("<strong>radalert</strong> returned the following result: <h3 style='color: #ff0000;'>" + arg + "</h3>", null, null, "Result");
|
||||
}
|
||||
|
||||
|
||||
//]]>
|
||||
</script>
|
||||
|
||||
<p>
|
||||
<telerik:RadWindowManager ID="RadWindowManager1" runat="server">
|
||||
</telerik:RadWindowManager>
|
||||
</p>
|
||||
<asp:Panel ID="Panel1" runat="server" Height="341px">
|
||||
<telerik:RadGrid ID="RadGrid1" runat="server" Culture="de-DE"
|
||||
DataSourceID="SqlDataSource1" AllowPaging="True" AllowSorting="True"
|
||||
AutoGenerateColumns="False" CellSpacing="0" GridLines="None"
|
||||
AllowAutomaticUpdates="True" AllowAutomaticDeletes="True"
|
||||
AllowAutomaticInserts="True">
|
||||
<MasterTableView DataKeyNames="AnsprechpartnerNr"
|
||||
DataSourceID="SqlDataSource1" CommandItemDisplay="TopAndBottom"
|
||||
TableLayout="Fixed" NoMasterRecordsText="Keine Datensätze vorhanden">
|
||||
<CommandItemSettings ExportToPdfText="PDF-Export"
|
||||
AddNewRecordText="Neuer Datensatz" ExportToExcelText="Excel-Export"
|
||||
RefreshText="Aktualisieren">
|
||||
</CommandItemSettings>
|
||||
<RowIndicatorColumn Visible="True"
|
||||
FilterControlAltText="Filter RowIndicator column">
|
||||
</RowIndicatorColumn>
|
||||
<ExpandCollapseColumn Visible="True"
|
||||
FilterControlAltText="Filter ExpandColumn column">
|
||||
</ExpandCollapseColumn>
|
||||
<Columns>
|
||||
<telerik:GridBoundColumn DataField="AnsprechpartnerNr" DataType="System.Int32"
|
||||
FilterControlAltText="Filter AnsprechpartnerNr column" HeaderText="Nr"
|
||||
ReadOnly="True" SortExpression="AnsprechpartnerNr"
|
||||
UniqueName="AnsprechpartnerNr">
|
||||
<HeaderStyle Width="25px" />
|
||||
<ItemStyle Wrap="false" />
|
||||
</telerik:GridBoundColumn>
|
||||
<telerik:GridBoundColumn DataField="FirmaNr" DataType="System.Int32"
|
||||
FilterControlAltText="Filter FirmaNr column" HeaderText="FirmaNr"
|
||||
SortExpression="FirmaNr" UniqueName="FirmaNr" Visible="false"
|
||||
ReadOnly="True">
|
||||
</telerik:GridBoundColumn>
|
||||
|
||||
<telerik:GridDropDownColumn DataField="Anrede" DataSourceID="SqlDataSource2"
|
||||
HeaderText="Anrede" ListTextField="Bezeichnung" ListValueField="Eintrag"
|
||||
UniqueName="Anrede" ColumnEditorID="DropUserType">
|
||||
<ItemStyle Width="40px" />
|
||||
<HeaderStyle Width="80px" Wrap="False" />
|
||||
</telerik:GridDropDownColumn>
|
||||
<telerik:GridBoundColumn DataField="Name"
|
||||
FilterControlAltText="Filter Name column" HeaderText="Name"
|
||||
SortExpression="Name" UniqueName="Name">
|
||||
<HeaderStyle Width="120px" />
|
||||
<ItemStyle Wrap="false" />
|
||||
</telerik:GridBoundColumn>
|
||||
|
||||
|
||||
<telerik:GridBoundColumn DataField="Vorname"
|
||||
FilterControlAltText="Filter Vorname column" HeaderText="Vorname"
|
||||
SortExpression="Vorname" UniqueName="Vorname">
|
||||
<HeaderStyle Width="120px" />
|
||||
<ItemStyle Wrap="false" />
|
||||
</telerik:GridBoundColumn>
|
||||
<telerik:GridBoundColumn DataField="Tel"
|
||||
FilterControlAltText="Filter Tel column" HeaderText="Tel" SortExpression="Tel"
|
||||
UniqueName="Tel">
|
||||
<HeaderStyle Width="100px" />
|
||||
<ItemStyle Wrap="false" />
|
||||
</telerik:GridBoundColumn>
|
||||
<telerik:GridBoundColumn DataField="EMail"
|
||||
FilterControlAltText="Filter EMail column" HeaderText="EMail"
|
||||
SortExpression="EMail" UniqueName="EMail">
|
||||
<HeaderStyle Width="160px" />
|
||||
<ItemStyle Wrap="false" />
|
||||
</telerik:GridBoundColumn>
|
||||
<telerik:GridBoundColumn DataField="Erstellt_am" DataType="System.DateTime"
|
||||
FilterControlAltText="Filter Erstellt_am column" HeaderText="Erstellt_am"
|
||||
SortExpression="Erstellt_am" UniqueName="Erstellt_am" Visible="False"
|
||||
ReadOnly="True">
|
||||
<HeaderStyle Width="80px" />
|
||||
<ItemStyle Wrap="False" />
|
||||
</telerik:GridBoundColumn>
|
||||
<telerik:GridBoundColumn DataField="Mutiert_am" DataType="System.DateTime"
|
||||
FilterControlAltText="Filter Mutiert_am column" HeaderText="Mutiert_am"
|
||||
SortExpression="Mutiert_am" UniqueName="Mutiert_am" Visible="false"
|
||||
ReadOnly="True">
|
||||
<HeaderStyle Width="80px" />
|
||||
<ItemStyle Wrap="false" />
|
||||
</telerik:GridBoundColumn>
|
||||
<telerik:GridBoundColumn DataField="Mutierer" DataType="System.Int32"
|
||||
FilterControlAltText="Filter Mutierer column" HeaderText="Mutierer"
|
||||
SortExpression="Mutierer" UniqueName="Mutierer" Visible="false"
|
||||
ReadOnly="True">
|
||||
<HeaderStyle Width="80px" />
|
||||
<ItemStyle Wrap="false" />
|
||||
</telerik:GridBoundColumn>
|
||||
<telerik:GridCheckBoxColumn DataField="Aktiv" DataType="System.Boolean"
|
||||
FilterControlAltText="Filter Aktiv column" HeaderText="Aktiv"
|
||||
SortExpression="Aktiv" UniqueName="Aktiv" Visible="false" ReadOnly="True">
|
||||
<HeaderStyle Width="80px" />
|
||||
<ItemStyle Wrap="false" />
|
||||
</telerik:GridCheckBoxColumn>
|
||||
|
||||
<%-- <telerik:GridBoundColumn DataField="Anrede"
|
||||
FilterControlAltText="Filter Anrede column" HeaderText="Anrede"
|
||||
SortExpression="Anrede" UniqueName="Anrede">
|
||||
<HeaderStyle Width="160px" />
|
||||
<ItemStyle Wrap="false" />
|
||||
</telerik:GridBoundColumn>
|
||||
--%> <telerik:GridEditCommandColumn FilterControlAltText="Filter EditCommandColumn column"
|
||||
HeaderText="" ButtonType="ImageButton" ItemStyle-HorizontalAlign="Center">
|
||||
<HeaderStyle Width="40px" />
|
||||
<ItemStyle HorizontalAlign="Center"></ItemStyle>
|
||||
</telerik:GridEditCommandColumn>
|
||||
<telerik:GridButtonColumn ConfirmText="Ansprechpartner wirklich löschen?" ConfirmDialogType="RadWindow"
|
||||
ConfirmTitle="Delete" ButtonType="ImageButton"
|
||||
CommandName="Delete" Text="Delete" HeaderText=""
|
||||
UniqueName="DeleteColumn" ItemStyle-HorizontalAlign="Center">
|
||||
<ItemStyle HorizontalAlign="Center" CssClass="MyImageButton" />
|
||||
<HeaderStyle Width="40px" />
|
||||
</telerik:GridButtonColumn>
|
||||
</Columns>
|
||||
<EditFormSettings>
|
||||
<EditColumn FilterControlAltText="Filter EditCommandColumn column" ButtonType="ImageButton"
|
||||
InsertText="Einfügen" UpdateText="Speichern" CancelText="Abbruch">
|
||||
</EditColumn>
|
||||
</EditFormSettings>
|
||||
</MasterTableView>
|
||||
<FilterMenu EnableImageSprites="False">
|
||||
</FilterMenu>
|
||||
</telerik:RadGrid>
|
||||
|
||||
|
||||
</asp:Panel>
|
||||
<asp:SqlDataSource ID="SqlDataSource1" runat="server"
|
||||
ConnectionString="<%$ ConnectionStrings:LPConnectionString %>"
|
||||
DeleteCommand="Update [Ansprechpartner] set aktiv=0, mutiert_am=getdate(), mutierer=@Mutierer WHERE [AnsprechpartnerNr] = @AnsprechpartnerNr"
|
||||
InsertCommand="INSERT INTO [Ansprechpartner] ([FirmaNr], [Name], [Vorname], [Tel], [EMail], [Erstellt_am], [Mutiert_am], [Mutierer], [Aktiv], [Anrede]) VALUES ( @FirmaNr, @Name, @Vorname, @Tel, @EMail, getdate(), getdate(), @Mutierer, 1, @Anrede)"
|
||||
ProviderName="<%$ ConnectionStrings:LPConnectionString.ProviderName %>"
|
||||
SelectCommand="SELECT * FROM [Ansprechpartner] where firmanr=@Firmanr and aktiv=1"
|
||||
UpdateCommand="UPDATE [Ansprechpartner] SET [Name] = @Name, [Vorname] = @Vorname, [Tel] = @Tel, [EMail] = @EMail, [Erstellt_am] = getdate(), [Mutiert_am] = getdate(), [Mutierer] = @Mutierer, [Anrede] = @Anrede WHERE [AnsprechpartnerNr] = @AnsprechpartnerNr">
|
||||
<DeleteParameters>
|
||||
<asp:Parameter Name="AnsprechpartnerNr" Type="Int32" />
|
||||
<asp:SessionParameter Name="mutierer" Type="Int32" sessionfield="UserID" />
|
||||
</DeleteParameters>
|
||||
<InsertParameters>
|
||||
<asp:Parameter Name="AnsprechpartnerNr" Type="Int32" />
|
||||
<asp:SessionParameter Name="FirmaNr" Type="Int32" sessionfield="FirmaNr" />
|
||||
<asp:Parameter Name="Name" Type="String" />
|
||||
<asp:Parameter Name="Vorname" Type="String" />
|
||||
<asp:Parameter Name="Tel" Type="String" />
|
||||
<asp:Parameter Name="EMail" Type="String" />
|
||||
<asp:Parameter Name="Erstellt_am" Type="DateTime" />
|
||||
<asp:Parameter Name="Mutiert_am" Type="DateTime" />
|
||||
<asp:SessionParameter Name="mutierer" Type="Int32" sessionfield="UserID" />
|
||||
<asp:Parameter Name="Aktiv" Type="Boolean" />
|
||||
<asp:Parameter Name="Anrede" Type="String" />
|
||||
</InsertParameters>
|
||||
<UpdateParameters>
|
||||
<asp:SessionParameter Name="FirmaNr" Type="Int32" sessionfield="FirmaNr" />
|
||||
<asp:Parameter Name="Name" Type="String" />
|
||||
<asp:Parameter Name="Vorname" Type="String" />
|
||||
<asp:Parameter Name="Tel" Type="String" />
|
||||
<asp:Parameter Name="EMail" Type="String" />
|
||||
<asp:Parameter Name="Erstellt_am" Type="DateTime" />
|
||||
<asp:Parameter Name="Mutiert_am" Type="DateTime" />
|
||||
<asp:SessionParameter Name="mutierer" Type="Int32" sessionfield="UserID" />
|
||||
<asp:Parameter Name="Aktiv" Type="Boolean" />
|
||||
<asp:Parameter Name="Anrede" Type="String" />
|
||||
<asp:Parameter Name="AnsprechpartnerNr" Type="Int32" />
|
||||
</UpdateParameters>
|
||||
<SelectParameters>
|
||||
<asp:SessionParameter Name="FirmaNr" Type="Int32" sessionfield="FirmaNr" />
|
||||
</SelectParameters>
|
||||
</asp:SqlDataSource>
|
||||
|
||||
<telerik:RadButton ID="RadButton1" runat="server" Text="< Zurück">
|
||||
</telerik:RadButton>
|
||||
<telerik:RadButton ID="RadButton2" runat="server" Text="Weiter >">
|
||||
</telerik:RadButton>
|
||||
|
||||
|
||||
<asp:SqlDataSource ID="SqlDataSource2" runat="server"
|
||||
ConnectionString="<%$ ConnectionStrings:LPConnectionString %>"
|
||||
SelectCommand="SELECT [Eintrag], [Bezeichnung] FROM [Web_Anrede] WHERE ([Bezeichnung] <> @Bezeichnung)">
|
||||
<SelectParameters>
|
||||
<asp:Parameter DefaultValue="Damen und Herren" Name="Bezeichnung"
|
||||
Type="String" />
|
||||
</SelectParameters>
|
||||
</asp:SqlDataSource>
|
||||
|
||||
|
||||
|
||||
78
LPWeb20/Firmen/Firmenansprechpartner.ascx.designer.vb
generated
Normal file
78
LPWeb20/Firmen/Firmenansprechpartner.ascx.designer.vb
generated
Normal file
@@ -0,0 +1,78 @@
|
||||
'------------------------------------------------------------------------------
|
||||
' <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 Firmenansprechpartner
|
||||
|
||||
'''<summary>
|
||||
'''RadWindowManager1-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 RadWindowManager1 As Global.Telerik.Web.UI.RadWindowManager
|
||||
|
||||
'''<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
|
||||
|
||||
'''<summary>
|
||||
'''RadGrid1-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 RadGrid1 As Global.Telerik.Web.UI.RadGrid
|
||||
|
||||
'''<summary>
|
||||
'''SqlDataSource1-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 SqlDataSource1 As Global.System.Web.UI.WebControls.SqlDataSource
|
||||
|
||||
'''<summary>
|
||||
'''RadButton1-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 RadButton1 As Global.Telerik.Web.UI.RadButton
|
||||
|
||||
'''<summary>
|
||||
'''RadButton2-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 RadButton2 As Global.Telerik.Web.UI.RadButton
|
||||
|
||||
'''<summary>
|
||||
'''SqlDataSource2-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 SqlDataSource2 As Global.System.Web.UI.WebControls.SqlDataSource
|
||||
End Class
|
||||
175
LPWeb20/Firmen/Firmenansprechpartner.ascx.vb
Normal file
175
LPWeb20/Firmen/Firmenansprechpartner.ascx.vb
Normal file
@@ -0,0 +1,175 @@
|
||||
Imports Telerik.Web.UI
|
||||
Imports System.Web.Configuration
|
||||
Public Class Firmenansprechpartner
|
||||
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
|
||||
If UCase(DH.Get_Option(10)) = "JA" And Session("Admin") <> "True" Then
|
||||
RadButton1.Visible = False
|
||||
RadButton2.Visible = False
|
||||
RadButton1.Enabled = False
|
||||
RadButton2.Enabled = False
|
||||
Me.RadGrid1.Enabled = False
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Protected Sub RadButton1_Click(sender As Object, e As EventArgs) Handles RadButton1.Click
|
||||
Response.Redirect("~/Firmen/Firmendaten1.aspx?Tab=1")
|
||||
End Sub
|
||||
|
||||
Protected Sub RadButton2_Click(sender As Object, e As EventArgs) Handles RadButton2.Click
|
||||
Response.Redirect("~/Firmen/Firmendaten1.aspx?Tab=3")
|
||||
End Sub
|
||||
|
||||
Private Sub RadGrid1_InsertCommand(sender As Object, e As Telerik.Web.UI.GridCommandEventArgs) Handles RadGrid1.InsertCommand
|
||||
Dim editedItem As GridEditableItem = CType(e.Item, GridEditableItem)
|
||||
Dim editMan As GridEditManager = editedItem.EditManager
|
||||
Dim haserror As Boolean = False
|
||||
Dim column As GridColumn
|
||||
Dim i As Integer = 0
|
||||
For Each column In e.Item.OwnerTableView.Columns
|
||||
If TypeOf column Is IGridEditableColumn Then
|
||||
Dim editableCol As IGridEditableColumn = CType(column, IGridEditableColumn)
|
||||
If (editableCol.IsEditable) Then
|
||||
Dim editor As IGridColumnEditor = editMan.GetColumnEditor(editableCol)
|
||||
|
||||
Dim editorType As String = CType(editor, Object).ToString()
|
||||
Dim editorText As String = "unknown"
|
||||
Dim editorValue As Object = Nothing
|
||||
|
||||
If (TypeOf editor Is GridTextColumnEditor) Then
|
||||
editorText = CType(editor, GridTextColumnEditor).Text
|
||||
editorValue = CType(editor, GridTextColumnEditor).Text
|
||||
If editorText.Trim = "" Then haserror = True
|
||||
End If
|
||||
|
||||
i = i + 1
|
||||
If i = 5 Then
|
||||
If Verify_Mail(editorText).ToString = False Then
|
||||
Show_Message(1, "Die eingegebene E-Mail-Adresse ist ungültig.")
|
||||
e.Canceled = True
|
||||
Return
|
||||
End If
|
||||
End If
|
||||
If (TypeOf editor Is GridBoolColumnEditor) Then
|
||||
editorText = CType(editor, GridBoolColumnEditor).Value.ToString()
|
||||
editorValue = CType(editor, GridBoolColumnEditor).Value
|
||||
End If
|
||||
|
||||
If (TypeOf editor Is GridDropDownColumnEditor) Then
|
||||
editorText = CType(editor, GridDropDownColumnEditor).SelectedText & "; " & CType(editor, GridDropDownColumnEditor).SelectedValue
|
||||
editorValue = CType(editor, GridDropDownColumnEditor).SelectedValue
|
||||
End If
|
||||
If (TypeOf editor Is GridDateTimeColumnEditor) Then
|
||||
editorText = CType(editor, GridDateTimeColumnEditor).Text
|
||||
editorValue = CType(editor, GridDateTimeColumnEditor).Text
|
||||
End If
|
||||
'Try
|
||||
' Dim changedRows As DataRow() = Me.EmployeesData.Tables("Employees").Select("EmployeeID = " & editedItem.OwnerTableView.DataKeyValues(editedItem.ItemIndex)("EmployeeID"))
|
||||
' changedRows(0)(column.UniqueName) = editorValue
|
||||
' Me.EmployeesData.Tables("Employees").AcceptChanges()
|
||||
'Catch ex As Exception
|
||||
' RadGrid1.Controls.Add(New LiteralControl("<strong>Unable to set value of column '" & column.UniqueName & "'</strong> - " + ex.Message))
|
||||
' e.Canceled = True
|
||||
'End Try
|
||||
|
||||
End If
|
||||
End If
|
||||
Next
|
||||
If haserror Then
|
||||
Show_Message(1, "Daten können nicht gespeichert werden. Es sind zwinged alle Felder zu befüllen.")
|
||||
e.Canceled = True
|
||||
End If
|
||||
|
||||
End Sub
|
||||
|
||||
|
||||
Private Sub RadGrid1_UpdateCommand(sender As Object, e As Telerik.Web.UI.GridCommandEventArgs) Handles RadGrid1.UpdateCommand
|
||||
Dim editedItem As GridEditableItem = CType(e.Item, GridEditableItem)
|
||||
Dim editMan As GridEditManager = editedItem.EditManager
|
||||
Dim haserror As Boolean = False
|
||||
Dim column As GridColumn
|
||||
|
||||
Dim i As Integer = 0
|
||||
For Each column In e.Item.OwnerTableView.Columns
|
||||
|
||||
If TypeOf column Is IGridEditableColumn Then
|
||||
Dim editableCol As IGridEditableColumn = CType(column, IGridEditableColumn)
|
||||
If (editableCol.IsEditable) Then
|
||||
Dim editor As IGridColumnEditor = editMan.GetColumnEditor(editableCol)
|
||||
|
||||
Dim editorType As String = CType(editor, Object).ToString()
|
||||
Dim editorText As String = "unknown"
|
||||
Dim editorValue As Object = Nothing
|
||||
|
||||
If (TypeOf editor Is GridTextColumnEditor) Then
|
||||
editorText = CType(editor, GridTextColumnEditor).Text
|
||||
editorValue = CType(editor, GridTextColumnEditor).Text
|
||||
If editorText.Trim = "" Then haserror = True
|
||||
End If
|
||||
i = i + 1
|
||||
If i = 5 Then
|
||||
If Verify_Mail(editorText).ToString = False Then
|
||||
Show_Message(1, "Die eingegebene E-Mail-Adresse ist ungültig.")
|
||||
e.Canceled = True
|
||||
Return
|
||||
End If
|
||||
End If
|
||||
If (TypeOf editor Is GridBoolColumnEditor) Then
|
||||
editorText = CType(editor, GridBoolColumnEditor).Value.ToString()
|
||||
editorValue = CType(editor, GridBoolColumnEditor).Value
|
||||
End If
|
||||
|
||||
If (TypeOf editor Is GridDropDownColumnEditor) Then
|
||||
editorText = CType(editor, GridDropDownColumnEditor).SelectedText & "; " & CType(editor, GridDropDownColumnEditor).SelectedValue
|
||||
editorValue = CType(editor, GridDropDownColumnEditor).SelectedValue
|
||||
End If
|
||||
If (TypeOf editor Is GridDateTimeColumnEditor) Then
|
||||
editorText = CType(editor, GridDateTimeColumnEditor).Text
|
||||
editorValue = CType(editor, GridDateTimeColumnEditor).Text
|
||||
End If
|
||||
'Try
|
||||
' Dim changedRows As DataRow() = Me.EmployeesData.Tables("Employees").Select("EmployeeID = " & editedItem.OwnerTableView.DataKeyValues(editedItem.ItemIndex)("EmployeeID"))
|
||||
' changedRows(0)(column.UniqueName) = editorValue
|
||||
' Me.EmployeesData.Tables("Employees").AcceptChanges()
|
||||
'Catch ex As Exception
|
||||
' RadGrid1.Controls.Add(New LiteralControl("<strong>Unable to set value of column '" & column.UniqueName & "'</strong> - " + ex.Message))
|
||||
' e.Canceled = True
|
||||
'End Try
|
||||
|
||||
End If
|
||||
End If
|
||||
Next
|
||||
If haserror Then
|
||||
Show_Message(1, "Daten können nicht gespeichert werden. Es sind zwinged alle Felder zu befüllen.")
|
||||
e.Canceled = True
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Protected Sub Show_Message(ByVal type As Integer, ByVal meldung As String)
|
||||
Dim image1 As String
|
||||
Select Case type
|
||||
Case 1
|
||||
image1 = WebConfigurationManager.AppSettings("Imagepath") + "Error.png"
|
||||
Case 2
|
||||
image1 = WebConfigurationManager.AppSettings("Imagepath") + "Info1.png"
|
||||
End Select
|
||||
RadWindowManager1.RadAlert(meldung, 330, 100, "Fehler", "alertCallBackFnError", image1)
|
||||
|
||||
End Sub
|
||||
|
||||
Protected Function Verify_Mail(ByVal mail As String) As Boolean
|
||||
|
||||
Dim Expression As New System.Text.RegularExpressions.Regex("\S+@\S+\.\S+")
|
||||
' If the email matches the regular expression
|
||||
If Expression.IsMatch(mail) Then
|
||||
Return True
|
||||
Else
|
||||
Return False
|
||||
End If
|
||||
|
||||
End Function
|
||||
|
||||
|
||||
End Class
|
||||
239
LPWeb20/Firmen/Firmendaten.ascx
Normal file
239
LPWeb20/Firmen/Firmendaten.ascx
Normal file
@@ -0,0 +1,239 @@
|
||||
<%@ Control Language="vb" AutoEventWireup="false" CodeBehind="Firmendaten.ascx.vb" Inherits="LPWeb.Firmendaten" %>
|
||||
<style type="text/css">
|
||||
.style1
|
||||
{
|
||||
}
|
||||
.style2
|
||||
{
|
||||
height: 7px;
|
||||
}
|
||||
.riLabel1
|
||||
{
|
||||
font: 12px "segoe ui" ,arial,sans-serif; color:Black;
|
||||
width:115px;
|
||||
}
|
||||
|
||||
</style>
|
||||
<script runat="server">
|
||||
Public Sub CheckID(source As Object, args As ServerValidateEventArgs)
|
||||
Check_Userid(source, args)
|
||||
End Sub
|
||||
Public Sub CheckCaptcha(source As Object, args As ServerValidateEventArgs)
|
||||
Check_Captcha(source, args)
|
||||
End Sub
|
||||
</script>
|
||||
<p></p>
|
||||
<telerik:RadAjaxManager ID="RadAjaxManager1" runat="server">
|
||||
<AjaxSettings>
|
||||
<telerik:AjaxSetting AjaxControlID="btnRegister">
|
||||
<UpdatedControls>
|
||||
<telerik:AjaxUpdatedControl ControlID="MainPanel"
|
||||
LoadingPanelID="RadAjaxLoadingPanel1" />
|
||||
</UpdatedControls>
|
||||
</telerik:AjaxSetting>
|
||||
</AjaxSettings>
|
||||
</telerik:RadAjaxManager>
|
||||
<telerik:RadAjaxLoadingPanel ID="RadAjaxLoadingPanel1" Runat="server"
|
||||
Skin="Default">
|
||||
</telerik:RadAjaxLoadingPanel>
|
||||
<asp:ValidationSummary ID="ValidationSummary1" runat="server" ForeColor="Red"
|
||||
HeaderText="Folgende Fehler sind vorhanden:" />
|
||||
<asp:RequiredFieldValidator ID="RV11" runat="server" ControlToValidate="txtNameZ1" ErrorMessage="Firmenname fehlt" ForeColor="White">> </asp:RequiredFieldValidator>
|
||||
<asp:RequiredFieldValidator ID="RV2" runat="server" ControlToValidate="txtEmail" ErrorMessage="E-Mailadresse fehlt" ForeColor="White">> </asp:RequiredFieldValidator>
|
||||
<asp:RequiredFieldValidator ID="RV3" runat="server" ControlToValidate="txtPlz" ErrorMessage="Postleitzahl fehlt" ForeColor="White">> </asp:RequiredFieldValidator>
|
||||
<asp:RequiredFieldValidator ID="RV4" runat="server" ControlToValidate="txtort" ErrorMessage="Ort fehlt" ForeColor="White">> </asp:RequiredFieldValidator>
|
||||
<asp:RequiredFieldValidator ID="RV5" runat="server" ControlToValidate="txttelefon" ErrorMessage="Telefon-Nummer fehlt" ForeColor="White">> </asp:RequiredFieldValidator>
|
||||
<asp:RequiredFieldValidator ID="RV6" runat="server" ControlToValidate="txtPasswort1" ErrorMessage="Passwort fehlt" ForeColor="White">> </asp:RequiredFieldValidator>
|
||||
<asp:RequiredFieldValidator ID="RV7" runat="server" ControlToValidate="txtUsername" ErrorMessage="Benutzername fehlt" ForeColor="White">> </asp:RequiredFieldValidator>
|
||||
<asp:RequiredFieldValidator ID="RV9" runat="server" ControlToValidate="txtUserEmail" ErrorMessage="Benutzer-E-Mail fehlt" ForeColor="White">> </asp:RequiredFieldValidator>
|
||||
<asp:RegularExpressionValidator ID="Eegex1" runat="server" ErrorMessage="E-Mail-Adresse ungültig" ForeColor="White" ControlToValidate="txtEmail" ValidationExpression="\w+([-+.]\w+)*@\w+([-.]\w+)*\.\w+([-.]\w+)*">*</asp:RegularExpressionValidator>
|
||||
|
||||
<%--<asp:RegularExpressionValidator ID="RegularExpressionValidator1" runat="server" ErrorMessage="E-Mail-Adresse ungültig" ForeColor="White" ControlToValidate="txtEmail" ValidationExpression="^([\w\.\-]+)@([\w\-]+)((\.(\w){2,3})+)$">*</asp:RegularExpressionValidator>--%>
|
||||
<asp:RegularExpressionValidator ID="Regex2" runat="server" controlToValidate="txtPasswort1" ErrorMessage="Passwort muss 4-12 Zeichen beinhalten" ValidationExpression="[^\s]{4,12}" ForeColor="White"/>
|
||||
<asp:RegularExpressionValidator ID="Regex3" runat="server" ControlToValidate="txtPasswort1" ErrorMessage="Passwort muss ein Sonderzeichen @#$%^&.*/ beinhalten" ValidationExpression=".*[@#$%^&*/].*" ForeColor="White"/>
|
||||
<asp:CustomValidator ID="CV1" runat="server" controltovalidate="txtUsername" errormessage="Benutzername bereits vergeben" OnServerValidate="CheckID" />
|
||||
<asp:RegularExpressionValidator ID="CV3" runat="server" ErrorMessage="Benutzer E-Mail-Adresse ungültig" ForeColor="White" ControlToValidate="txtuseremail" ValidationExpression="\w+([-+.]\w+)*@\w+([-.]\w+)*\.\w+([-.]\w+)*">*</asp:RegularExpressionValidator>
|
||||
<asp:RegularExpressionValidator ID="RegexTel" runat="server" controlToValidate="txttelefon" ErrorMessage="Telefon-Nummer ist ungültig. Bitte im Format +41 44 813 12 12 eingeben." ValidationExpression="^(\+?)(\d{2,4})(\s?)(\-?)((\(0\))?)(\s?)(\d{2})(\s?)(\-?)(\d{3})(\s?)(\-?)(\d{2})(\s?)(\-?)(\d{2})" ForeColor="White"/>
|
||||
|
||||
<asp:Panel ID="MainPanel" runat="server">
|
||||
<table style="width:100%;" cellspacing="2">
|
||||
<tr>
|
||||
<td class="style3">
|
||||
<telerik:RadTextBox ID="txtNameZ1" Runat="server" Label="Firmenname Z1"
|
||||
LabelWidth="120px" TabIndex="1" Width="300px" >
|
||||
</telerik:RadTextBox>
|
||||
</td>
|
||||
<td colspan="2">
|
||||
<telerik:RadTextBox ID="txtTelefon" runat="server" TabIndex="6" Label="Telefon direkt / Natel"
|
||||
LabelWidth="120px" Width="250px"></telerik:RadTextBox>
|
||||
<telerik:RadTextBox ID="txtNatel" runat="server" Label=" / " LabelWidth="15px"
|
||||
TabIndex="6" Width="130px">
|
||||
</telerik:RadTextBox>
|
||||
</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td class="style3">
|
||||
<telerik:RadTextBox ID="txtNameZ2" runat="server" TabIndex="1"
|
||||
Label="Firmenname Z2" LabelWidth="120px" Width="300px"></telerik:RadTextBox>
|
||||
</td>
|
||||
<td colspan="2">
|
||||
<telerik:RadTextBox ID="txtTelefax" runat="server" TabIndex="7" Label="Telefax"
|
||||
Width="300px"></telerik:RadTextBox>
|
||||
</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td >
|
||||
<asp:Label ID="Label3" runat="server" CssClass="riLabel1" Text="Anrede"
|
||||
Width="115px"></asp:Label>
|
||||
<telerik:RadComboBox ID="txtAnredea" Runat="server" TabIndex="2" Width="175px">
|
||||
<Items>
|
||||
<telerik:RadComboBoxItem Value="Herr" Text="Herr" />
|
||||
<telerik:RadComboBoxItem Value="Frau" Text="Frau" />
|
||||
<telerik:RadComboBoxItem Value="Damen und Herren" Text="Damen und Herren" />
|
||||
|
||||
</Items>
|
||||
</telerik:RadComboBox>
|
||||
<td colspan="2">
|
||||
<telerik:RadTextBox ID="txtInternet" runat="server" TabIndex="8"
|
||||
Label="Internet" Width="300px"></telerik:RadTextBox>
|
||||
</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td class="style3">
|
||||
<telerik:RadTextBox ID="txtname" runat="server" TabIndex="2" Label="Name"
|
||||
Width="300px" ></telerik:RadTextBox>
|
||||
</td>
|
||||
<td colspan="2">
|
||||
<telerik:RadTextBox ID="txtEmail" runat="server" TabIndex="9" Label="E-Mail"
|
||||
LabelWidth="120px" Width="300px" EmptyMessage="Gültige E-Mail-Adresse " ></telerik:RadTextBox>
|
||||
</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td class="style3">
|
||||
<telerik:RadTextBox ID="txtVorname" runat="server" TabIndex="2" Label="Vorname"
|
||||
Width="300px" ></telerik:RadTextBox>
|
||||
</td>
|
||||
<td colspan="2" rowspan="2">
|
||||
<asp:Label ID="Label4" runat="server" CssClass="riLabel1" Text="Folgendes muss der Sch&#252;ler mitbringen (spezielle Kleidung, Ausweis usw.)"
|
||||
></asp:Label>
|
||||
<br />
|
||||
<telerik:RadTextBox ID="txtAusbildungBemerkung" runat="server" Width="400px" TabIndex="13"
|
||||
Height="45px" TextMode="MultiLine" ></telerik:RadTextBox>
|
||||
</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td class="style3">
|
||||
<telerik:RadTextBox ID="txtStrasse" runat="server" TabIndex="3" Label="Strasse"
|
||||
LabelWidth="120px" Width="300px"></telerik:RadTextBox>
|
||||
</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td class="style3">
|
||||
<telerik:RadTextBox ID="txtPLZ" runat="server" Width="180px" TabIndex="4"
|
||||
Label="PLZ / Ort" LabelWidth="120px"></telerik:RadTextBox>
|
||||
<telerik:RadTextBox ID="txtOrt" runat="server" TabIndex="5" Width="120px"></telerik:RadTextBox>
|
||||
</td>
|
||||
<td colspan="2">
|
||||
<asp:Label ID="Label7" runat="server" CssClass="riLabel1"
|
||||
Text="(Bemerkung gilt für alle angebotenen Berufe)"></asp:Label>
|
||||
</td>
|
||||
</tr>
|
||||
|
||||
<tr>
|
||||
<td class="style3"> <asp:CheckBox ID="cbaktiviert" runat="server" CssClass="riLabel1" ForeColor="#FF3300" Text="Aktuell" TextAlign="Left" />
|
||||
</td>
|
||||
<td colspan="2"> </td>
|
||||
</tr>
|
||||
|
||||
<tr>
|
||||
<td class="style3" valign="top" height="60">
|
||||
<asp:Label ID="Label6" runat="server" CssClass="riLabel1" Text="Ihre Bemerkung f&#252;r Organisatoren des BWP"
|
||||
></asp:Label>
|
||||
<br />
|
||||
<telerik:RadTextBox ID="txtBemerkung" runat="server" Height="45px"
|
||||
LabelWidth="120" TabIndex="11" TextMode="MultiLine" Width="400px">
|
||||
<PasswordStrengthSettings IndicatorWidth="30%" />
|
||||
</telerik:RadTextBox>
|
||||
</td>
|
||||
<td colspan="2" valign="top" class="style1">
|
||||
<asp:Label ID="Label5" runat="server" CssClass="riLabel1" Text="Treffpunkt f&#252;r Sch&#252;ler, falls abweichend zur Gesch&#228;ftsadresse"
|
||||
></asp:Label>
|
||||
|
||||
<br />
|
||||
<telerik:RadTextBox ID="txtAusbildungsstandort" runat="server" Height="45px"
|
||||
TabIndex="12" TextMode="MultiLine" Width="400px">
|
||||
<PasswordStrengthSettings IndicatorWidth="30%" />
|
||||
</telerik:RadTextBox>
|
||||
</td>
|
||||
<tr>
|
||||
<td class="style3" valign="top">
|
||||
<asp:Label ID="Label1" runat="server" style="font-weight: 700"
|
||||
Text="Logindaten für die Registrierung"></asp:Label>
|
||||
</td>
|
||||
<td colspan="2" valign="top">
|
||||
<asp:Label ID="Label8" runat="server" CssClass="riLabel1"
|
||||
Text="(Bemerkung gilt für alle angebotenen Berufe)"></asp:Label>
|
||||
</td>
|
||||
<tr>
|
||||
<td class="style1">
|
||||
<telerik:RadTextBox ID="txtUsername" runat="server"
|
||||
EmptyMessage="[Benutzer-ID]" Label="Benutzername" TabIndex="12" Width="300px">
|
||||
</telerik:RadTextBox>
|
||||
</td>
|
||||
<td class="style1">
|
||||
</td>
|
||||
<td rowspan="4">
|
||||
<telerik:RadCaptcha ID="RadCaptcha1" Runat="server"
|
||||
CaptchaTextBoxLabel="Sicherheitscode aus dem Bild eingeben"
|
||||
ErrorMessage="Sicherheitscode fehlt oder ist ungültig" TabIndex="15">
|
||||
</telerik:RadCaptcha>
|
||||
</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td class="style2">
|
||||
<telerik:RadTextBox ID="txtUserEmail" runat="server"
|
||||
EmptyMessage="Gültige E-Mail-Adresse" Label="Benutzer E-Mail"
|
||||
LabelWidth="120px" TabIndex="12" Width="300px">
|
||||
</telerik:RadTextBox>
|
||||
</td>
|
||||
<td class="style2">
|
||||
<asp:Label ID="lblCaptcha" runat="server" Text="Sicherheitscode"></asp:Label>
|
||||
</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td class="style3">
|
||||
<telerik:RadTextBox ID="txtPasswort1" runat="server" Label="Passwort"
|
||||
LabelWidth="120px" TabIndex="13" TextMode="Password" Width="300px">
|
||||
</telerik:RadTextBox>
|
||||
<br />
|
||||
<asp:Label ID="Label2" runat="server"
|
||||
Text="(mind. 4 Stellen und mind. 1 Sonderzeichen)"></asp:Label>
|
||||
<br />
|
||||
</td>
|
||||
<td class="style1">
|
||||
</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td class="style3">
|
||||
<telerik:RadTextBox ID="txtPasswort2" runat="server" Label="Wiederholung"
|
||||
LabelWidth="120px" TabIndex="14" TextMode="Password" Width="300px">
|
||||
</telerik:RadTextBox>
|
||||
<br />
|
||||
<asp:CompareValidator ID="CompareValidator1" runat="server"
|
||||
ControlToCompare="txtPasswort1" ControlToValidate="txtpasswort2"
|
||||
ErrorMessage="Passworte nicht identisch" ForeColor="Red"></asp:CompareValidator>
|
||||
</td>
|
||||
<td class="style1">
|
||||
</td>
|
||||
</tr>
|
||||
</tr>
|
||||
</tr>
|
||||
</table>
|
||||
</asp:Panel>
|
||||
<telerik:RadButton ID="btnSave" runat="server" Text="Speichern / Weiter >"
|
||||
AutoPostBack="true" style="top: 0px; left: 0px" >
|
||||
</telerik:RadButton>
|
||||
<telerik:RadButton ID="btnRegister" runat="server" Text="Registrieren">
|
||||
</telerik:RadButton>
|
||||
|
||||
|
||||
483
LPWeb20/Firmen/Firmendaten.ascx.designer.vb
generated
Normal file
483
LPWeb20/Firmen/Firmendaten.ascx.designer.vb
generated
Normal file
@@ -0,0 +1,483 @@
|
||||
'------------------------------------------------------------------------------
|
||||
' <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 Firmendaten
|
||||
|
||||
'''<summary>
|
||||
'''RadAjaxManager1-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 RadAjaxManager1 As Global.Telerik.Web.UI.RadAjaxManager
|
||||
|
||||
'''<summary>
|
||||
'''RadAjaxLoadingPanel1-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 RadAjaxLoadingPanel1 As Global.Telerik.Web.UI.RadAjaxLoadingPanel
|
||||
|
||||
'''<summary>
|
||||
'''ValidationSummary1-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 ValidationSummary1 As Global.System.Web.UI.WebControls.ValidationSummary
|
||||
|
||||
'''<summary>
|
||||
'''RV11-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 RV11 As Global.System.Web.UI.WebControls.RequiredFieldValidator
|
||||
|
||||
'''<summary>
|
||||
'''RV2-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 RV2 As Global.System.Web.UI.WebControls.RequiredFieldValidator
|
||||
|
||||
'''<summary>
|
||||
'''RV3-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 RV3 As Global.System.Web.UI.WebControls.RequiredFieldValidator
|
||||
|
||||
'''<summary>
|
||||
'''RV4-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 RV4 As Global.System.Web.UI.WebControls.RequiredFieldValidator
|
||||
|
||||
'''<summary>
|
||||
'''RV5-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 RV5 As Global.System.Web.UI.WebControls.RequiredFieldValidator
|
||||
|
||||
'''<summary>
|
||||
'''RV6-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 RV6 As Global.System.Web.UI.WebControls.RequiredFieldValidator
|
||||
|
||||
'''<summary>
|
||||
'''RV7-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 RV7 As Global.System.Web.UI.WebControls.RequiredFieldValidator
|
||||
|
||||
'''<summary>
|
||||
'''RV9-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 RV9 As Global.System.Web.UI.WebControls.RequiredFieldValidator
|
||||
|
||||
'''<summary>
|
||||
'''Eegex1-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 Eegex1 As Global.System.Web.UI.WebControls.RegularExpressionValidator
|
||||
|
||||
'''<summary>
|
||||
'''Regex2-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 Regex2 As Global.System.Web.UI.WebControls.RegularExpressionValidator
|
||||
|
||||
'''<summary>
|
||||
'''Regex3-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 Regex3 As Global.System.Web.UI.WebControls.RegularExpressionValidator
|
||||
|
||||
'''<summary>
|
||||
'''CV1-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 CV1 As Global.System.Web.UI.WebControls.CustomValidator
|
||||
|
||||
'''<summary>
|
||||
'''CV3-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 CV3 As Global.System.Web.UI.WebControls.RegularExpressionValidator
|
||||
|
||||
'''<summary>
|
||||
'''RegexTel-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 RegexTel As Global.System.Web.UI.WebControls.RegularExpressionValidator
|
||||
|
||||
'''<summary>
|
||||
'''MainPanel-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 MainPanel As Global.System.Web.UI.WebControls.Panel
|
||||
|
||||
'''<summary>
|
||||
'''txtNameZ1-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 txtNameZ1 As Global.Telerik.Web.UI.RadTextBox
|
||||
|
||||
'''<summary>
|
||||
'''txtTelefon-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 txtTelefon As Global.Telerik.Web.UI.RadTextBox
|
||||
|
||||
'''<summary>
|
||||
'''txtNatel-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 txtNatel As Global.Telerik.Web.UI.RadTextBox
|
||||
|
||||
'''<summary>
|
||||
'''txtNameZ2-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 txtNameZ2 As Global.Telerik.Web.UI.RadTextBox
|
||||
|
||||
'''<summary>
|
||||
'''txtTelefax-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 txtTelefax As Global.Telerik.Web.UI.RadTextBox
|
||||
|
||||
'''<summary>
|
||||
'''Label3-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 Label3 As Global.System.Web.UI.WebControls.Label
|
||||
|
||||
'''<summary>
|
||||
'''txtAnredea-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 txtAnredea As Global.Telerik.Web.UI.RadComboBox
|
||||
|
||||
'''<summary>
|
||||
'''txtInternet-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 txtInternet As Global.Telerik.Web.UI.RadTextBox
|
||||
|
||||
'''<summary>
|
||||
'''txtname-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 txtname As Global.Telerik.Web.UI.RadTextBox
|
||||
|
||||
'''<summary>
|
||||
'''txtEmail-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 txtEmail As Global.Telerik.Web.UI.RadTextBox
|
||||
|
||||
'''<summary>
|
||||
'''txtVorname-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 txtVorname As Global.Telerik.Web.UI.RadTextBox
|
||||
|
||||
'''<summary>
|
||||
'''Label4-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 Label4 As Global.System.Web.UI.WebControls.Label
|
||||
|
||||
'''<summary>
|
||||
'''txtAusbildungBemerkung-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 txtAusbildungBemerkung As Global.Telerik.Web.UI.RadTextBox
|
||||
|
||||
'''<summary>
|
||||
'''txtStrasse-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 txtStrasse As Global.Telerik.Web.UI.RadTextBox
|
||||
|
||||
'''<summary>
|
||||
'''txtPLZ-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 txtPLZ As Global.Telerik.Web.UI.RadTextBox
|
||||
|
||||
'''<summary>
|
||||
'''txtOrt-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 txtOrt As Global.Telerik.Web.UI.RadTextBox
|
||||
|
||||
'''<summary>
|
||||
'''Label7-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 Label7 As Global.System.Web.UI.WebControls.Label
|
||||
|
||||
'''<summary>
|
||||
'''cbaktiviert-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 cbaktiviert As Global.System.Web.UI.WebControls.CheckBox
|
||||
|
||||
'''<summary>
|
||||
'''Label6-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 Label6 As Global.System.Web.UI.WebControls.Label
|
||||
|
||||
'''<summary>
|
||||
'''txtBemerkung-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 txtBemerkung As Global.Telerik.Web.UI.RadTextBox
|
||||
|
||||
'''<summary>
|
||||
'''Label5-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 Label5 As Global.System.Web.UI.WebControls.Label
|
||||
|
||||
'''<summary>
|
||||
'''txtAusbildungsstandort-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 txtAusbildungsstandort As Global.Telerik.Web.UI.RadTextBox
|
||||
|
||||
'''<summary>
|
||||
'''Label1-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 Label1 As Global.System.Web.UI.WebControls.Label
|
||||
|
||||
'''<summary>
|
||||
'''Label8-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 Label8 As Global.System.Web.UI.WebControls.Label
|
||||
|
||||
'''<summary>
|
||||
'''txtUsername-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 txtUsername As Global.Telerik.Web.UI.RadTextBox
|
||||
|
||||
'''<summary>
|
||||
'''RadCaptcha1-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 RadCaptcha1 As Global.Telerik.Web.UI.RadCaptcha
|
||||
|
||||
'''<summary>
|
||||
'''txtUserEmail-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 txtUserEmail As Global.Telerik.Web.UI.RadTextBox
|
||||
|
||||
'''<summary>
|
||||
'''lblCaptcha-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 lblCaptcha As Global.System.Web.UI.WebControls.Label
|
||||
|
||||
'''<summary>
|
||||
'''txtPasswort1-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 txtPasswort1 As Global.Telerik.Web.UI.RadTextBox
|
||||
|
||||
'''<summary>
|
||||
'''Label2-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 Label2 As Global.System.Web.UI.WebControls.Label
|
||||
|
||||
'''<summary>
|
||||
'''txtPasswort2-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 txtPasswort2 As Global.Telerik.Web.UI.RadTextBox
|
||||
|
||||
'''<summary>
|
||||
'''CompareValidator1-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 CompareValidator1 As Global.System.Web.UI.WebControls.CompareValidator
|
||||
|
||||
'''<summary>
|
||||
'''btnSave-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 btnSave As Global.Telerik.Web.UI.RadButton
|
||||
|
||||
'''<summary>
|
||||
'''btnRegister-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 btnRegister As Global.Telerik.Web.UI.RadButton
|
||||
End Class
|
||||
223
LPWeb20/Firmen/Firmendaten.ascx.vb
Normal file
223
LPWeb20/Firmen/Firmendaten.ascx.vb
Normal file
@@ -0,0 +1,223 @@
|
||||
Imports System.IO
|
||||
Imports System.IO.Compression
|
||||
Imports System.Web.Configuration
|
||||
Public Class Firmendaten
|
||||
Inherits System.Web.UI.UserControl
|
||||
Private rand As New System.Random
|
||||
|
||||
Dim Firmanr As Integer = 0
|
||||
|
||||
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
|
||||
If Not Page.IsPostBack Then
|
||||
Try
|
||||
|
||||
If Session.Item("RegisterAsCompany") = "True" Then
|
||||
Me.txtBemerkung.Visible = False
|
||||
Me.txtAusbildungBemerkung.Visible = False
|
||||
Me.txtAusbildungsstandort.Visible = False
|
||||
Me.txtPasswort1.Visible = True
|
||||
Me.txtPasswort2.Visible = True
|
||||
Me.txtUsername.Visible = True
|
||||
Me.btnRegister.Visible = True
|
||||
Me.btnSave.Visible = False
|
||||
Me.RadCaptcha1.Visible = True
|
||||
Me.RadCaptcha1.Visible = True
|
||||
Me.lblCaptcha.Visible = True
|
||||
Me.RadCaptcha1.Visible = True
|
||||
Me.txtUserEmail.Visible = True
|
||||
Me.RV6.Enabled = True
|
||||
Me.RV7.Enabled = True
|
||||
Me.RV9.Enabled = True
|
||||
Me.txtNameZ1.Focus()
|
||||
Me.Label1.Visible = True
|
||||
Me.Label2.Visible = True
|
||||
Me.Label4.Visible = False
|
||||
Me.Label5.Visible = False
|
||||
Me.Label6.Visible = False
|
||||
Me.Label7.Visible = False
|
||||
Me.Label8.Visible = False
|
||||
Me.txtNameZ1.SelectionOnFocus = Telerik.Web.UI.SelectionOnFocus.SelectAll
|
||||
Me.cbaktiviert.Visible = False
|
||||
Exit Sub
|
||||
Else
|
||||
If Session.Item("LogedIn") = "True" Then
|
||||
Firmanr = Session.Item("Firmanr")
|
||||
End If
|
||||
Me.txtNameZ1.Focus()
|
||||
Me.txtPasswort1.Visible = False
|
||||
Me.txtPasswort2.Visible = False
|
||||
Me.txtUsername.Visible = False
|
||||
Me.btnRegister.Visible = False
|
||||
Me.btnSave.Visible = True
|
||||
Me.RadCaptcha1.Visible = False
|
||||
Me.RadCaptcha1.Visible = False
|
||||
Me.lblCaptcha.Visible = False
|
||||
Me.RadCaptcha1.Visible = False
|
||||
Me.txtUserEmail.Visible = False
|
||||
Me.RV6.Enabled = False
|
||||
Me.RV7.Enabled = False
|
||||
Me.RV9.Enabled = False
|
||||
Me.Label1.Visible = False
|
||||
Me.Label2.Visible = False
|
||||
|
||||
End If
|
||||
Dim fdaten As New DataTable
|
||||
Dim dh As New clsDatahandling
|
||||
fdaten = dh.Get_Firma(Firmanr)
|
||||
Dim dr As DataRow = fdaten.Rows(0)
|
||||
Me.txtNameZ1.Text = dr.Item("NameZ1").ToString
|
||||
Me.txtNameZ2.Text = dr.Item("NameZ2").ToString
|
||||
Me.txtAnredea.Text = dr.Item("Anrede").ToString
|
||||
Me.txtAnredea.SelectedValue = dr.Item("Anrede").ToString
|
||||
Me.txtname.Text = dr.Item("Name").ToString
|
||||
Me.txtVorname.Text = dr.Item("Vorname").ToString
|
||||
Me.txtStrasse.Text = dr.Item("Strasse").ToString
|
||||
Me.txtPLZ.Text = dr.Item("plz").ToString
|
||||
Me.txtOrt.Text = dr.Item("Ort").ToString
|
||||
Me.txtTelefon.Text = dr.Item("tel").ToString
|
||||
Me.txtNatel.Text = dr.Item("Natel").ToString
|
||||
Me.txtTelefax.Text = dr.Item("Fax").ToString
|
||||
Me.txtEmail.Text = dr.Item("email").ToString
|
||||
Me.txtInternet.Text = dr.Item("web").ToString
|
||||
Me.txtBemerkung.Text = dr.Item("Bemerkung").ToString
|
||||
Me.txtAusbildungBemerkung.Text = dr.Item("Ausbildungsbemerkung").ToString
|
||||
Me.txtAusbildungsstandort.Text = dr.Item("Ausbildungsstandort").ToString
|
||||
Me.cbaktiviert.Checked = dr.Item("Aktuell") = True
|
||||
If UCase(dh.Get_Option(10)) = "JA" And Session("Admin") <> True Then
|
||||
btnSave.Visible = False
|
||||
btnSave.Enabled = False
|
||||
End If
|
||||
If Session("Admin") = True Then
|
||||
Me.cbaktiviert.Visible = True
|
||||
Else
|
||||
Me.cbaktiviert.Visible = False
|
||||
End If
|
||||
|
||||
Catch
|
||||
End Try
|
||||
End If
|
||||
|
||||
End Sub
|
||||
|
||||
Protected Sub btnRegister_Click(sender As Object, e As EventArgs) Handles btnRegister.Click
|
||||
If Not Page.IsValid Then Exit Sub
|
||||
Dim dh As New clsDatahandling
|
||||
Dim dbkey As Integer = dh.Get_NewDBKey("Firma")
|
||||
If dh.Insert_Firma(dbkey) = True Then
|
||||
dh.UpdateTable("Firma", "NameZ1", Me.txtNameZ1.Text, True, "Firmanr", dbkey)
|
||||
dh.UpdateTable("Firma", "NameZ2", Me.txtNameZ2.Text, True, "Firmanr", dbkey)
|
||||
dh.UpdateTable("Firma", "Strasse", Me.txtStrasse.Text, True, "Firmanr", dbkey)
|
||||
dh.UpdateTable("Firma", "plz", Me.txtPLZ.Text, True, "Firmanr", dbkey)
|
||||
dh.UpdateTable("Firma", "ort", Me.txtOrt.Text, True, "Firmanr", dbkey)
|
||||
dh.UpdateTable("Firma", "tel", Me.txtTelefon.Text, True, "Firmanr", dbkey)
|
||||
dh.UpdateTable("Firma", "Natel", Me.txtNatel.Text, True, "Firmanr", dbkey)
|
||||
dh.UpdateTable("Firma", "fax", Me.txtTelefax.Text, True, "Firmanr", dbkey)
|
||||
dh.UpdateTable("Firma", "web", Me.txtInternet.Text, True, "Firmanr", dbkey)
|
||||
dh.UpdateTable("Firma", "email", Me.txtEmail.Text, True, "Firmanr", dbkey)
|
||||
' dh.UpdateTable("Firma", "anrede", Me.txtAnrede.Text, True, "Firmanr", dbkey)
|
||||
dh.UpdateTable("Firma", "anrede", Me.txtAnredea.Text, True, "Firmanr", dbkey)
|
||||
dh.UpdateTable("Firma", "name", Me.txtname.Text, True, "Firmanr", dbkey)
|
||||
dh.UpdateTable("Firma", "vorname", Me.txtVorname.Text, True, "Firmanr", dbkey)
|
||||
dh.UpdateTable("Firma", "mutiert_am", Now, True, "Firmanr", dbkey)
|
||||
dh.UpdateTable("Firma", "Bemerkung", "", True, "Firmanr", dbkey)
|
||||
dh.UpdateTable("Firma", "Ausbildungsstandort", "", True, "Firmanr", dbkey)
|
||||
dh.UpdateTable("Firma", "Ausbildungsbemerkung", "", True, "Firmanr", dbkey)
|
||||
dh.UpdateTable("Firma", "Aktuell", "1", False, "Firmanr", dbkey)
|
||||
End If
|
||||
|
||||
dh.Insert_Web_User(Me.txtUsername.Text, Me.txtPasswort1.Text, 2, dbkey, 0)
|
||||
Dim userkey As Integer = dh.Get_LastKey("Web_User", "Eintragnr") - 1
|
||||
|
||||
dh.Insert_Ansprechpartner(dbkey, Me.txtname.Text, Me.txtVorname.Text, Me.txtTelefon.Text, Me.txtEmail.Text, Me.txtAnredea.SelectedValue)
|
||||
|
||||
Dim KeyGen As RandomKeyGenerator
|
||||
Dim NumKeys As Integer
|
||||
Dim RandomKey As String
|
||||
NumKeys = 1
|
||||
|
||||
KeyGen = New RandomKeyGenerator
|
||||
KeyGen.KeyLetters = "abcdefghijklmnopqrstuvwxyz"
|
||||
KeyGen.KeyNumbers = "0123456789"
|
||||
KeyGen.KeyChars = 46
|
||||
RandomKey = KeyGen.Generate()
|
||||
dh.UpdateTable("Web_User", "VerifyString", RandomKey, True, "Eintragnr", userkey)
|
||||
dh.UpdateTable("Web_User", "EMail", Me.txtUserEmail.Text, True, "Eintragnr", userkey)
|
||||
Dim mds As New DataSet
|
||||
mds = dh.Get_Tabledata("Select * from Web_MailTexte where nreintrag=1", False, True)
|
||||
Dim inhalt As String = mds.Tables(0).Rows(0).Item("Inhalt")
|
||||
inhalt = inhalt.Replace("[Weblink]", WebConfigurationManager.AppSettings("WebSite"))
|
||||
inhalt = inhalt.Replace("[RegisterLink]", WebConfigurationManager.AppSettings("WebSite") + "/user/" + "RegisterBestaetigung.aspx?fnkt=Aktivierung&Code=" + RandomKey)
|
||||
|
||||
Dim mailer As New clsSendMail
|
||||
mailer.SendMailMessage("", Me.txtUserEmail.Text, "", "", mds.Tables(0).Rows(0).Item("Betreff").ToString, inhalt)
|
||||
Response.Redirect("~/user/registerbestaetigung.aspx?fnkt=Bestaetigung")
|
||||
|
||||
|
||||
End Sub
|
||||
|
||||
Protected Sub btnSave_Click(sender As Object, e As EventArgs) Handles btnSave.Click
|
||||
If Page.IsValid Then
|
||||
Dim dbkey As Integer = Session.Item("Firmanr")
|
||||
Dim dh As New clsDatahandling
|
||||
dh.UpdateTable("Firma", "NameZ1", Me.txtNameZ1.Text, True, "Firmanr", dbkey)
|
||||
dh.UpdateTable("Firma", "NameZ2", Me.txtNameZ2.Text, True, "Firmanr", dbkey)
|
||||
dh.UpdateTable("Firma", "Strasse", Me.txtStrasse.Text, True, "Firmanr", dbkey)
|
||||
dh.UpdateTable("Firma", "plz", Me.txtPLZ.Text, True, "Firmanr", dbkey)
|
||||
dh.UpdateTable("Firma", "ort", Me.txtOrt.Text, True, "Firmanr", dbkey)
|
||||
dh.UpdateTable("Firma", "tel", Me.txtTelefon.Text, True, "Firmanr", dbkey)
|
||||
dh.UpdateTable("Firma", "Natel", Me.txtNatel.Text, True, "Firmanr", dbkey)
|
||||
dh.UpdateTable("Firma", "fax", Me.txtTelefax.Text, True, "Firmanr", dbkey)
|
||||
dh.UpdateTable("Firma", "web", Me.txtInternet.Text, True, "Firmanr", dbkey)
|
||||
dh.UpdateTable("Firma", "email", Me.txtEmail.Text, True, "Firmanr", dbkey)
|
||||
'dh.UpdateTable("Firma", "anrede", Me.txtAnrede.Text, True, "Firmanr", dbkey)
|
||||
dh.UpdateTable("Firma", "anrede", Me.txtAnredea.Text, True, "Firmanr", dbkey)
|
||||
dh.UpdateTable("Firma", "name", Me.txtname.Text, True, "Firmanr", dbkey)
|
||||
dh.UpdateTable("Firma", "vorname", Me.txtVorname.Text, True, "Firmanr", dbkey)
|
||||
dh.UpdateTable("Firma", "mutiert_am", Now, True, "Firmanr", dbkey)
|
||||
dh.UpdateTable("Firma", "Bemerkung", Me.txtBemerkung.Text, True, "Firmanr", dbkey)
|
||||
dh.UpdateTable("Firma", "Ausbildungsstandort", Me.txtAusbildungsstandort.Text, True, "Firmanr", dbkey)
|
||||
dh.UpdateTable("Firma", "Ausbildungsbemerkung", Me.txtAusbildungBemerkung.Text, True, "Firmanr", dbkey)
|
||||
If Me.cbaktiviert.Checked = True Then
|
||||
dh.UpdateTable("Firma", "Aktuell", "1", False, "Firmanr", dbkey)
|
||||
Else
|
||||
dh.UpdateTable("Firma", "Aktuell", "0", False, "Firmanr", dbkey)
|
||||
|
||||
End If
|
||||
End If
|
||||
Response.Redirect("~/firmen/Firmendaten1.aspx?Tab=2")
|
||||
End Sub
|
||||
|
||||
Public Function Check_Userid(source As Object, args As ServerValidateEventArgs)
|
||||
Dim dh As New clsDatahandling
|
||||
Dim ds As New DataSet
|
||||
ds = dh.Get_Tabledata("Select * from web_user where Username='" + Me.txtUsername.Text + "'", False, True)
|
||||
If ds.Tables(0).Rows.Count > 0 Then
|
||||
args.IsValid = False
|
||||
Else
|
||||
args.IsValid = True
|
||||
End If
|
||||
End Function
|
||||
|
||||
Public Function Check_Captcha(source As Object, args As ServerValidateEventArgs)
|
||||
If Me.RadCaptcha1.IsValid = False Then
|
||||
args.IsValid = False
|
||||
Else
|
||||
args.IsValid = True
|
||||
End If
|
||||
End Function
|
||||
|
||||
|
||||
Protected Sub RadAjaxManager1_AjaxRequest(sender As Object, e As Telerik.Web.UI.AjaxRequestEventArgs) Handles RadAjaxManager1.AjaxRequest
|
||||
|
||||
End Sub
|
||||
|
||||
Protected Sub txtOrt_TextChanged(sender As Object, e As EventArgs) Handles txtOrt.TextChanged
|
||||
|
||||
End Sub
|
||||
|
||||
Protected Sub txtNameZ3_TextChanged(sender As Object, e As EventArgs) Handles txtNameZ2.TextChanged
|
||||
|
||||
End Sub
|
||||
|
||||
|
||||
End Class
|
||||
62
LPWeb20/Firmen/Firmendaten1.aspx
Normal file
62
LPWeb20/Firmen/Firmendaten1.aspx
Normal file
@@ -0,0 +1,62 @@
|
||||
<%@ Page Language="vb" AutoEventWireup="false" CodeBehind="Firmendaten1.aspx.vb" Inherits="LPWeb.Firmendaten1" %>
|
||||
|
||||
<%@ Register Src="~/Defaults/Header1.ascx" TagPrefix="shu" TagName="Header" %>
|
||||
<%@ Register Src="~/UserControls/Menu1.ascx" TagPrefix="shu" TagName="Menu" %>
|
||||
<%@ Register Src="~/Defaults/Footer.ascx" TagPrefix="shu" TagName="Footer" %>
|
||||
|
||||
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
|
||||
|
||||
<html xmlns="http://www.w3.org/1999/xhtml">
|
||||
<head id="Head1" runat="server">
|
||||
<title></title>
|
||||
<link href="~/Styles/Site.css" rel="stylesheet" type="text/css" /></head>
|
||||
<body>
|
||||
<form id="form1" runat="server">
|
||||
<telerik:RadWindowManager ID="RadWindowManager1" runat="server">
|
||||
</telerik:RadWindowManager>
|
||||
<telerik:RadScriptManager ID="RadScriptManager1" runat="server">
|
||||
<Scripts>
|
||||
<asp:ScriptReference Assembly="Telerik.Web.UI"
|
||||
Name="Telerik.Web.UI.Common.Core.js">
|
||||
</asp:ScriptReference>
|
||||
<asp:ScriptReference Assembly="Telerik.Web.UI"
|
||||
Name="Telerik.Web.UI.Common.jQuery.js">
|
||||
</asp:ScriptReference>
|
||||
<asp:ScriptReference Assembly="Telerik.Web.UI"
|
||||
Name="Telerik.Web.UI.Common.jQueryInclude.js">
|
||||
</asp:ScriptReference>
|
||||
</Scripts>
|
||||
</telerik:RadScriptManager>
|
||||
<div class="page">
|
||||
<shu:Header runat="Server" ID="Header1"></shu:Header>
|
||||
<shu:Menu runat="server" ID="Menu1" NavigationLanguage="VB"></shu:Menu>
|
||||
<div class="main">
|
||||
<h2>Firmendaten</h2>
|
||||
<telerik:RadTabStrip ID="RadTabStrip1" runat="server" SelectedIndex="0"
|
||||
MultiPageID="RadMultiPage1" Enabled="False" >
|
||||
<Tabs>
|
||||
<telerik:RadTab runat="server" Text="Stammdaten" Selected="True">
|
||||
</telerik:RadTab>
|
||||
<telerik:RadTab runat="server" Text="Ansprechpartner">
|
||||
</telerik:RadTab>
|
||||
<telerik:RadTab runat="server" Text="Berufs-Angebot">
|
||||
</telerik:RadTab>
|
||||
</Tabs>
|
||||
</telerik:RadTabStrip>
|
||||
<telerik:RadMultiPage ID="RadMultiPage1" runat="server" SelectedIndex="0">
|
||||
<telerik:RadPageView ID="RadPageView1" runat="server">
|
||||
|
||||
</telerik:RadPageView>
|
||||
<telerik:RadPageView ID="RadPageView2" runat="server">
|
||||
</telerik:RadPageView>
|
||||
<telerik:RadPageView ID="RadPageView3" runat="server">
|
||||
</telerik:RadPageView>
|
||||
|
||||
</telerik:RadMultiPage>
|
||||
<br />
|
||||
</div>
|
||||
</div>
|
||||
<shu:Footer runat="Server" ID="Footer1"></SHU:Footer>
|
||||
</form>
|
||||
</body>
|
||||
</html>
|
||||
123
LPWeb20/Firmen/Firmendaten1.aspx.designer.vb
generated
Normal file
123
LPWeb20/Firmen/Firmendaten1.aspx.designer.vb
generated
Normal file
@@ -0,0 +1,123 @@
|
||||
'------------------------------------------------------------------------------
|
||||
' <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 Firmendaten1
|
||||
|
||||
'''<summary>
|
||||
'''Head1-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 Head1 As Global.System.Web.UI.HtmlControls.HtmlHead
|
||||
|
||||
'''<summary>
|
||||
'''form1-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 form1 As Global.System.Web.UI.HtmlControls.HtmlForm
|
||||
|
||||
'''<summary>
|
||||
'''RadWindowManager1-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 RadWindowManager1 As Global.Telerik.Web.UI.RadWindowManager
|
||||
|
||||
'''<summary>
|
||||
'''RadScriptManager1-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 RadScriptManager1 As Global.Telerik.Web.UI.RadScriptManager
|
||||
|
||||
'''<summary>
|
||||
'''Header1-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 Header1 As Global.LPWeb.Header1
|
||||
|
||||
'''<summary>
|
||||
'''Menu1-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 Menu1 As Global.LPWeb.Menu1
|
||||
|
||||
'''<summary>
|
||||
'''RadTabStrip1-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 RadTabStrip1 As Global.Telerik.Web.UI.RadTabStrip
|
||||
|
||||
'''<summary>
|
||||
'''RadMultiPage1-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 RadMultiPage1 As Global.Telerik.Web.UI.RadMultiPage
|
||||
|
||||
'''<summary>
|
||||
'''RadPageView1-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 RadPageView1 As Global.Telerik.Web.UI.RadPageView
|
||||
|
||||
'''<summary>
|
||||
'''RadPageView2-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 RadPageView2 As Global.Telerik.Web.UI.RadPageView
|
||||
|
||||
'''<summary>
|
||||
'''RadPageView3-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 RadPageView3 As Global.Telerik.Web.UI.RadPageView
|
||||
|
||||
'''<summary>
|
||||
'''Footer1-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 Footer1 As Global.LPWeb.Footer
|
||||
End Class
|
||||
72
LPWeb20/Firmen/Firmendaten1.aspx.vb
Normal file
72
LPWeb20/Firmen/Firmendaten1.aspx.vb
Normal file
@@ -0,0 +1,72 @@
|
||||
Imports Telerik.Web.UI
|
||||
Imports System.Web.Configuration
|
||||
Public Class Firmendaten1
|
||||
Inherits System.Web.UI.Page
|
||||
|
||||
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
|
||||
|
||||
If Request.QueryString("Firmanr") <> "" Then Session.Item("Firmanr") = Request.QueryString("Firmanr")
|
||||
If Request.QueryString("RegisterAsCompany") = "True" Then
|
||||
Session.Item("RegisterAsCompany") = "True"
|
||||
Me.RadTabStrip1.Visible = False
|
||||
Me.RadPageView1.Controls.Add(Page.LoadControl("~/Firmen/Firmendaten.ascx"))
|
||||
Else
|
||||
Me.RadPageView1.Controls.Add(Page.LoadControl("~/Firmen/Firmendaten.ascx"))
|
||||
Me.RadPageView2.Controls.Add(Page.LoadControl("~/Firmen/Firmenansprechpartner.ascx"))
|
||||
Me.RadPageView3.Controls.Add(Page.LoadControl("~/Firmen/Firmenangebot.ascx"))
|
||||
End If
|
||||
If Request.QueryString("Tab") = Nothing Then
|
||||
' Me.RadTabStrip1.SelectedIndex = 0
|
||||
' Me.RadMultiPage1.SelectedIndex = 0
|
||||
End If
|
||||
If Request.QueryString("Tab") = 1 Then
|
||||
Me.RadTabStrip1.SelectedIndex = 0
|
||||
Me.RadMultiPage1.SelectedIndex = 0
|
||||
End If
|
||||
If Request.QueryString("Tab") = 2 Then
|
||||
Me.RadTabStrip1.SelectedIndex = 1
|
||||
Me.RadMultiPage1.SelectedIndex = 1
|
||||
End If
|
||||
If Request.QueryString("Tab") = 3 Then
|
||||
Me.RadTabStrip1.SelectedIndex = 2
|
||||
Me.RadMultiPage1.SelectedIndex = 2
|
||||
End If
|
||||
Dim db As New clsDatahandling
|
||||
If db.Get_Option(23) = "Nein" Then Me.RadTabStrip1.Enabled = False Else Me.RadTabStrip1.Enabled = True
|
||||
|
||||
If Session("Admin") = True Then
|
||||
Me.RadTabStrip1.Enabled = True
|
||||
Session("ReadOnly") = "False"
|
||||
End If
|
||||
If Session("ReadOnly") = "True" Then
|
||||
Session("ReadOnly") = "False"
|
||||
Me.RadTabStrip1.Enabled = True
|
||||
Me.Show_Message(5, "Ihre Daten können aufgend der aktuellen Einstellungen nur im Lesemodus angezeigt werden.")
|
||||
End If
|
||||
|
||||
End Sub
|
||||
|
||||
Protected Sub Show_Message(ByVal type As Integer, ByVal meldung As String)
|
||||
Dim image1 As String
|
||||
|
||||
Select Case type
|
||||
Case 1
|
||||
image1 = WebConfigurationManager.AppSettings("Imagepath") + "Error.png"
|
||||
RadWindowManager1.RadAlert(meldung, 330, 100, "Fehler", Nothing, image1)
|
||||
Case 2
|
||||
image1 = WebConfigurationManager.AppSettings("Imagepath") + "Info1.png"
|
||||
RadWindowManager1.RadAlert(meldung, 330, 100, "Fehler", "alertCallBackFnError", image1)
|
||||
Case 3
|
||||
image1 = WebConfigurationManager.AppSettings("Imagepath") + "Info1.png"
|
||||
RadWindowManager1.RadConfirm(meldung, "ConfirmCallBackFn", 330, 100, Nothing, "Schüler löschen?")
|
||||
Case 4
|
||||
image1 = WebConfigurationManager.AppSettings("Imagepath") + "Info1.png"
|
||||
RadWindowManager1.RadConfirm(meldung, "ConfirmCallBackFn1", 330, 100, Nothing, "Schülerdaten?")
|
||||
Case 5
|
||||
Session("ReadOnly") = "True"
|
||||
image1 = WebConfigurationManager.AppSettings("Imagepath") + "Info1.png"
|
||||
RadWindowManager1.RadAlert(meldung, 330, 100, "Information", Nothing, image1)
|
||||
End Select
|
||||
End Sub
|
||||
|
||||
End Class
|
||||
74
LPWeb20/Firmen/Firmenreport.aspx
Normal file
74
LPWeb20/Firmen/Firmenreport.aspx
Normal file
@@ -0,0 +1,74 @@
|
||||
<%@ Page Language="vb" AutoEventWireup="false" CodeBehind="Firmenreport.aspx.vb" Inherits="LPWeb.Firmenreport" %>
|
||||
<%@ Register Src="~/Defaults/Header.ascx" TagPrefix="shu" TagName="Header" %>
|
||||
<%@ Register Src="~/UserControls/Menu1.ascx" TagPrefix="shu" TagName="Menu" %>
|
||||
<%@ Register Src="~/Defaults/Footer.ascx" TagPrefix="shu" TagName="Footer" %>
|
||||
<%@ Register assembly="FastReport.Web, Version=2013.2.2.0, Culture=neutral, PublicKeyToken=db7e5ce63278458c" namespace="FastReport.Web" tagprefix="cc1" %>
|
||||
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
|
||||
|
||||
<html xmlns="http://www.w3.org/1999/xhtml">
|
||||
<head id="Head1" runat="server">
|
||||
<title></title>
|
||||
<link href="~/Styles/Site.css" rel="stylesheet" type="text/css" />
|
||||
<style type="text/css">
|
||||
.style1
|
||||
{
|
||||
}
|
||||
</style>
|
||||
</head>
|
||||
<body>
|
||||
<form id="form1" runat="server">
|
||||
<telerik:RadScriptManager ID="ScriptManager1" runat="server"
|
||||
EnableTheming="True">
|
||||
<scripts>
|
||||
<asp:ScriptReference Assembly="Telerik.Web.UI"
|
||||
Name="Telerik.Web.UI.Common.Core.js">
|
||||
</asp:ScriptReference>
|
||||
<asp:ScriptReference Assembly="Telerik.Web.UI"
|
||||
Name="Telerik.Web.UI.Common.jQuery.js">
|
||||
</asp:ScriptReference>
|
||||
<asp:ScriptReference Assembly="Telerik.Web.UI"
|
||||
Name="Telerik.Web.UI.Common.jQueryInclude.js">
|
||||
</asp:ScriptReference>
|
||||
</scripts>
|
||||
</telerik:RadScriptManager>
|
||||
|
||||
<div class="page">
|
||||
<shu:Header runat="Server" ID="Header1"></shu:Header>
|
||||
<shu:Menu runat="server" ID="Menu1" NavigationLanguage="VB"></shu:Menu>
|
||||
<div class="main">
|
||||
<h2>Auswertung</h2>
|
||||
<p>
|
||||
<table>
|
||||
<tr>
|
||||
<td valign="top" class="style1">
|
||||
<asp:Panel ID="Panel1" runat="server" Height="500px" Width="884px">
|
||||
<cc1:WebReport ID="WebReport1" runat="server"
|
||||
Width="800px" BorderStyle="Solid" BorderWidth="1px" PdfAuthor="LPWEB"
|
||||
PdfEmbeddingFonts="False" PdfProducer="FastReport" ShowExports="True"
|
||||
ShowOdsExport="False" ShowOdtExport="False" ShowPdfExport="True" ShowDbfExport="false" ShowExcel2007Export="False" ShowMhtExport="false"
|
||||
ShowPowerPoint2007Export="False" ShowRtfExport="False" ShowTextExport="False"
|
||||
ShowWord2007Export="False" ShowXmlExcelExport="False" ShowXpsExport="False" ToolbarStyle="Small" />
|
||||
|
||||
</asp:Panel>
|
||||
|
||||
</td>
|
||||
</tr>
|
||||
</table>
|
||||
<telerik:RadButton ID="RadButton1" runat="server" Text="Zurück">
|
||||
</telerik:RadButton>
|
||||
|
||||
</p>
|
||||
</div>
|
||||
</div>
|
||||
<shu:Footer runat="Server" ID="Footer1"></SHU:Footer>
|
||||
<asp:SqlDataSource ID="SqlDataSource1" runat="server"
|
||||
ConnectionString="<%$ ConnectionStrings:LPConnectionString %>"
|
||||
SelectCommand="SELECT [ID], [ParentID], [Bezeichnung] FROM [Web_Report] where aktiv=1">
|
||||
</asp:SqlDataSource>
|
||||
|
||||
</form>
|
||||
|
||||
|
||||
|
||||
</body>
|
||||
</html>
|
||||
105
LPWeb20/Firmen/Firmenreport.aspx.designer.vb
generated
Normal file
105
LPWeb20/Firmen/Firmenreport.aspx.designer.vb
generated
Normal file
@@ -0,0 +1,105 @@
|
||||
'------------------------------------------------------------------------------
|
||||
' <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 Firmenreport
|
||||
|
||||
'''<summary>
|
||||
'''Head1-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 Head1 As Global.System.Web.UI.HtmlControls.HtmlHead
|
||||
|
||||
'''<summary>
|
||||
'''form1-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 form1 As Global.System.Web.UI.HtmlControls.HtmlForm
|
||||
|
||||
'''<summary>
|
||||
'''ScriptManager1-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 ScriptManager1 As Global.Telerik.Web.UI.RadScriptManager
|
||||
|
||||
'''<summary>
|
||||
'''Header1-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 Header1 As Global.LPWeb.Header
|
||||
|
||||
'''<summary>
|
||||
'''Menu1-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 Menu1 As Global.LPWeb.Menu1
|
||||
|
||||
'''<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
|
||||
|
||||
'''<summary>
|
||||
'''WebReport1-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 WebReport1 As Global.FastReport.Web.WebReport
|
||||
|
||||
'''<summary>
|
||||
'''RadButton1-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 RadButton1 As Global.Telerik.Web.UI.RadButton
|
||||
|
||||
'''<summary>
|
||||
'''Footer1-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 Footer1 As Global.LPWeb.Footer
|
||||
|
||||
'''<summary>
|
||||
'''SqlDataSource1-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 SqlDataSource1 As Global.System.Web.UI.WebControls.SqlDataSource
|
||||
End Class
|
||||
117
LPWeb20/Firmen/Firmenreport.aspx.vb
Normal file
117
LPWeb20/Firmen/Firmenreport.aspx.vb
Normal file
@@ -0,0 +1,117 @@
|
||||
Imports System.Web.Configuration
|
||||
Public Class Firmenreport
|
||||
Inherits System.Web.UI.Page
|
||||
|
||||
Dim scounter As Integer = 0
|
||||
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
|
||||
If Not Page.IsPostBack Then
|
||||
Try
|
||||
Dim rnr As Integer = WebConfigurationManager.AppSettings(Request.QueryString("Report"))
|
||||
Dim dh As New clsDatahandling
|
||||
Dim ds As New DataSet
|
||||
ds = dh.Get_Tabledata("Select * from web_report where id=" + rnr.ToString, False, True)
|
||||
show_report(ds.Tables(0).Rows(0).Item("SQL"), ds.Tables(0).Rows(0).Item("SQLType"), ds.Tables(0).Rows(0).Item("Reportdatei"), ds.Tables(0).Rows(0).Item("Dokumentnr").ToString)
|
||||
show_report(ds.Tables(0).Rows(0).Item("SQL"), ds.Tables(0).Rows(0).Item("SQLType"), ds.Tables(0).Rows(0).Item("Reportdatei"), ds.Tables(0).Rows(0).Item("Dokumentnr").ToString)
|
||||
Me.WebReport1.Visible = True
|
||||
Me.WebReport1.Zoom = 1
|
||||
Catch
|
||||
End Try
|
||||
'show_report("Berufsliste", "SP", "Berufsliste.frx")
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Sub Open_Report(ByVal reportnr As Integer)
|
||||
Dim url As String = Server.MapPath("/default.aspx")
|
||||
Response.Write("<SCRIPT LANGUAGE='JavaScript'>window.open('" + url + "', '_blank');</SCRIPT>")
|
||||
'HttpContext.Current.Response.Write("<SCRIPT LANGUAGE='JavaScript'>window.open('" + url + "', '_blank');</SCRIPT>")
|
||||
Exit Sub
|
||||
'Page.ClientScript.RegisterStartupScript(Me.RadTreeView1.GetType.GetType, "New Windows", "window.open('" + url + "','','')", True)
|
||||
Page.ClientScript.RegisterClientScriptBlock(Me.GetType, "New windows", "window.open('" + url + "','baba','')", True)
|
||||
End Sub
|
||||
|
||||
|
||||
|
||||
Sub show_report(ByVal sql As String, ByVal sqltype As String, ByVal filename As String, dokumentnr As String)
|
||||
Try
|
||||
If dokumentnr <> "" Then
|
||||
If dokumentnr <> "-1" Then sql = sql.Replace("%DOKNR%", dokumentnr)
|
||||
End If
|
||||
|
||||
|
||||
Dim ds1 As New DataSet
|
||||
Dim ds As New DataSet
|
||||
Dim dh As New clsDatahandling
|
||||
|
||||
Dim isql As String = WebConfigurationManager.AppSettings(Request.QueryString("Report") + "_Query")
|
||||
isql = isql.Replace("@Firmanr", Session("firmanr"))
|
||||
If isql.Substring(0, 2) = "SP" Then
|
||||
ds = dh.Get_Tabledata(isql, True, False)
|
||||
Else
|
||||
ds = dh.Get_Tabledata(isql, False, True)
|
||||
|
||||
End If
|
||||
'If sqltype = "SP" Then
|
||||
' ds = dh.Get_Tabledata(sql, True, False)
|
||||
'Else
|
||||
' If sqltype = "SQL" Then
|
||||
' ds = dh.Get_Tabledata(sql, False, True)
|
||||
' Else
|
||||
' ds = dh.Get_Tabledata(sql, False, False)
|
||||
' End If
|
||||
'End If
|
||||
|
||||
Me.WebReport1.Prepare()
|
||||
Me.WebReport1.ReportFile = "~/Reporting/" + filename
|
||||
Me.WebReport1.DataBind()
|
||||
Dim x As FastReport.Report = WebReport1.Report
|
||||
x.RegisterData(ds)
|
||||
scounter = scounter + 1
|
||||
'If scounter > 1 Then
|
||||
' Dim exp As New FastReport.Export.Pdf.PDFExport
|
||||
' Me.WebReport1.Report.Export(exp, "E:\WebProjects\LPWeb\LPWeb\reporting\exported.pdf")
|
||||
'End If
|
||||
Catch ex As Exception
|
||||
MsgBox(ex.Message)
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub WebReport1_PreRender(sender As Object, e As System.EventArgs) Handles WebReport1.PreRender
|
||||
Me.WebReport1.Prepare()
|
||||
End Sub
|
||||
|
||||
Private Sub WebReport1_StartReport(sender As Object, e As System.EventArgs) Handles WebReport1.StartReport
|
||||
Dim dh As New clsDatahandling
|
||||
Me.WebReport1.Report.SetParameterValue("Parcours", dh.Get_Option(2))
|
||||
Me.WebReport1.Report.SetParameterValue("Spruch", dh.Get_Option(3))
|
||||
Me.WebReport1.Report.SetParameterValue("URL", dh.Get_Option(27))
|
||||
'Me.WebReport1.Report.SetParameterValue("URL", "..\bilder\reportlogo.jpg")
|
||||
End Sub
|
||||
|
||||
Protected Sub RadButton1_Click(sender As Object, e As EventArgs) Handles RadButton1.Click
|
||||
Dim exp As New FastReport.Export.Pdf.PDFExport
|
||||
|
||||
'If exp.ShowDialog Then
|
||||
|
||||
'End If
|
||||
|
||||
Response.Redirect("~/Firmen/Firmendaten1.aspx?Tab=3")
|
||||
End Sub
|
||||
|
||||
'Protected Sub RadButton2_Click(sender As Object, e As EventArgs) Handles RadButton2.Click
|
||||
' Me.WebReport1.Prepare()
|
||||
' Me.WebReport1.Prepare()
|
||||
' Dim exp As New FastReport.Export.Pdf.PDFExport
|
||||
' Dim fn As String = Server.MapPath("~/Reporting/") + System.IO.Path.GetRandomFileName + ".pdf"
|
||||
' Me.WebReport1.Report.Export(exp, fn)
|
||||
|
||||
' Dim downloadfile As New System.IO.FileInfo(fn)
|
||||
' HttpContext.Current.Response.Clear()
|
||||
' HttpContext.Current.Response.AddHeader("Content-Disposition", String.Format("attachment; filename={0}", downloadfile.Name))
|
||||
' HttpContext.Current.Response.AddHeader("Content-Length", downloadfile.Length.ToString())
|
||||
' HttpContext.Current.Response.ContentType = "application/octet-stream"
|
||||
' HttpContext.Current.Response.WriteFile(downloadfile.FullName)
|
||||
' HttpContext.Current.Response.End()
|
||||
|
||||
'End Sub
|
||||
End Class
|
||||
51
LPWeb20/Firmen/SIK/Firmenaktualisierung.aspx
Normal file
51
LPWeb20/Firmen/SIK/Firmenaktualisierung.aspx
Normal file
@@ -0,0 +1,51 @@
|
||||
<%@ Page Language="vb" AutoEventWireup="false" CodeBehind="Firmenaktualisierung.aspx.vb" Inherits="LPWeb.Firmenaktualisierung" %>
|
||||
<%@ Register Src="~/Defaults/Header.ascx" TagPrefix="shu" TagName="Header" %>
|
||||
<%@ Register Src="~/Defaults/Footer.ascx" TagPrefix="shu" TagName="Footer" %>
|
||||
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
|
||||
|
||||
<html xmlns="http://www.w3.org/1999/xhtml">
|
||||
<head id="Head1" runat="server">
|
||||
<title></title>
|
||||
<link href="~/Styles/Site.css" rel="stylesheet" type="text/css" />
|
||||
<style type="text/css">
|
||||
.style1
|
||||
{
|
||||
width: 136px;
|
||||
}
|
||||
</style>
|
||||
</head>
|
||||
|
||||
<body>
|
||||
<form id="form1" runat="server">
|
||||
<telerik:RadScriptManager ID="ScriptManager1" runat="server"
|
||||
EnableTheming="True">
|
||||
<scripts>
|
||||
<asp:ScriptReference Assembly="Telerik.Web.UI"
|
||||
Name="Telerik.Web.UI.Common.Core.js">
|
||||
</asp:ScriptReference>
|
||||
<asp:ScriptReference Assembly="Telerik.Web.UI"
|
||||
Name="Telerik.Web.UI.Common.jQuery.js">
|
||||
</asp:ScriptReference>
|
||||
<asp:ScriptReference Assembly="Telerik.Web.UI"
|
||||
Name="Telerik.Web.UI.Common.jQueryInclude.js">
|
||||
</asp:ScriptReference>
|
||||
</scripts>
|
||||
</telerik:RadScriptManager>
|
||||
<div class="page">
|
||||
<shu:Header runat="Server" ID="Header1"></shu:Header>
|
||||
|
||||
<div class="main">
|
||||
<h2>Verwendung bereits erfasster Daten</h2>
|
||||
<p>
|
||||
<asp:Label ID="Label2" runat="server" Text="Label"></asp:Label>
|
||||
</p>
|
||||
|
||||
<telerik:RadButton ID="RadButton1" runat="server" Text="Aktivieren">
|
||||
</telerik:RadButton>
|
||||
</div>
|
||||
</div>
|
||||
|
||||
</form>
|
||||
<shu:Footer runat="Server" ID="Footer1"></SHU:Footer>
|
||||
</body>
|
||||
</html>
|
||||
78
LPWeb20/Firmen/SIK/Firmenaktualisierung.aspx.designer.vb
generated
Normal file
78
LPWeb20/Firmen/SIK/Firmenaktualisierung.aspx.designer.vb
generated
Normal file
@@ -0,0 +1,78 @@
|
||||
'------------------------------------------------------------------------------
|
||||
' <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 Firmenaktualisierung
|
||||
|
||||
'''<summary>
|
||||
'''Head1-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 Head1 As Global.System.Web.UI.HtmlControls.HtmlHead
|
||||
|
||||
'''<summary>
|
||||
'''form1-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 form1 As Global.System.Web.UI.HtmlControls.HtmlForm
|
||||
|
||||
'''<summary>
|
||||
'''ScriptManager1-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 ScriptManager1 As Global.Telerik.Web.UI.RadScriptManager
|
||||
|
||||
'''<summary>
|
||||
'''Header1-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 Header1 As Global.LPWeb.Header
|
||||
|
||||
'''<summary>
|
||||
'''Label2-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 Label2 As Global.System.Web.UI.WebControls.Label
|
||||
|
||||
'''<summary>
|
||||
'''RadButton1-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 RadButton1 As Global.Telerik.Web.UI.RadButton
|
||||
|
||||
'''<summary>
|
||||
'''Footer1-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 Footer1 As Global.LPWeb.Footer
|
||||
End Class
|
||||
14
LPWeb20/Firmen/SIK/Firmenaktualisierung.aspx.vb
Normal file
14
LPWeb20/Firmen/SIK/Firmenaktualisierung.aspx.vb
Normal file
@@ -0,0 +1,14 @@
|
||||
Public Class Firmenaktualisierung
|
||||
Inherits System.Web.UI.Page
|
||||
|
||||
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
|
||||
Dim dh As New clsDatahandling
|
||||
Me.Label2.Text = dh.Get_Option(15)
|
||||
End Sub
|
||||
|
||||
Protected Sub RadButton1_Click(sender As Object, e As EventArgs) Handles RadButton1.Click
|
||||
Dim dh As New clsDatahandling
|
||||
dh.Firma_aktivieren(Session.Item("Firmanr"), Session.Item("Userid"))
|
||||
Response.Redirect("~/firmen/firmendaten1.aspx")
|
||||
End Sub
|
||||
End Class
|
||||
338
LPWeb20/Firmen/SIK/Firmenangebot.ascx
Normal file
338
LPWeb20/Firmen/SIK/Firmenangebot.ascx
Normal file
@@ -0,0 +1,338 @@
|
||||
<%@ Control Language="vb" AutoEventWireup="false" CodeBehind="Firmenangebot.ascx.vb" Inherits="LPWeb.Firmenangebot" %>
|
||||
<style type="text/css">
|
||||
</style>
|
||||
<script type="text/javascript" id="telerikClientEvents1">
|
||||
//<![CDATA[
|
||||
function alertCallBackFn(arg) {
|
||||
window.location = "../default.aspx"
|
||||
//radalert("<strong>radalert</strong> returned the following result: <h3 style='color: #ff0000;'>" + arg + "</h3>", null, null, "Result");
|
||||
}
|
||||
function alertCallBackFn1(arg) {
|
||||
//radalert("<strong>radalert</strong> returned the following result: <h3 style='color: #ff0000;'>" + arg + "</h3>", null, null, "Result");
|
||||
}
|
||||
|
||||
//]]>
|
||||
</script>
|
||||
|
||||
<table style="width:100%;">
|
||||
<tr>
|
||||
<td align="center" bgcolor="#F97364" colspan="2">
|
||||
<asp:Label ID="Label1" runat="server" Font-Bold="True" ForeColor="Black"
|
||||
Text="Bitte alle Ihnen möglichen Berufsbilder und Durchführungszeiten eintragen."></asp:Label>
|
||||
</td>
|
||||
</tr>
|
||||
|
||||
</table>
|
||||
<asp:Panel ID="Panel1" runat="server" Height="354px">
|
||||
<div class="main">
|
||||
<table style="width:100%;">
|
||||
<tr>
|
||||
<td valign="top">
|
||||
<table style="width:100%;">
|
||||
<tr>
|
||||
<td valign="top">
|
||||
<strong>Berufe</strong><br />
|
||||
<telerik:RadListBox ID="RadListBox1" runat="server" Culture="de-DE"
|
||||
DataSourceID="SqlDataBerufe" DataTextField="Bezeichnung"
|
||||
DataValueField="Berufnr" height="100px"
|
||||
Width="350px">
|
||||
</telerik:RadListBox>
|
||||
</td>
|
||||
<td valign="top">
|
||||
<strong>Ansprechpartner </strong>
|
||||
<telerik:RadButton ID="RadButton2" runat="server" Height="18px"
|
||||
Image-ImageUrl="~/bilder/refresh.gif" Text="" Width="18px">
|
||||
</telerik:RadButton>
|
||||
<br />
|
||||
<telerik:RadListBox ID="RadListBox2" runat="server" Culture="de-DE"
|
||||
DataSourceID="SqlDataAnsprechpartner" DataTextField="AName"
|
||||
DataValueField="AnsprechpartnerNr" Height="100px"
|
||||
Width="150px">
|
||||
</telerik:RadListBox>
|
||||
</td>
|
||||
<td valign="top">
|
||||
<strong>Zeiten</strong><br />
|
||||
<telerik:RadListBox ID="RadListBox3" runat="server" Culture="de-DE"
|
||||
DataSourceID="SqlDataZeiten" DataTextField="Bezeichnung"
|
||||
DataValueField="ZeitNr" Height="100px"
|
||||
Width="150px" >
|
||||
</telerik:RadListBox>
|
||||
</td>
|
||||
<td valign="top">
|
||||
<strong>Max. Anzahl Plätze<br /> </strong><telerik:RadComboBox ID="RadComboBox1" Runat="server"
|
||||
Culture="de-DE">
|
||||
<Items>
|
||||
<telerik:RadComboBoxItem runat="server" Selected="True" Text="0" Value="0" />
|
||||
<telerik:RadComboBoxItem runat="server" Text="1" Value="1" />
|
||||
<telerik:RadComboBoxItem runat="server" Text="2" Value="2" />
|
||||
<telerik:RadComboBoxItem runat="server" Text="3" Value="3" />
|
||||
<telerik:RadComboBoxItem runat="server" Text="4" Value="4" />
|
||||
<telerik:RadComboBoxItem runat="server" Text="5" Value="5" />
|
||||
<telerik:RadComboBoxItem runat="server" Text="6" Value="6" />
|
||||
<telerik:RadComboBoxItem runat="server" Text="7" Value="7" />
|
||||
<telerik:RadComboBoxItem runat="server" Text="8" Value="8" />
|
||||
<telerik:RadComboBoxItem runat="server" Text="9" Value="9" />
|
||||
<telerik:RadComboBoxItem runat="server" Text="10" Value="10" />
|
||||
</Items>
|
||||
</telerik:RadComboBox>
|
||||
<br />
|
||||
<strong>Mindestanforderung</strong><br />
|
||||
<telerik:RadComboBox ID="RadComboboxKlasse" Runat="server" Culture="de-DE"
|
||||
DataSourceID="SqlDataSourceKlasse" DataTextField="bezeichnung"
|
||||
DataValueField="Klassenr">
|
||||
<Items>
|
||||
<telerik:RadComboBoxItem runat="server" Owner="RadComboboxKlasse"
|
||||
Selected="True" Text="0" Value="0" />
|
||||
<telerik:RadComboBoxItem runat="server" Owner="RadComboboxKlasse" Text="1"
|
||||
Value="1" />
|
||||
<telerik:RadComboBoxItem runat="server" Owner="RadComboboxKlasse" Text="2"
|
||||
Value="2" />
|
||||
<telerik:RadComboBoxItem runat="server" Owner="RadComboboxKlasse" Text="3"
|
||||
Value="3" />
|
||||
<telerik:RadComboBoxItem runat="server" Owner="RadComboboxKlasse" Text="4"
|
||||
Value="4" />
|
||||
<telerik:RadComboBoxItem runat="server" Owner="RadComboboxKlasse" Text="5"
|
||||
Value="5" />
|
||||
<telerik:RadComboBoxItem runat="server" Owner="RadComboboxKlasse" Text="6"
|
||||
Value="6" />
|
||||
<telerik:RadComboBoxItem runat="server" Owner="RadComboboxKlasse" Text="7"
|
||||
Value="7" />
|
||||
<telerik:RadComboBoxItem runat="server" Owner="RadComboboxKlasse" Text="8"
|
||||
Value="8" />
|
||||
<telerik:RadComboBoxItem runat="server" Owner="RadComboboxKlasse" Text="9"
|
||||
Value="9" />
|
||||
<telerik:RadComboBoxItem runat="server" Owner="RadComboboxKlasse" Text="10"
|
||||
Value="10" />
|
||||
</Items>
|
||||
</telerik:RadComboBox>
|
||||
<br />
|
||||
<br />
|
||||
<telerik:RadButton ID="RadButton1" runat="server"
|
||||
Text="Angebot einfügen">
|
||||
</telerik:RadButton>
|
||||
</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td valign="top">
|
||||
Ihr Beruf fehlt? Klicken Sie -><telerik:RadButton ID="RadButton4" runat="server"
|
||||
Height="16px" Image-EnableImageButton="true"
|
||||
Image-ImageUrl="~/bilder/Button.gif" Text="" Width="16px">
|
||||
</telerik:RadButton>
|
||||
<-</td>
|
||||
<td valign="top">
|
||||
</td>
|
||||
<td valign="middle" align="center"> </td>
|
||||
<td valign="top"></td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td valign="top" colspan="4">
|
||||
<telerik:RadGrid ID="RadGrid1" runat="server" AllowAutomaticDeletes="True"
|
||||
AllowAutomaticUpdates="True" AllowPaging="True" AllowSorting="True"
|
||||
AutoGenerateColumns="False" CellSpacing="0" Culture="de-DE"
|
||||
DataSourceID="SqlDataFirmaBeruf" GridLines="None" Height="184px" >
|
||||
<ClientSettings>
|
||||
<Scrolling AllowScroll="True" UseStaticHeaders="True" />
|
||||
</ClientSettings>
|
||||
<MasterTableView AllowAutomaticUpdates="true" DataKeyNames="FirmaBerufNr"
|
||||
DataSourceID="SqlDataFirmaBeruf" EditMode="PopUp"
|
||||
NoMasterRecordsText="Keine Datensätze vorhanden" TableLayout="Fixed">
|
||||
<CommandItemSettings AddNewRecordText="Neuer Datensatz"
|
||||
ExportToExcelText="Excel-Export" ExportToPdfText="PDF-Export"
|
||||
RefreshText="Aktualisieren" ShowAddNewRecordButton="False"
|
||||
ShowRefreshButton="False" />
|
||||
<RowIndicatorColumn FilterControlAltText="Filter RowIndicator column"
|
||||
Visible="True">
|
||||
</RowIndicatorColumn>
|
||||
<ExpandCollapseColumn FilterControlAltText="Filter ExpandColumn column"
|
||||
Visible="True">
|
||||
</ExpandCollapseColumn>
|
||||
<Columns>
|
||||
<telerik:GridBoundColumn FilterControlAltText="Filter column column"
|
||||
HeaderText="Firmaberufnr" ReadOnly="True" UniqueName="column" Visible="False">
|
||||
</telerik:GridBoundColumn>
|
||||
<telerik:GridBoundColumn DataField="Beruf"
|
||||
FilterControlAltText="Filter column1 column" HeaderText="Beruf" ReadOnly="True"
|
||||
UniqueName="column1">
|
||||
<HeaderStyle Width="150px" Wrap="false" />
|
||||
<ItemStyle Wrap="False" />
|
||||
</telerik:GridBoundColumn>
|
||||
<telerik:GridBoundColumn DataField="Ansprechp"
|
||||
FilterControlAltText="Filter column2 column" HeaderText="Ansprechpartner"
|
||||
ReadOnly="True" UniqueName="column2">
|
||||
<HeaderStyle Width="100px" />
|
||||
<ItemStyle Wrap="False" />
|
||||
</telerik:GridBoundColumn>
|
||||
<telerik:GridDropDownColumn DataField="ZeitNr" DataSourceID="SQLDataZeiten"
|
||||
FilterControlAltText="Filter column6 column" HeaderText="Zeit"
|
||||
ListTextField="Bezeichnung" ListValueField="ZeitNr" UniqueName="column6">
|
||||
<HeaderStyle Width="70px" />
|
||||
<ItemStyle Wrap="False" />
|
||||
</telerik:GridDropDownColumn>
|
||||
<%-- <telerik:GridBoundColumn DataField="Anzahl"
|
||||
FilterControlAltText="Filter column4 column" HeaderText="Anz. Plätze"
|
||||
UniqueName="column4">
|
||||
</telerik:GridBoundColumn>
|
||||
--%>
|
||||
<telerik:GridDropDownColumn ColumnEditorID="DropAnzahl" DataField="Anzahl"
|
||||
DataSourceID="SqlDataSourceAnzahl" HeaderText="Anzahl" ListTextField="Anzahl"
|
||||
ListValueField="Anzahl" UniqueName="Anzahl">
|
||||
<ItemStyle Width="40px" />
|
||||
<HeaderStyle Width="50px" Wrap="False" />
|
||||
</telerik:GridDropDownColumn>
|
||||
<telerik:GridDropDownColumn DataField="Klassenr"
|
||||
DataSourceID="SQLDataSourceKlasse" FilterControlAltText="Filter column5 column"
|
||||
HeaderText="Mind. Anf." ListTextField="Bezeichnung" ListValueField="Klassenr"
|
||||
UniqueName="column5">
|
||||
<ItemStyle Width="40px" />
|
||||
<HeaderStyle Width="60px" Wrap="False" />
|
||||
</telerik:GridDropDownColumn>
|
||||
<telerik:GridBoundColumn ColumnEditorID="EditSchuelerBemerkung"
|
||||
DataField="Schuelerbemerkung" FilterControlAltText="Filter column2 column"
|
||||
HeaderText="Bem. f. Schüler"
|
||||
HeaderTooltip="Folgendes muss der Schüler mitbringen (spezielle Kleidung, Ausweis usw.)"
|
||||
UniqueName="Schuelerbemerkung">
|
||||
<HeaderStyle Width="100px" />
|
||||
<ItemStyle Wrap="False" />
|
||||
</telerik:GridBoundColumn>
|
||||
<telerik:GridBoundColumn ColumnEditorID="EditStandortBemerkung"
|
||||
DataField="standortbemerkung" FilterControlAltText="Filter column2 column"
|
||||
HeaderText="Bem. Treffpunkt"
|
||||
HeaderTooltip="Treffpunkt für Schüler, falls abweichend von der Geschäftsadresse"
|
||||
UniqueName="standortbemerkung">
|
||||
<HeaderStyle Width="100px" />
|
||||
<ItemStyle Wrap="False" />
|
||||
</telerik:GridBoundColumn>
|
||||
<telerik:GridBoundColumn ColumnEditorID="MinZuteilung"
|
||||
DataField="MinZuteilung" FilterControlAltText="Filter column2 column"
|
||||
HeaderText="MZ"
|
||||
HeaderTooltip="Mindest Anzahl Zuteilung"
|
||||
UniqueName="MinZuteilung">
|
||||
<HeaderStyle Width="40px" />
|
||||
<ItemStyle Wrap="False" />
|
||||
</telerik:GridBoundColumn>
|
||||
<telerik:GridEditCommandColumn ButtonType="ImageButton"
|
||||
FilterControlAltText="Filter EditCommandColumn column" HeaderText=""
|
||||
ItemStyle-HorizontalAlign="Center">
|
||||
<HeaderStyle Width="40px" />
|
||||
<ItemStyle HorizontalAlign="Center" />
|
||||
</telerik:GridEditCommandColumn>
|
||||
<telerik:GridButtonColumn ButtonType="ImageButton" CommandName="Delete"
|
||||
ConfirmDialogType="RadWindow" ConfirmText="Angebot wirklich löschen?"
|
||||
ConfirmTitle="Delete" HeaderText="" ItemStyle-HorizontalAlign="Center"
|
||||
Text="Delete" UniqueName="DeleteColumn">
|
||||
<ItemStyle CssClass="MyImageButton" HorizontalAlign="Center" />
|
||||
<HeaderStyle Width="40px" />
|
||||
</telerik:GridButtonColumn>
|
||||
</Columns>
|
||||
<EditFormSettings>
|
||||
<EditColumn ButtonType="ImageButton" CancelText="Abbruch"
|
||||
FilterControlAltText="Filter EditCommandColumn column" InsertText="Einfügen"
|
||||
UpdateText="Speichern">
|
||||
</EditColumn>
|
||||
</EditFormSettings>
|
||||
</MasterTableView>
|
||||
<FilterMenu EnableImageSprites="False">
|
||||
</FilterMenu>
|
||||
</telerik:RadGrid>
|
||||
<telerik:GridTextBoxColumnEditor runat="server" ID="EditSchuelerBemerkung" TextBoxMode="MultiLine" ></telerik:GridTextBoxColumnEditor>
|
||||
<telerik:GridTextBoxColumnEditor runat="server" ID="EditStandortBemerkung" TextBoxMode="MultiLine"></telerik:GridTextBoxColumnEditor>
|
||||
</td>
|
||||
</tr>
|
||||
</table>
|
||||
</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td valign="top">
|
||||
</td>
|
||||
</tr>
|
||||
</table>
|
||||
</div>
|
||||
</asp:Panel>
|
||||
<telerik:RadButton ID="RadButton3" runat="server"
|
||||
Text="< Zurück">
|
||||
</telerik:RadButton>
|
||||
<telerik:RadButton ID="RadButton5" runat="server"
|
||||
Text="Abschliessen">
|
||||
</telerik:RadButton>
|
||||
|
||||
<telerik:RadButton ID="RadButton6" runat="server" Text="Erfasste Daten drucken">
|
||||
</telerik:RadButton>
|
||||
|
||||
|
||||
|
||||
<asp:SqlDataSource ID="SqlDataBerufe" runat="server"
|
||||
ConnectionString="<%$ ConnectionStrings:LPConnectionString %>"
|
||||
ProviderName="<%$ ConnectionStrings:LPConnectionString.ProviderName %>"
|
||||
SelectCommand="SELECT Berufnr, Bezeichnung FROM Beruf WHERE (Aktiv = 1) order by bezeichnung">
|
||||
</asp:SqlDataSource>
|
||||
|
||||
<asp:SqlDataSource ID="SqlDataZeiten" runat="server"
|
||||
ConnectionString="<%$ ConnectionStrings:LPConnectionString %>"
|
||||
ProviderName="<%$ ConnectionStrings:LPConnectionString.ProviderName %>"
|
||||
SelectCommand="SELECT ZeitNr, Bezeichnung FROM Zeiten WHERE (Aktiv = 1) order by reihenfolge">
|
||||
</asp:SqlDataSource>
|
||||
<asp:SqlDataSource ID="SqlDataAnsprechpartner" runat="server"
|
||||
ConnectionString="<%$ ConnectionStrings:LPConnectionString %>"
|
||||
ProviderName="<%$ ConnectionStrings:LPConnectionString.ProviderName %>"
|
||||
SelectCommand="SELECT AnsprechpartnerNr, Ansprechpartner.name + ' '+ Ansprechpartner.Vorname as AName
|
||||
FROM Ansprechpartner where aktiv=1 and firmanr=@Firmanr order by name, vorname">
|
||||
<SelectParameters>
|
||||
<asp:SessionParameter Name="Firmanr" SessionField="Firmanr" />
|
||||
</SelectParameters>
|
||||
</asp:SqlDataSource>
|
||||
<asp:SqlDataSource ID="SqlDataFirmaBeruf" runat="server"
|
||||
ConnectionString="<%$ ConnectionStrings:LPConnectionString %>"
|
||||
DeleteCommand="Update Firmaberuf set aktiv=0, mutiert_am=getdate(), mutierer=@mutierer where firmaberufnr=@firmaberufnr"
|
||||
ProviderName="<%$ ConnectionStrings:LPConnectionString.ProviderName %>"
|
||||
SelectCommand="SELECT firmaberuf.FirmaBerufNr, beruf.Bezeichnung as Beruf, ansprechpartner.Name+' '+ansprechpartner.Vorname as Ansprechp,ZeitNr, firmaberuf.Anzahl, FirmaBeruf.KlasseNr, firmaberuf.schuelerbemerkung, firmaberuf.standortbemerkung, firmaberuf.minzuteilung
|
||||
FROM firmaberuf INNER JOIN
|
||||
beruf ON firmaberuf.Berufnr = beruf.Berufnr INNER JOIN
|
||||
ansprechpartner ON firmaberuf.AnsprechpartnerNr = ansprechpartner.AnsprechpartnerNr
|
||||
where Firmaberuf.aktiv=1 and firmaberuf.firmanr=@Firmanr "
|
||||
|
||||
UpdateCommand="Update Firmaberuf set anzahl=@Anzahl, klassenr=@Klassenr, ZeitNr=@ZeitNr, mutiert_am=getdate(), mutierer=@mutierer,standortbemerkung=@standortbemerkung, schuelerbemerkung=@schuelerbemerkung, minzuteilung=@minzuteilung where firmaberufnr=@firmaberufnr ">
|
||||
<DeleteParameters>
|
||||
<asp:Parameter Name="firmaberufnr" />
|
||||
<asp:SessionParameter Name="mutierer" Type="Int32" sessionfield="UserID" />
|
||||
</DeleteParameters>
|
||||
<SelectParameters>
|
||||
<asp:SessionParameter Name="Firmanr" SessionField="Firmanr" />
|
||||
</SelectParameters>
|
||||
<UpdateParameters>
|
||||
<asp:Parameter Name="Anzahl" />
|
||||
<asp:Parameter Name="Klassenr" />
|
||||
<asp:Parameter Name="firmaberufnr" />
|
||||
<asp:Parameter Name="ZeitNr" />
|
||||
<asp:Parameter Name="Schuelerbemerkung" />
|
||||
<asp:Parameter Name="Standortbemerkung" />
|
||||
<asp:Parameter Name="Minzuteilung" />
|
||||
<asp:SessionParameter Name="mutierer" Type="Int32" sessionfield="UserID" />
|
||||
</UpdateParameters>
|
||||
</asp:SqlDataSource>
|
||||
<asp:SqlDataSource ID="SqlDataSourceKlasse" runat="server"
|
||||
ConnectionString="<%$ ConnectionStrings:LPConnectionString %>"
|
||||
ProviderName="<%$ ConnectionStrings:LPConnectionString.ProviderName %>"
|
||||
SelectCommand="SELECT klassenr as Klassenr, bezeichnung FROM web_klasse where aktiv=1 and bezeichnung <> 'n. relevant' order by klassenr">
|
||||
</asp:SqlDataSource>
|
||||
|
||||
|
||||
<telerik:RadWindowManager ID="RadWindowManager1" ShowContentDuringLoad="false" VisibleStatusbar="false"
|
||||
ReloadOnShow="true" runat="server" EnableShadow="true" Skin="Default">
|
||||
<Windows>
|
||||
<telerik:RadWindow ID="RadWindow1" runat="server" Behaviors="Close"
|
||||
NavigateUrl="~/UserControls/Berufsanfrage.aspx">
|
||||
</telerik:RadWindow>
|
||||
</Windows>
|
||||
</telerik:RadWindowManager>
|
||||
|
||||
|
||||
|
||||
|
||||
<asp:SqlDataSource ID="SqlDataSourceAnzahl" runat="server"
|
||||
ConnectionString="<%$ ConnectionStrings:LPConnectionString %>"
|
||||
SelectCommand="SELECT * FROM [Web_Anzhal]"></asp:SqlDataSource>
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
231
LPWeb20/Firmen/SIK/Firmenangebot.ascx.designer.vb
generated
Normal file
231
LPWeb20/Firmen/SIK/Firmenangebot.ascx.designer.vb
generated
Normal file
@@ -0,0 +1,231 @@
|
||||
'------------------------------------------------------------------------------
|
||||
' <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 Firmenangebot
|
||||
|
||||
'''<summary>
|
||||
'''Label1-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 Label1 As Global.System.Web.UI.WebControls.Label
|
||||
|
||||
'''<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
|
||||
|
||||
'''<summary>
|
||||
'''RadListBox1-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 RadListBox1 As Global.Telerik.Web.UI.RadListBox
|
||||
|
||||
'''<summary>
|
||||
'''RadButton2-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 RadButton2 As Global.Telerik.Web.UI.RadButton
|
||||
|
||||
'''<summary>
|
||||
'''RadListBox2-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 RadListBox2 As Global.Telerik.Web.UI.RadListBox
|
||||
|
||||
'''<summary>
|
||||
'''RadListBox3-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 RadListBox3 As Global.Telerik.Web.UI.RadListBox
|
||||
|
||||
'''<summary>
|
||||
'''RadComboBox1-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 RadComboBox1 As Global.Telerik.Web.UI.RadComboBox
|
||||
|
||||
'''<summary>
|
||||
'''RadComboboxKlasse-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 RadComboboxKlasse As Global.Telerik.Web.UI.RadComboBox
|
||||
|
||||
'''<summary>
|
||||
'''RadButton1-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 RadButton1 As Global.Telerik.Web.UI.RadButton
|
||||
|
||||
'''<summary>
|
||||
'''RadButton4-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 RadButton4 As Global.Telerik.Web.UI.RadButton
|
||||
|
||||
'''<summary>
|
||||
'''RadGrid1-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 RadGrid1 As Global.Telerik.Web.UI.RadGrid
|
||||
|
||||
'''<summary>
|
||||
'''EditSchuelerBemerkung-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 EditSchuelerBemerkung As Global.Telerik.Web.UI.GridTextBoxColumnEditor
|
||||
|
||||
'''<summary>
|
||||
'''EditStandortBemerkung-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 EditStandortBemerkung As Global.Telerik.Web.UI.GridTextBoxColumnEditor
|
||||
|
||||
'''<summary>
|
||||
'''RadButton3-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 RadButton3 As Global.Telerik.Web.UI.RadButton
|
||||
|
||||
'''<summary>
|
||||
'''RadButton5-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 RadButton5 As Global.Telerik.Web.UI.RadButton
|
||||
|
||||
'''<summary>
|
||||
'''RadButton6-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 RadButton6 As Global.Telerik.Web.UI.RadButton
|
||||
|
||||
'''<summary>
|
||||
'''SqlDataBerufe-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 SqlDataBerufe As Global.System.Web.UI.WebControls.SqlDataSource
|
||||
|
||||
'''<summary>
|
||||
'''SqlDataZeiten-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 SqlDataZeiten As Global.System.Web.UI.WebControls.SqlDataSource
|
||||
|
||||
'''<summary>
|
||||
'''SqlDataAnsprechpartner-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 SqlDataAnsprechpartner As Global.System.Web.UI.WebControls.SqlDataSource
|
||||
|
||||
'''<summary>
|
||||
'''SqlDataFirmaBeruf-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 SqlDataFirmaBeruf As Global.System.Web.UI.WebControls.SqlDataSource
|
||||
|
||||
'''<summary>
|
||||
'''SqlDataSourceKlasse-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 SqlDataSourceKlasse As Global.System.Web.UI.WebControls.SqlDataSource
|
||||
|
||||
'''<summary>
|
||||
'''RadWindowManager1-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 RadWindowManager1 As Global.Telerik.Web.UI.RadWindowManager
|
||||
|
||||
'''<summary>
|
||||
'''RadWindow1-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 RadWindow1 As Global.Telerik.Web.UI.RadWindow
|
||||
|
||||
'''<summary>
|
||||
'''SqlDataSourceAnzahl-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 SqlDataSourceAnzahl As Global.System.Web.UI.WebControls.SqlDataSource
|
||||
End Class
|
||||
94
LPWeb20/Firmen/SIK/Firmenangebot.ascx.vb
Normal file
94
LPWeb20/Firmen/SIK/Firmenangebot.ascx.vb
Normal file
@@ -0,0 +1,94 @@
|
||||
Imports System.Web.Configuration
|
||||
Public Class Firmenangebot
|
||||
Inherits System.Web.UI.UserControl
|
||||
|
||||
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
|
||||
If Not Page.IsPostBack Then
|
||||
Try
|
||||
Me.RadListBox1.SelectedIndex = 0
|
||||
Catch
|
||||
End Try
|
||||
Try
|
||||
Me.RadListBox2.SelectedIndex = 0
|
||||
Catch
|
||||
End Try
|
||||
Try
|
||||
Me.RadListBox3.SelectedIndex = 0
|
||||
Catch
|
||||
End Try
|
||||
Try
|
||||
Me.RadComboBox1.SelectedIndex = 0
|
||||
Catch
|
||||
End Try
|
||||
End If
|
||||
If Session("admin") <> "True" Then
|
||||
Me.SqlDataZeiten.SelectCommand = "SELECT ZeitNr, Bezeichnung FROM Zeiten WHERE (Aktiv = 1 and Oeffentlich=1) order by reihenfolge"
|
||||
Me.RadGrid1.Columns(8).Visible = False
|
||||
End If
|
||||
' If Me.RadListBox2.Items.Count < 3 Then
|
||||
'System.Web.HttpContext.Current.Response.Write("<SCRIPT LANGUAGE='JavaScript'>alert('Hello this is an Alert')</SCRIPT>")
|
||||
'End If
|
||||
End Sub
|
||||
|
||||
|
||||
Protected Sub RadButton1_Click(sender As Object, e As EventArgs) Handles RadButton1.Click
|
||||
Me.RadWindowManager1.Windows.Clear()
|
||||
If Me.RadComboBox1.SelectedValue = 0 Then
|
||||
Showmessage(1, "Bitte die Anzahl Plätze angeben.")
|
||||
Me.RadComboBox1.Focus()
|
||||
Exit Sub
|
||||
End If
|
||||
If Me.RadListBox2.Items.Count = 0 Then
|
||||
System.Web.HttpContext.Current.Response.Write("<SCRIPT LANGUAGE='JavaScript'>alert('Sie müssten zuerst mind. einen Ansprechpartner festlegen.')</SCRIPT>")
|
||||
Exit Sub
|
||||
End If
|
||||
Dim dh As New clsDatahandling
|
||||
dh.Insert_FirmaBeruf(Session.Item("Firmanr"), RadListBox1.SelectedValue, RadListBox2.SelectedValue, RadListBox3.SelectedValue, RadComboBox1.SelectedValue, Me.RadComboboxKlasse.SelectedValue, Session.Item("Userid"))
|
||||
Me.RadGrid1.MasterTableView.Rebind()
|
||||
End Sub
|
||||
|
||||
|
||||
Protected Sub RadButton2_Click(sender As Object, e As EventArgs) Handles RadButton2.Click
|
||||
Me.RadListBox2.DataBind()
|
||||
End Sub
|
||||
|
||||
Protected Sub RadButton3_Click(sender As Object, e As EventArgs) Handles RadButton3.Click
|
||||
Response.Redirect("~/Firmen/Firmendaten1.aspx?Tab=2")
|
||||
End Sub
|
||||
|
||||
Protected Sub RadButton4_Click(sender As Object, e As EventArgs) Handles RadButton4.Click
|
||||
Response.Redirect("~/usercontrols/Berufsanfrage1.aspx")
|
||||
'ShowWindow()
|
||||
End Sub
|
||||
|
||||
Private Sub ShowWindow()
|
||||
Dim newwindow As New Telerik.Web.UI.RadWindow
|
||||
|
||||
newwindow.NavigateUrl = "~/UserControls/Berufsanfrage.aspx"
|
||||
newwindow.ID = "RadWindow2"
|
||||
newwindow.Skin = "Default"
|
||||
newwindow.VisibleOnPageLoad = True
|
||||
newwindow.Height = 220
|
||||
newwindow.Width = 500
|
||||
|
||||
'newwindow.AutoSize = True
|
||||
RadWindowManager1.Windows.Clear()
|
||||
RadWindowManager1.Windows.Add(newwindow)
|
||||
End Sub
|
||||
|
||||
Protected Sub RadButton5_Click(sender As Object, e As EventArgs) Handles RadButton5.Click
|
||||
Dim image As String = WebConfigurationManager.AppSettings("Imagepath") + "info1.png"
|
||||
RadWindowManager1.RadAlert("Besten Dank für Ihre aktive Mitarbeit.", 330, 100, "Bestätigung", "alertCallBackFn", image)
|
||||
'Response.Redirect("~/default.aspx")
|
||||
End Sub
|
||||
Private Sub Showmessage(ByVal typ As Integer, ByVal meldung As String)
|
||||
Dim image As String = WebConfigurationManager.AppSettings("Imagepath") + "info1.png"
|
||||
RadWindowManager1.RadAlert(meldung, 330, 100, "Bestätigung", "alertCallBackFn1", image)
|
||||
End Sub
|
||||
|
||||
Protected Sub RadButton6_Click(sender As Object, e As EventArgs) Handles RadButton6.Click
|
||||
Response.Redirect("~/Firmen/FirmenReport.aspx")
|
||||
End Sub
|
||||
|
||||
|
||||
End Class
|
||||
203
LPWeb20/Firmen/SIK/Firmenansprechpartner.ascx
Normal file
203
LPWeb20/Firmen/SIK/Firmenansprechpartner.ascx
Normal file
@@ -0,0 +1,203 @@
|
||||
<%@ Control Language="vb" AutoEventWireup="false" CodeBehind="Firmenansprechpartner.ascx.vb" Inherits="LPWeb.Firmenansprechpartner" %>
|
||||
<script type="text/javascript" id="telerikClientEvents1">
|
||||
//<![CDATA[
|
||||
function alertCallBackFn(arg) {
|
||||
window.location = "../Firmen/Firmendaten1.aspx?Tab=3"
|
||||
//radalert("<strong>radalert</strong> returned the following result: <h3 style='color: #ff0000;'>" + arg + "</h3>", null, null, "Result");
|
||||
}
|
||||
function alertCallBackFnError(arg) {
|
||||
//window.location = "../Firmen/Firmendaten1.aspx?Tab=3"
|
||||
//radalert("<strong>radalert</strong> returned the following result: <h3 style='color: #ff0000;'>" + arg + "</h3>", null, null, "Result");
|
||||
}
|
||||
|
||||
|
||||
//]]>
|
||||
</script>
|
||||
|
||||
<p>
|
||||
<telerik:RadWindowManager ID="RadWindowManager1" runat="server">
|
||||
</telerik:RadWindowManager>
|
||||
</p>
|
||||
<asp:Panel ID="Panel1" runat="server" Height="341px">
|
||||
<telerik:RadGrid ID="RadGrid1" runat="server" Culture="de-DE"
|
||||
DataSourceID="SqlDataSource1" AllowPaging="True" AllowSorting="True"
|
||||
AutoGenerateColumns="False" CellSpacing="0" GridLines="None"
|
||||
AllowAutomaticUpdates="True" AllowAutomaticDeletes="True"
|
||||
AllowAutomaticInserts="True">
|
||||
<MasterTableView DataKeyNames="AnsprechpartnerNr"
|
||||
DataSourceID="SqlDataSource1" CommandItemDisplay="TopAndBottom"
|
||||
TableLayout="Fixed" NoMasterRecordsText="Keine Datensätze vorhanden">
|
||||
<CommandItemSettings ExportToPdfText="PDF-Export"
|
||||
AddNewRecordText="Neuer Datensatz" ExportToExcelText="Excel-Export"
|
||||
RefreshText="Aktualisieren">
|
||||
</CommandItemSettings>
|
||||
<RowIndicatorColumn Visible="True"
|
||||
FilterControlAltText="Filter RowIndicator column">
|
||||
</RowIndicatorColumn>
|
||||
<ExpandCollapseColumn Visible="True"
|
||||
FilterControlAltText="Filter ExpandColumn column">
|
||||
</ExpandCollapseColumn>
|
||||
<Columns>
|
||||
<telerik:GridBoundColumn DataField="AnsprechpartnerNr" DataType="System.Int32"
|
||||
FilterControlAltText="Filter AnsprechpartnerNr column" HeaderText="Nr"
|
||||
ReadOnly="True" SortExpression="AnsprechpartnerNr"
|
||||
UniqueName="AnsprechpartnerNr">
|
||||
<HeaderStyle Width="25px" />
|
||||
<ItemStyle Wrap="false" />
|
||||
</telerik:GridBoundColumn>
|
||||
<telerik:GridBoundColumn DataField="FirmaNr" DataType="System.Int32"
|
||||
FilterControlAltText="Filter FirmaNr column" HeaderText="FirmaNr"
|
||||
SortExpression="FirmaNr" UniqueName="FirmaNr" Visible="false"
|
||||
ReadOnly="True">
|
||||
</telerik:GridBoundColumn>
|
||||
|
||||
<telerik:GridDropDownColumn DataField="Anrede" DataSourceID="SqlDataSource2"
|
||||
HeaderText="Anrede" ListTextField="Bezeichnung" ListValueField="Eintrag"
|
||||
UniqueName="Anrede" ColumnEditorID="DropUserType">
|
||||
<ItemStyle Width="40px" />
|
||||
<HeaderStyle Width="80px" Wrap="False" />
|
||||
</telerik:GridDropDownColumn>
|
||||
<telerik:GridBoundColumn DataField="Name"
|
||||
FilterControlAltText="Filter Name column" HeaderText="Name"
|
||||
SortExpression="Name" UniqueName="Name">
|
||||
<HeaderStyle Width="120px" />
|
||||
<ItemStyle Wrap="false" />
|
||||
</telerik:GridBoundColumn>
|
||||
|
||||
|
||||
<telerik:GridBoundColumn DataField="Vorname"
|
||||
FilterControlAltText="Filter Vorname column" HeaderText="Vorname"
|
||||
SortExpression="Vorname" UniqueName="Vorname">
|
||||
<HeaderStyle Width="120px" />
|
||||
<ItemStyle Wrap="false" />
|
||||
</telerik:GridBoundColumn>
|
||||
<telerik:GridBoundColumn DataField="Tel"
|
||||
FilterControlAltText="Filter Tel column" HeaderText="Tel" SortExpression="Tel"
|
||||
UniqueName="Tel">
|
||||
<HeaderStyle Width="100px" />
|
||||
<ItemStyle Wrap="false" />
|
||||
</telerik:GridBoundColumn>
|
||||
<telerik:GridBoundColumn DataField="EMail"
|
||||
FilterControlAltText="Filter EMail column" HeaderText="EMail"
|
||||
SortExpression="EMail" UniqueName="EMail">
|
||||
<HeaderStyle Width="160px" />
|
||||
<ItemStyle Wrap="false" />
|
||||
</telerik:GridBoundColumn>
|
||||
<telerik:GridBoundColumn DataField="Erstellt_am" DataType="System.DateTime"
|
||||
FilterControlAltText="Filter Erstellt_am column" HeaderText="Erstellt_am"
|
||||
SortExpression="Erstellt_am" UniqueName="Erstellt_am" Visible="False"
|
||||
ReadOnly="True">
|
||||
<HeaderStyle Width="80px" />
|
||||
<ItemStyle Wrap="False" />
|
||||
</telerik:GridBoundColumn>
|
||||
<telerik:GridBoundColumn DataField="Mutiert_am" DataType="System.DateTime"
|
||||
FilterControlAltText="Filter Mutiert_am column" HeaderText="Mutiert_am"
|
||||
SortExpression="Mutiert_am" UniqueName="Mutiert_am" Visible="false"
|
||||
ReadOnly="True">
|
||||
<HeaderStyle Width="80px" />
|
||||
<ItemStyle Wrap="false" />
|
||||
</telerik:GridBoundColumn>
|
||||
<telerik:GridBoundColumn DataField="Mutierer" DataType="System.Int32"
|
||||
FilterControlAltText="Filter Mutierer column" HeaderText="Mutierer"
|
||||
SortExpression="Mutierer" UniqueName="Mutierer" Visible="false"
|
||||
ReadOnly="True">
|
||||
<HeaderStyle Width="80px" />
|
||||
<ItemStyle Wrap="false" />
|
||||
</telerik:GridBoundColumn>
|
||||
<telerik:GridCheckBoxColumn DataField="Aktiv" DataType="System.Boolean"
|
||||
FilterControlAltText="Filter Aktiv column" HeaderText="Aktiv"
|
||||
SortExpression="Aktiv" UniqueName="Aktiv" Visible="false" ReadOnly="True">
|
||||
<HeaderStyle Width="80px" />
|
||||
<ItemStyle Wrap="false" />
|
||||
</telerik:GridCheckBoxColumn>
|
||||
|
||||
<%-- <telerik:GridBoundColumn DataField="Anrede"
|
||||
FilterControlAltText="Filter Anrede column" HeaderText="Anrede"
|
||||
SortExpression="Anrede" UniqueName="Anrede">
|
||||
<HeaderStyle Width="160px" />
|
||||
<ItemStyle Wrap="false" />
|
||||
</telerik:GridBoundColumn>
|
||||
--%> <telerik:GridEditCommandColumn FilterControlAltText="Filter EditCommandColumn column"
|
||||
HeaderText="" ButtonType="ImageButton" ItemStyle-HorizontalAlign="Center">
|
||||
<HeaderStyle Width="40px" />
|
||||
<ItemStyle HorizontalAlign="Center"></ItemStyle>
|
||||
</telerik:GridEditCommandColumn>
|
||||
<telerik:GridButtonColumn ConfirmText="Ansprechpartner wirklich löschen?" ConfirmDialogType="RadWindow"
|
||||
ConfirmTitle="Delete" ButtonType="ImageButton"
|
||||
CommandName="Delete" Text="Delete" HeaderText=""
|
||||
UniqueName="DeleteColumn" ItemStyle-HorizontalAlign="Center">
|
||||
<ItemStyle HorizontalAlign="Center" CssClass="MyImageButton" />
|
||||
<HeaderStyle Width="40px" />
|
||||
</telerik:GridButtonColumn>
|
||||
</Columns>
|
||||
<EditFormSettings>
|
||||
<EditColumn FilterControlAltText="Filter EditCommandColumn column" ButtonType="ImageButton"
|
||||
InsertText="Einfügen" UpdateText="Speichern" CancelText="Abbruch">
|
||||
</EditColumn>
|
||||
</EditFormSettings>
|
||||
</MasterTableView>
|
||||
<FilterMenu EnableImageSprites="False">
|
||||
</FilterMenu>
|
||||
</telerik:RadGrid>
|
||||
|
||||
|
||||
</asp:Panel>
|
||||
<asp:SqlDataSource ID="SqlDataSource1" runat="server"
|
||||
ConnectionString="<%$ ConnectionStrings:LPConnectionString %>"
|
||||
DeleteCommand="Update [Ansprechpartner] set aktiv=0, mutiert_am=getdate(), mutierer=@Mutierer WHERE [AnsprechpartnerNr] = @AnsprechpartnerNr"
|
||||
InsertCommand="INSERT INTO [Ansprechpartner] ([FirmaNr], [Name], [Vorname], [Tel], [EMail], [Erstellt_am], [Mutiert_am], [Mutierer], [Aktiv], [Anrede]) VALUES ( @FirmaNr, @Name, @Vorname, @Tel, @EMail, getdate(), getdate(), @Mutierer, 1, @Anrede)"
|
||||
ProviderName="<%$ ConnectionStrings:LPConnectionString.ProviderName %>"
|
||||
SelectCommand="SELECT * FROM [Ansprechpartner] where firmanr=@Firmanr and aktiv=1"
|
||||
UpdateCommand="UPDATE [Ansprechpartner] SET [Name] = @Name, [Vorname] = @Vorname, [Tel] = @Tel, [EMail] = @EMail, [Erstellt_am] = getdate(), [Mutiert_am] = getdate(), [Mutierer] = @Mutierer, [Anrede] = @Anrede WHERE [AnsprechpartnerNr] = @AnsprechpartnerNr">
|
||||
<DeleteParameters>
|
||||
<asp:Parameter Name="AnsprechpartnerNr" Type="Int32" />
|
||||
<asp:SessionParameter Name="mutierer" Type="Int32" sessionfield="UserID" />
|
||||
</DeleteParameters>
|
||||
<InsertParameters>
|
||||
<asp:Parameter Name="AnsprechpartnerNr" Type="Int32" />
|
||||
<asp:SessionParameter Name="FirmaNr" Type="Int32" sessionfield="FirmaNr" />
|
||||
<asp:Parameter Name="Name" Type="String" />
|
||||
<asp:Parameter Name="Vorname" Type="String" />
|
||||
<asp:Parameter Name="Tel" Type="String" />
|
||||
<asp:Parameter Name="EMail" Type="String" />
|
||||
<asp:Parameter Name="Erstellt_am" Type="DateTime" />
|
||||
<asp:Parameter Name="Mutiert_am" Type="DateTime" />
|
||||
<asp:SessionParameter Name="mutierer" Type="Int32" sessionfield="UserID" />
|
||||
<asp:Parameter Name="Aktiv" Type="Boolean" />
|
||||
<asp:Parameter Name="Anrede" Type="String" />
|
||||
</InsertParameters>
|
||||
<UpdateParameters>
|
||||
<asp:SessionParameter Name="FirmaNr" Type="Int32" sessionfield="FirmaNr" />
|
||||
<asp:Parameter Name="Name" Type="String" />
|
||||
<asp:Parameter Name="Vorname" Type="String" />
|
||||
<asp:Parameter Name="Tel" Type="String" />
|
||||
<asp:Parameter Name="EMail" Type="String" />
|
||||
<asp:Parameter Name="Erstellt_am" Type="DateTime" />
|
||||
<asp:Parameter Name="Mutiert_am" Type="DateTime" />
|
||||
<asp:SessionParameter Name="mutierer" Type="Int32" sessionfield="UserID" />
|
||||
<asp:Parameter Name="Aktiv" Type="Boolean" />
|
||||
<asp:Parameter Name="Anrede" Type="String" />
|
||||
<asp:Parameter Name="AnsprechpartnerNr" Type="Int32" />
|
||||
</UpdateParameters>
|
||||
<SelectParameters>
|
||||
<asp:SessionParameter Name="FirmaNr" Type="Int32" sessionfield="FirmaNr" />
|
||||
</SelectParameters>
|
||||
</asp:SqlDataSource>
|
||||
|
||||
<telerik:RadButton ID="RadButton1" runat="server" Text="< Zurück">
|
||||
</telerik:RadButton>
|
||||
<telerik:RadButton ID="RadButton2" runat="server" Text="Weiter >">
|
||||
</telerik:RadButton>
|
||||
|
||||
|
||||
<asp:SqlDataSource ID="SqlDataSource2" runat="server"
|
||||
ConnectionString="<%$ ConnectionStrings:LPConnectionString %>"
|
||||
SelectCommand="SELECT [Eintrag], [Bezeichnung] FROM [Web_Anrede] WHERE ([Bezeichnung] <> @Bezeichnung)">
|
||||
<SelectParameters>
|
||||
<asp:Parameter DefaultValue="Damen und Herren" Name="Bezeichnung"
|
||||
Type="String" />
|
||||
</SelectParameters>
|
||||
</asp:SqlDataSource>
|
||||
|
||||
|
||||
|
||||
78
LPWeb20/Firmen/SIK/Firmenansprechpartner.ascx.designer.vb
generated
Normal file
78
LPWeb20/Firmen/SIK/Firmenansprechpartner.ascx.designer.vb
generated
Normal file
@@ -0,0 +1,78 @@
|
||||
'------------------------------------------------------------------------------
|
||||
' <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 Firmenansprechpartner
|
||||
|
||||
'''<summary>
|
||||
'''RadWindowManager1-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 RadWindowManager1 As Global.Telerik.Web.UI.RadWindowManager
|
||||
|
||||
'''<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
|
||||
|
||||
'''<summary>
|
||||
'''RadGrid1-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 RadGrid1 As Global.Telerik.Web.UI.RadGrid
|
||||
|
||||
'''<summary>
|
||||
'''SqlDataSource1-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 SqlDataSource1 As Global.System.Web.UI.WebControls.SqlDataSource
|
||||
|
||||
'''<summary>
|
||||
'''RadButton1-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 RadButton1 As Global.Telerik.Web.UI.RadButton
|
||||
|
||||
'''<summary>
|
||||
'''RadButton2-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 RadButton2 As Global.Telerik.Web.UI.RadButton
|
||||
|
||||
'''<summary>
|
||||
'''SqlDataSource2-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 SqlDataSource2 As Global.System.Web.UI.WebControls.SqlDataSource
|
||||
End Class
|
||||
168
LPWeb20/Firmen/SIK/Firmenansprechpartner.ascx.vb
Normal file
168
LPWeb20/Firmen/SIK/Firmenansprechpartner.ascx.vb
Normal file
@@ -0,0 +1,168 @@
|
||||
Imports Telerik.Web.UI
|
||||
Imports System.Web.Configuration
|
||||
Public Class Firmenansprechpartner
|
||||
Inherits System.Web.UI.UserControl
|
||||
|
||||
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
|
||||
|
||||
End Sub
|
||||
|
||||
Protected Sub RadButton1_Click(sender As Object, e As EventArgs) Handles RadButton1.Click
|
||||
Response.Redirect("~/Firmen/Firmendaten1.aspx?Tab=1")
|
||||
End Sub
|
||||
|
||||
Protected Sub RadButton2_Click(sender As Object, e As EventArgs) Handles RadButton2.Click
|
||||
Response.Redirect("~/Firmen/Firmendaten1.aspx?Tab=3")
|
||||
End Sub
|
||||
|
||||
Private Sub RadGrid1_InsertCommand(sender As Object, e As Telerik.Web.UI.GridCommandEventArgs) Handles RadGrid1.InsertCommand
|
||||
Dim editedItem As GridEditableItem = CType(e.Item, GridEditableItem)
|
||||
Dim editMan As GridEditManager = editedItem.EditManager
|
||||
Dim haserror As Boolean = False
|
||||
Dim column As GridColumn
|
||||
Dim i As Integer = 0
|
||||
For Each column In e.Item.OwnerTableView.Columns
|
||||
If TypeOf column Is IGridEditableColumn Then
|
||||
Dim editableCol As IGridEditableColumn = CType(column, IGridEditableColumn)
|
||||
If (editableCol.IsEditable) Then
|
||||
Dim editor As IGridColumnEditor = editMan.GetColumnEditor(editableCol)
|
||||
|
||||
Dim editorType As String = CType(editor, Object).ToString()
|
||||
Dim editorText As String = "unknown"
|
||||
Dim editorValue As Object = Nothing
|
||||
|
||||
If (TypeOf editor Is GridTextColumnEditor) Then
|
||||
editorText = CType(editor, GridTextColumnEditor).Text
|
||||
editorValue = CType(editor, GridTextColumnEditor).Text
|
||||
If editorText.Trim = "" Then haserror = True
|
||||
End If
|
||||
|
||||
i = i + 1
|
||||
If i = 5 Then
|
||||
If Verify_Mail(editorText).ToString = False Then
|
||||
Show_Message(1, "Die eingegebene E-Mail-Adresse ist ungültig.")
|
||||
e.Canceled = True
|
||||
Return
|
||||
End If
|
||||
End If
|
||||
If (TypeOf editor Is GridBoolColumnEditor) Then
|
||||
editorText = CType(editor, GridBoolColumnEditor).Value.ToString()
|
||||
editorValue = CType(editor, GridBoolColumnEditor).Value
|
||||
End If
|
||||
|
||||
If (TypeOf editor Is GridDropDownColumnEditor) Then
|
||||
editorText = CType(editor, GridDropDownColumnEditor).SelectedText & "; " & CType(editor, GridDropDownColumnEditor).SelectedValue
|
||||
editorValue = CType(editor, GridDropDownColumnEditor).SelectedValue
|
||||
End If
|
||||
If (TypeOf editor Is GridDateTimeColumnEditor) Then
|
||||
editorText = CType(editor, GridDateTimeColumnEditor).Text
|
||||
editorValue = CType(editor, GridDateTimeColumnEditor).Text
|
||||
End If
|
||||
'Try
|
||||
' Dim changedRows As DataRow() = Me.EmployeesData.Tables("Employees").Select("EmployeeID = " & editedItem.OwnerTableView.DataKeyValues(editedItem.ItemIndex)("EmployeeID"))
|
||||
' changedRows(0)(column.UniqueName) = editorValue
|
||||
' Me.EmployeesData.Tables("Employees").AcceptChanges()
|
||||
'Catch ex As Exception
|
||||
' RadGrid1.Controls.Add(New LiteralControl("<strong>Unable to set value of column '" & column.UniqueName & "'</strong> - " + ex.Message))
|
||||
' e.Canceled = True
|
||||
'End Try
|
||||
|
||||
End If
|
||||
End If
|
||||
Next
|
||||
If haserror Then
|
||||
Show_Message(1, "Daten können nicht gespeichert werden. Es sind zwinged alle Felder zu befüllen.")
|
||||
e.Canceled = True
|
||||
End If
|
||||
|
||||
End Sub
|
||||
|
||||
|
||||
Private Sub RadGrid1_UpdateCommand(sender As Object, e As Telerik.Web.UI.GridCommandEventArgs) Handles RadGrid1.UpdateCommand
|
||||
Dim editedItem As GridEditableItem = CType(e.Item, GridEditableItem)
|
||||
Dim editMan As GridEditManager = editedItem.EditManager
|
||||
Dim haserror As Boolean = False
|
||||
Dim column As GridColumn
|
||||
|
||||
Dim i As Integer = 0
|
||||
For Each column In e.Item.OwnerTableView.Columns
|
||||
|
||||
If TypeOf column Is IGridEditableColumn Then
|
||||
Dim editableCol As IGridEditableColumn = CType(column, IGridEditableColumn)
|
||||
If (editableCol.IsEditable) Then
|
||||
Dim editor As IGridColumnEditor = editMan.GetColumnEditor(editableCol)
|
||||
|
||||
Dim editorType As String = CType(editor, Object).ToString()
|
||||
Dim editorText As String = "unknown"
|
||||
Dim editorValue As Object = Nothing
|
||||
|
||||
If (TypeOf editor Is GridTextColumnEditor) Then
|
||||
editorText = CType(editor, GridTextColumnEditor).Text
|
||||
editorValue = CType(editor, GridTextColumnEditor).Text
|
||||
If editorText.Trim = "" Then haserror = True
|
||||
End If
|
||||
i = i + 1
|
||||
If i = 5 Then
|
||||
If Verify_Mail(editorText).ToString = False Then
|
||||
Show_Message(1, "Die eingegebene E-Mail-Adresse ist ungültig.")
|
||||
e.Canceled = True
|
||||
Return
|
||||
End If
|
||||
End If
|
||||
If (TypeOf editor Is GridBoolColumnEditor) Then
|
||||
editorText = CType(editor, GridBoolColumnEditor).Value.ToString()
|
||||
editorValue = CType(editor, GridBoolColumnEditor).Value
|
||||
End If
|
||||
|
||||
If (TypeOf editor Is GridDropDownColumnEditor) Then
|
||||
editorText = CType(editor, GridDropDownColumnEditor).SelectedText & "; " & CType(editor, GridDropDownColumnEditor).SelectedValue
|
||||
editorValue = CType(editor, GridDropDownColumnEditor).SelectedValue
|
||||
End If
|
||||
If (TypeOf editor Is GridDateTimeColumnEditor) Then
|
||||
editorText = CType(editor, GridDateTimeColumnEditor).Text
|
||||
editorValue = CType(editor, GridDateTimeColumnEditor).Text
|
||||
End If
|
||||
'Try
|
||||
' Dim changedRows As DataRow() = Me.EmployeesData.Tables("Employees").Select("EmployeeID = " & editedItem.OwnerTableView.DataKeyValues(editedItem.ItemIndex)("EmployeeID"))
|
||||
' changedRows(0)(column.UniqueName) = editorValue
|
||||
' Me.EmployeesData.Tables("Employees").AcceptChanges()
|
||||
'Catch ex As Exception
|
||||
' RadGrid1.Controls.Add(New LiteralControl("<strong>Unable to set value of column '" & column.UniqueName & "'</strong> - " + ex.Message))
|
||||
' e.Canceled = True
|
||||
'End Try
|
||||
|
||||
End If
|
||||
End If
|
||||
Next
|
||||
If haserror Then
|
||||
Show_Message(1, "Daten können nicht gespeichert werden. Es sind zwinged alle Felder zu befüllen.")
|
||||
e.Canceled = True
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Protected Sub Show_Message(ByVal type As Integer, ByVal meldung As String)
|
||||
Dim image1 As String
|
||||
Select Case type
|
||||
Case 1
|
||||
image1 = WebConfigurationManager.AppSettings("Imagepath") + "Error.png"
|
||||
Case 2
|
||||
image1 = WebConfigurationManager.AppSettings("Imagepath") + "Info1.png"
|
||||
End Select
|
||||
RadWindowManager1.RadAlert(meldung, 330, 100, "Fehler", "alertCallBackFnError", image1)
|
||||
|
||||
End Sub
|
||||
|
||||
Protected Function Verify_Mail(ByVal mail As String) As Boolean
|
||||
|
||||
Dim Expression As New System.Text.RegularExpressions.Regex("\S+@\S+\.\S+")
|
||||
' If the email matches the regular expression
|
||||
If Expression.IsMatch(mail) Then
|
||||
Return True
|
||||
Else
|
||||
Return False
|
||||
End If
|
||||
|
||||
End Function
|
||||
|
||||
|
||||
End Class
|
||||
232
LPWeb20/Firmen/SIK/Firmendaten.ascx
Normal file
232
LPWeb20/Firmen/SIK/Firmendaten.ascx
Normal file
@@ -0,0 +1,232 @@
|
||||
<%@ Control Language="vb" AutoEventWireup="false" CodeBehind="Firmendaten.ascx.vb" Inherits="LPWeb.Firmendaten" %>
|
||||
<style type="text/css">
|
||||
.style1
|
||||
{
|
||||
}
|
||||
.style2
|
||||
{
|
||||
height: 7px;
|
||||
}
|
||||
.riLabel1
|
||||
{
|
||||
font: 12px "segoe ui" ,arial,sans-serif; color:Black;
|
||||
width:115px;
|
||||
}
|
||||
|
||||
</style>
|
||||
<script runat="server">
|
||||
Public Sub CheckID(source As Object, args As ServerValidateEventArgs)
|
||||
Check_Userid(source, args)
|
||||
End Sub
|
||||
Public Sub CheckCaptcha(source As Object, args As ServerValidateEventArgs)
|
||||
Check_Captcha(source, args)
|
||||
End Sub
|
||||
</script>
|
||||
<p></p>
|
||||
<telerik:RadAjaxManager ID="RadAjaxManager1" runat="server">
|
||||
<AjaxSettings>
|
||||
<telerik:AjaxSetting AjaxControlID="btnRegister">
|
||||
<UpdatedControls>
|
||||
<telerik:AjaxUpdatedControl ControlID="MainPanel"
|
||||
LoadingPanelID="RadAjaxLoadingPanel1" />
|
||||
</UpdatedControls>
|
||||
</telerik:AjaxSetting>
|
||||
</AjaxSettings>
|
||||
</telerik:RadAjaxManager>
|
||||
<telerik:RadAjaxLoadingPanel ID="RadAjaxLoadingPanel1" Runat="server"
|
||||
Skin="Default">
|
||||
</telerik:RadAjaxLoadingPanel>
|
||||
<asp:ValidationSummary ID="ValidationSummary1" runat="server" ForeColor="Red"
|
||||
HeaderText="Folgende Fehler sind vorhanden:" />
|
||||
<asp:RequiredFieldValidator ID="RV11" runat="server" ControlToValidate="txtNameZ1" ErrorMessage="Firmenname fehlt" ForeColor="White">> </asp:RequiredFieldValidator>
|
||||
<asp:RequiredFieldValidator ID="RV2" runat="server" ControlToValidate="txtEmail" ErrorMessage="E-Mailadresse fehlt" ForeColor="White">> </asp:RequiredFieldValidator>
|
||||
<asp:RequiredFieldValidator ID="RV3" runat="server" ControlToValidate="txtPlz" ErrorMessage="Postleitzahl fehlt" ForeColor="White">> </asp:RequiredFieldValidator>
|
||||
<asp:RequiredFieldValidator ID="RV4" runat="server" ControlToValidate="txtort" ErrorMessage="Ort fehlt" ForeColor="White">> </asp:RequiredFieldValidator>
|
||||
<asp:RequiredFieldValidator ID="RV5" runat="server" ControlToValidate="txttelefon" ErrorMessage="Telefon-Nummer fehlt" ForeColor="White">> </asp:RequiredFieldValidator>
|
||||
<asp:RequiredFieldValidator ID="RV6" runat="server" ControlToValidate="txtPasswort1" ErrorMessage="Passwort fehlt" ForeColor="White">> </asp:RequiredFieldValidator>
|
||||
<asp:RequiredFieldValidator ID="RV7" runat="server" ControlToValidate="txtUsername" ErrorMessage="Benutzername fehlt" ForeColor="White">> </asp:RequiredFieldValidator>
|
||||
<asp:RequiredFieldValidator ID="RV9" runat="server" ControlToValidate="txtUserEmail" ErrorMessage="Benutzer-E-Mail fehlt" ForeColor="White">> </asp:RequiredFieldValidator>
|
||||
<asp:RegularExpressionValidator ID="Eegex1" runat="server" ErrorMessage="E-Mail-Adresse ungültig" ForeColor="White" ControlToValidate="txtEmail" ValidationExpression="^([\w\.\-]+)@([\w\-]+)((\.(\w){2,3})+)$">*</asp:RegularExpressionValidator>
|
||||
<asp:RegularExpressionValidator ID="Regex2" runat="server" controlToValidate="txtPasswort1" ErrorMessage="Passwort muss 4-12 Zeichen beinhalten" ValidationExpression="[^\s]{4,12}" ForeColor="White"/>
|
||||
<asp:RegularExpressionValidator ID="Regex3" runat="server" ControlToValidate="txtPasswort1" ErrorMessage="Passwort muss ein Sonderzeichen @#$%^&.*/ beinhalten" ValidationExpression=".*[@#$%^&*/].*" ForeColor="White"/>
|
||||
<asp:CustomValidator ID="CV1" runat="server" controltovalidate="txtUsername" errormessage="Benutzername bereits vergeben" OnServerValidate="CheckID" />
|
||||
<asp:RegularExpressionValidator ID="CV3" runat="server" ErrorMessage="Benutzer E-Mail-Adresse ungültig" ForeColor="White" ControlToValidate="txtuseremail" ValidationExpression="^([\w\.\-]+)@([\w\-]+)((\.(\w){2,3})+)$">*</asp:RegularExpressionValidator>
|
||||
<asp:RegularExpressionValidator ID="RegexTel" runat="server" controlToValidate="txttelefon" ErrorMessage="Telefon-Nummer ist ungültig. Bitte im Format +41 44 813 12 12 eingeben." ValidationExpression="^(\+?)(\d{2,4})(\s?)(\-?)((\(0\))?)(\s?)(\d{2})(\s?)(\-?)(\d{3})(\s?)(\-?)(\d{2})(\s?)(\-?)(\d{2})" ForeColor="White"/>
|
||||
|
||||
<asp:Panel ID="MainPanel" runat="server">
|
||||
<table style="width:100%;" cellspacing="2">
|
||||
<tr>
|
||||
<td class="style3">
|
||||
<telerik:RadTextBox ID="txtNameZ1" Runat="server" Label="Firmenname Z1"
|
||||
LabelWidth="120px" TabIndex="1" Width="300px" >
|
||||
</telerik:RadTextBox>
|
||||
</td>
|
||||
<td colspan="2">
|
||||
<telerik:RadTextBox ID="txtTelefon" runat="server" TabIndex="6" Label="Telefon direkt / Natel"
|
||||
LabelWidth="120px" Width="250px"></telerik:RadTextBox>
|
||||
<telerik:RadTextBox ID="txtNatel" runat="server" Label=" / " LabelWidth="15px"
|
||||
TabIndex="6" Width="130px">
|
||||
</telerik:RadTextBox>
|
||||
</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td class="style3">
|
||||
<telerik:RadTextBox ID="txtNameZ2" runat="server" TabIndex="1"
|
||||
Label="Firmenname Z2" LabelWidth="120px" Width="300px"
|
||||
EmptyMessage=" " DisplayText=" "></telerik:RadTextBox>
|
||||
</td>
|
||||
<td colspan="2">
|
||||
<telerik:RadTextBox ID="txtTelefax" runat="server" TabIndex="7" Label="Telefax"
|
||||
Width="300px"></telerik:RadTextBox>
|
||||
</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td >
|
||||
<asp:Label ID="Label3" runat="server" CssClass="riLabel1" Text="Anrede"
|
||||
Width="115px"></asp:Label>
|
||||
<telerik:RadComboBox ID="txtAnredea" Runat="server" TabIndex="2" Width="175px">
|
||||
<Items>
|
||||
<telerik:RadComboBoxItem Value="Herr" Text="Herr" />
|
||||
<telerik:RadComboBoxItem Value="Frau" Text="Frau" />
|
||||
<telerik:RadComboBoxItem Value="Damen und Herren" Text="Damen und Herren" />
|
||||
|
||||
</Items>
|
||||
</telerik:RadComboBox>
|
||||
<td colspan="2">
|
||||
<telerik:RadTextBox ID="txtInternet" runat="server" TabIndex="8"
|
||||
Label="Internet" Width="300px"></telerik:RadTextBox>
|
||||
</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td class="style3">
|
||||
<telerik:RadTextBox ID="txtname" runat="server" TabIndex="2" Label="Name"
|
||||
Width="300px" ></telerik:RadTextBox>
|
||||
</td>
|
||||
<td colspan="2">
|
||||
<telerik:RadTextBox ID="txtEmail" runat="server" TabIndex="9" Label="E-Mail"
|
||||
LabelWidth="120px" Width="300px" EmptyMessage="Gültige E-Mail-Adresse " ></telerik:RadTextBox>
|
||||
</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td class="style3">
|
||||
<telerik:RadTextBox ID="txtVorname" runat="server" TabIndex="2" Label="Vorname"
|
||||
Width="300px" ></telerik:RadTextBox>
|
||||
</td>
|
||||
<td colspan="2" rowspan="2">
|
||||
<asp:Label ID="Label4" runat="server" CssClass="riLabel1" Text="Folgendes muss der Sch&#252;ler mitbringen (spezielle Kleidung, Ausweis usw.)"
|
||||
></asp:Label>
|
||||
<br />
|
||||
<telerik:RadTextBox ID="txtAusbildungBemerkung" runat="server" Width="400px" TabIndex="13"
|
||||
Height="45px" TextMode="MultiLine" ></telerik:RadTextBox>
|
||||
</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td class="style3">
|
||||
<telerik:RadTextBox ID="txtStrasse" runat="server" TabIndex="3" Label="Strasse"
|
||||
LabelWidth="120px" Width="300px"></telerik:RadTextBox>
|
||||
</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td class="style3">
|
||||
<telerik:RadTextBox ID="txtPLZ" runat="server" Width="180px" TabIndex="4"
|
||||
Label="PLZ / Ort" LabelWidth="120px"></telerik:RadTextBox>
|
||||
<telerik:RadTextBox ID="txtOrt" runat="server" TabIndex="5" Width="120px"></telerik:RadTextBox>
|
||||
</td>
|
||||
<td colspan="2">
|
||||
<asp:Label ID="Label7" runat="server" CssClass="riLabel1"
|
||||
Text="(Bemerkung gilt für alle angebotenen Berufe)"></asp:Label>
|
||||
</td>
|
||||
</tr>
|
||||
|
||||
<tr>
|
||||
<td class="style3" valign="top" height="60">
|
||||
<asp:Label ID="Label6" runat="server" CssClass="riLabel1" Text="Ihre Bemerkung f&#252;r Organisatoren des BWP"
|
||||
></asp:Label>
|
||||
<br />
|
||||
<telerik:RadTextBox ID="txtBemerkung" runat="server" Height="45px"
|
||||
LabelWidth="120" TabIndex="11" TextMode="MultiLine" Width="400px">
|
||||
<PasswordStrengthSettings IndicatorWidth="30%" />
|
||||
</telerik:RadTextBox>
|
||||
</td>
|
||||
<td colspan="2" valign="top" class="style1">
|
||||
<asp:Label ID="Label5" runat="server" CssClass="riLabel1" Text="Treffpunkt f&#252;r Sch&#252;ler, falls abweichend zur Gesch&#228;ftsadresse"
|
||||
></asp:Label>
|
||||
|
||||
<br />
|
||||
<telerik:RadTextBox ID="txtAusbildungsstandort" runat="server" Height="45px"
|
||||
TabIndex="12" TextMode="MultiLine" Width="400px">
|
||||
<PasswordStrengthSettings IndicatorWidth="30%" />
|
||||
</telerik:RadTextBox>
|
||||
</td>
|
||||
<tr>
|
||||
<td class="style3" valign="top">
|
||||
<asp:Label ID="Label1" runat="server" style="font-weight: 700"
|
||||
Text="Logindaten für die Registrierung"></asp:Label>
|
||||
</td>
|
||||
<td colspan="2" valign="top">
|
||||
<asp:Label ID="Label8" runat="server" CssClass="riLabel1"
|
||||
Text="(Bemerkung gilt für alle angebotenen Berufe)"></asp:Label>
|
||||
</td>
|
||||
<tr>
|
||||
<td class="style1">
|
||||
<telerik:RadTextBox ID="txtUsername" runat="server"
|
||||
EmptyMessage="[Benutzer-ID]" Label="Benutzername" TabIndex="12" Width="300px">
|
||||
</telerik:RadTextBox>
|
||||
</td>
|
||||
<td class="style1">
|
||||
</td>
|
||||
<td rowspan="4">
|
||||
<telerik:RadCaptcha ID="RadCaptcha1" Runat="server"
|
||||
CaptchaTextBoxLabel="Sicherheitscode aus dem Bild eingeben"
|
||||
ErrorMessage="Sicherheitscode fehlt oder ist ungültig" TabIndex="15">
|
||||
</telerik:RadCaptcha>
|
||||
</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td class="style2">
|
||||
<telerik:RadTextBox ID="txtUserEmail" runat="server"
|
||||
EmptyMessage="Gültige E-Mail-Adresse" Label="Benutzer E-Mail"
|
||||
LabelWidth="120px" TabIndex="12" Width="300px">
|
||||
</telerik:RadTextBox>
|
||||
</td>
|
||||
<td class="style2">
|
||||
<asp:Label ID="lblCaptcha" runat="server" Text="Sicherheitscode"></asp:Label>
|
||||
</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td class="style3">
|
||||
<telerik:RadTextBox ID="txtPasswort1" runat="server" Label="Passwort"
|
||||
LabelWidth="120px" TabIndex="13" TextMode="Password" Width="300px">
|
||||
</telerik:RadTextBox>
|
||||
<br />
|
||||
<asp:Label ID="Label2" runat="server"
|
||||
Text="(mind. 4 Stellen und mind. 1 Sonderzeichen)"></asp:Label>
|
||||
<br />
|
||||
</td>
|
||||
<td class="style1">
|
||||
</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td class="style3">
|
||||
<telerik:RadTextBox ID="txtPasswort2" runat="server" Label="Wiederholung"
|
||||
LabelWidth="120px" TabIndex="14" TextMode="Password" Width="300px">
|
||||
</telerik:RadTextBox>
|
||||
<br />
|
||||
<asp:CompareValidator ID="CompareValidator1" runat="server"
|
||||
ControlToCompare="txtPasswort1" ControlToValidate="txtpasswort2"
|
||||
ErrorMessage="Passworte nicht identisch" ForeColor="Red"></asp:CompareValidator>
|
||||
</td>
|
||||
<td class="style1">
|
||||
</td>
|
||||
</tr>
|
||||
</tr>
|
||||
</tr>
|
||||
</table>
|
||||
</asp:Panel>
|
||||
<telerik:RadButton ID="btnSave" runat="server" Text="Speichern / Weiter >"
|
||||
AutoPostBack="true" style="top: 0px; left: 0px" >
|
||||
</telerik:RadButton>
|
||||
<telerik:RadButton ID="btnRegister" runat="server" Text="Registrieren">
|
||||
</telerik:RadButton>
|
||||
|
||||
|
||||
474
LPWeb20/Firmen/SIK/Firmendaten.ascx.designer.vb
generated
Normal file
474
LPWeb20/Firmen/SIK/Firmendaten.ascx.designer.vb
generated
Normal file
@@ -0,0 +1,474 @@
|
||||
'------------------------------------------------------------------------------
|
||||
' <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 Firmendaten
|
||||
|
||||
'''<summary>
|
||||
'''RadAjaxManager1-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 RadAjaxManager1 As Global.Telerik.Web.UI.RadAjaxManager
|
||||
|
||||
'''<summary>
|
||||
'''RadAjaxLoadingPanel1-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 RadAjaxLoadingPanel1 As Global.Telerik.Web.UI.RadAjaxLoadingPanel
|
||||
|
||||
'''<summary>
|
||||
'''ValidationSummary1-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 ValidationSummary1 As Global.System.Web.UI.WebControls.ValidationSummary
|
||||
|
||||
'''<summary>
|
||||
'''RV11-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 RV11 As Global.System.Web.UI.WebControls.RequiredFieldValidator
|
||||
|
||||
'''<summary>
|
||||
'''RV2-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 RV2 As Global.System.Web.UI.WebControls.RequiredFieldValidator
|
||||
|
||||
'''<summary>
|
||||
'''RV3-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 RV3 As Global.System.Web.UI.WebControls.RequiredFieldValidator
|
||||
|
||||
'''<summary>
|
||||
'''RV4-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 RV4 As Global.System.Web.UI.WebControls.RequiredFieldValidator
|
||||
|
||||
'''<summary>
|
||||
'''RV5-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 RV5 As Global.System.Web.UI.WebControls.RequiredFieldValidator
|
||||
|
||||
'''<summary>
|
||||
'''RV6-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 RV6 As Global.System.Web.UI.WebControls.RequiredFieldValidator
|
||||
|
||||
'''<summary>
|
||||
'''RV7-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 RV7 As Global.System.Web.UI.WebControls.RequiredFieldValidator
|
||||
|
||||
'''<summary>
|
||||
'''RV9-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 RV9 As Global.System.Web.UI.WebControls.RequiredFieldValidator
|
||||
|
||||
'''<summary>
|
||||
'''Eegex1-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 Eegex1 As Global.System.Web.UI.WebControls.RegularExpressionValidator
|
||||
|
||||
'''<summary>
|
||||
'''Regex2-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 Regex2 As Global.System.Web.UI.WebControls.RegularExpressionValidator
|
||||
|
||||
'''<summary>
|
||||
'''Regex3-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 Regex3 As Global.System.Web.UI.WebControls.RegularExpressionValidator
|
||||
|
||||
'''<summary>
|
||||
'''CV1-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 CV1 As Global.System.Web.UI.WebControls.CustomValidator
|
||||
|
||||
'''<summary>
|
||||
'''CV3-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 CV3 As Global.System.Web.UI.WebControls.RegularExpressionValidator
|
||||
|
||||
'''<summary>
|
||||
'''RegexTel-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 RegexTel As Global.System.Web.UI.WebControls.RegularExpressionValidator
|
||||
|
||||
'''<summary>
|
||||
'''MainPanel-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 MainPanel As Global.System.Web.UI.WebControls.Panel
|
||||
|
||||
'''<summary>
|
||||
'''txtNameZ1-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 txtNameZ1 As Global.Telerik.Web.UI.RadTextBox
|
||||
|
||||
'''<summary>
|
||||
'''txtTelefon-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 txtTelefon As Global.Telerik.Web.UI.RadTextBox
|
||||
|
||||
'''<summary>
|
||||
'''txtNatel-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 txtNatel As Global.Telerik.Web.UI.RadTextBox
|
||||
|
||||
'''<summary>
|
||||
'''txtNameZ2-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 txtNameZ2 As Global.Telerik.Web.UI.RadTextBox
|
||||
|
||||
'''<summary>
|
||||
'''txtTelefax-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 txtTelefax As Global.Telerik.Web.UI.RadTextBox
|
||||
|
||||
'''<summary>
|
||||
'''Label3-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 Label3 As Global.System.Web.UI.WebControls.Label
|
||||
|
||||
'''<summary>
|
||||
'''txtAnredea-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 txtAnredea As Global.Telerik.Web.UI.RadComboBox
|
||||
|
||||
'''<summary>
|
||||
'''txtInternet-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 txtInternet As Global.Telerik.Web.UI.RadTextBox
|
||||
|
||||
'''<summary>
|
||||
'''txtname-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 txtname As Global.Telerik.Web.UI.RadTextBox
|
||||
|
||||
'''<summary>
|
||||
'''txtEmail-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 txtEmail As Global.Telerik.Web.UI.RadTextBox
|
||||
|
||||
'''<summary>
|
||||
'''txtVorname-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 txtVorname As Global.Telerik.Web.UI.RadTextBox
|
||||
|
||||
'''<summary>
|
||||
'''Label4-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 Label4 As Global.System.Web.UI.WebControls.Label
|
||||
|
||||
'''<summary>
|
||||
'''txtAusbildungBemerkung-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 txtAusbildungBemerkung As Global.Telerik.Web.UI.RadTextBox
|
||||
|
||||
'''<summary>
|
||||
'''txtStrasse-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 txtStrasse As Global.Telerik.Web.UI.RadTextBox
|
||||
|
||||
'''<summary>
|
||||
'''txtPLZ-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 txtPLZ As Global.Telerik.Web.UI.RadTextBox
|
||||
|
||||
'''<summary>
|
||||
'''txtOrt-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 txtOrt As Global.Telerik.Web.UI.RadTextBox
|
||||
|
||||
'''<summary>
|
||||
'''Label7-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 Label7 As Global.System.Web.UI.WebControls.Label
|
||||
|
||||
'''<summary>
|
||||
'''Label6-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 Label6 As Global.System.Web.UI.WebControls.Label
|
||||
|
||||
'''<summary>
|
||||
'''txtBemerkung-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 txtBemerkung As Global.Telerik.Web.UI.RadTextBox
|
||||
|
||||
'''<summary>
|
||||
'''Label5-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 Label5 As Global.System.Web.UI.WebControls.Label
|
||||
|
||||
'''<summary>
|
||||
'''txtAusbildungsstandort-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 txtAusbildungsstandort As Global.Telerik.Web.UI.RadTextBox
|
||||
|
||||
'''<summary>
|
||||
'''Label1-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 Label1 As Global.System.Web.UI.WebControls.Label
|
||||
|
||||
'''<summary>
|
||||
'''Label8-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 Label8 As Global.System.Web.UI.WebControls.Label
|
||||
|
||||
'''<summary>
|
||||
'''txtUsername-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 txtUsername As Global.Telerik.Web.UI.RadTextBox
|
||||
|
||||
'''<summary>
|
||||
'''RadCaptcha1-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 RadCaptcha1 As Global.Telerik.Web.UI.RadCaptcha
|
||||
|
||||
'''<summary>
|
||||
'''txtUserEmail-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 txtUserEmail As Global.Telerik.Web.UI.RadTextBox
|
||||
|
||||
'''<summary>
|
||||
'''lblCaptcha-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 lblCaptcha As Global.System.Web.UI.WebControls.Label
|
||||
|
||||
'''<summary>
|
||||
'''txtPasswort1-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 txtPasswort1 As Global.Telerik.Web.UI.RadTextBox
|
||||
|
||||
'''<summary>
|
||||
'''Label2-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 Label2 As Global.System.Web.UI.WebControls.Label
|
||||
|
||||
'''<summary>
|
||||
'''txtPasswort2-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 txtPasswort2 As Global.Telerik.Web.UI.RadTextBox
|
||||
|
||||
'''<summary>
|
||||
'''CompareValidator1-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 CompareValidator1 As Global.System.Web.UI.WebControls.CompareValidator
|
||||
|
||||
'''<summary>
|
||||
'''btnSave-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 btnSave As Global.Telerik.Web.UI.RadButton
|
||||
|
||||
'''<summary>
|
||||
'''btnRegister-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 btnRegister As Global.Telerik.Web.UI.RadButton
|
||||
End Class
|
||||
193
LPWeb20/Firmen/SIK/Firmendaten.ascx.vb
Normal file
193
LPWeb20/Firmen/SIK/Firmendaten.ascx.vb
Normal file
@@ -0,0 +1,193 @@
|
||||
Imports System.IO
|
||||
Imports System.IO.Compression
|
||||
Imports System.Web.Configuration
|
||||
Public Class Firmendaten
|
||||
Inherits System.Web.UI.UserControl
|
||||
Private rand As New System.Random
|
||||
|
||||
Dim Firmanr As Integer = 0
|
||||
|
||||
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
|
||||
If Not Page.IsPostBack Then
|
||||
Try
|
||||
|
||||
If Session.Item("RegisterAsCompany") = "True" Then
|
||||
Me.txtBemerkung.Visible = False
|
||||
Me.txtAusbildungBemerkung.Visible = False
|
||||
Me.txtAusbildungsstandort.Visible = False
|
||||
Me.txtPasswort1.Visible = True
|
||||
Me.txtPasswort2.Visible = True
|
||||
Me.txtUsername.Visible = True
|
||||
Me.btnRegister.Visible = True
|
||||
Me.btnSave.Visible = False
|
||||
Me.RadCaptcha1.Visible = True
|
||||
Me.RadCaptcha1.Visible = True
|
||||
Me.lblCaptcha.Visible = True
|
||||
Me.RadCaptcha1.Visible = True
|
||||
Me.txtUserEmail.Visible = True
|
||||
Me.RV6.Enabled = True
|
||||
Me.RV7.Enabled = True
|
||||
Me.RV9.Enabled = True
|
||||
Me.txtNameZ1.Focus()
|
||||
Me.Label1.Visible = True
|
||||
Me.Label2.Visible = True
|
||||
Me.Label4.Visible = False
|
||||
Me.Label5.Visible = False
|
||||
Me.Label6.Visible = False
|
||||
Me.Label7.Visible = False
|
||||
Me.Label8.Visible = False
|
||||
Me.txtNameZ1.SelectionOnFocus = Telerik.Web.UI.SelectionOnFocus.SelectAll
|
||||
Exit Sub
|
||||
Else
|
||||
If Session.Item("LogedIn") = "True" Then
|
||||
Firmanr = Session.Item("Firmanr")
|
||||
End If
|
||||
Me.txtNameZ1.Focus()
|
||||
Me.txtPasswort1.Visible = False
|
||||
Me.txtPasswort2.Visible = False
|
||||
Me.txtUsername.Visible = False
|
||||
Me.btnRegister.Visible = False
|
||||
Me.btnSave.Visible = True
|
||||
Me.RadCaptcha1.Visible = False
|
||||
Me.RadCaptcha1.Visible = False
|
||||
Me.lblCaptcha.Visible = False
|
||||
Me.RadCaptcha1.Visible = False
|
||||
Me.txtUserEmail.Visible = False
|
||||
Me.RV6.Enabled = False
|
||||
Me.RV7.Enabled = False
|
||||
Me.RV9.Enabled = False
|
||||
Me.Label1.Visible = False
|
||||
Me.Label2.Visible = False
|
||||
End If
|
||||
Dim fdaten As New DataTable
|
||||
Dim dh As New clsDatahandling
|
||||
fdaten = dh.Get_Firma(Firmanr)
|
||||
Dim dr As DataRow = fdaten.Rows(0)
|
||||
Me.txtNameZ1.Text = dr.Item("NameZ1").ToString
|
||||
Me.txtNameZ2.Text = dr.Item("NameZ2").ToString
|
||||
Me.txtAnredea.Text = dr.Item("Anrede").ToString
|
||||
Me.txtAnredea.SelectedValue = dr.Item("Anrede").ToString
|
||||
Me.txtname.Text = dr.Item("Name").ToString
|
||||
Me.txtVorname.Text = dr.Item("Vorname").ToString
|
||||
Me.txtStrasse.Text = dr.Item("Strasse").ToString
|
||||
Me.txtPLZ.Text = dr.Item("plz").ToString
|
||||
Me.txtOrt.Text = dr.Item("Ort").ToString
|
||||
Me.txtTelefon.Text = dr.Item("tel").ToString
|
||||
Me.txtNatel.Text = dr.Item("Natel").ToString
|
||||
Me.txtTelefax.Text = dr.Item("Fax").ToString
|
||||
Me.txtEmail.Text = dr.Item("email").ToString
|
||||
Me.txtInternet.Text = dr.Item("web").ToString
|
||||
Me.txtBemerkung.Text = dr.Item("Bemerkung").ToString
|
||||
Me.txtAusbildungBemerkung.Text = dr.Item("Ausbildungsbemerkung").ToString
|
||||
Me.txtAusbildungsstandort.Text = dr.Item("Ausbildungsstandort").ToString
|
||||
Catch
|
||||
End Try
|
||||
End If
|
||||
|
||||
End Sub
|
||||
|
||||
Protected Sub btnRegister_Click(sender As Object, e As EventArgs) Handles btnRegister.Click
|
||||
If Not Page.IsValid Then Exit Sub
|
||||
Dim dh As New clsDatahandling
|
||||
Dim dbkey As Integer = dh.Get_NewDBKey("Firma")
|
||||
If dh.Insert_Firma(dbkey) = True Then
|
||||
dh.UpdateTable("Firma", "NameZ1", Me.txtNameZ1.Text, True, "Firmanr", dbkey)
|
||||
dh.UpdateTable("Firma", "NameZ2", Me.txtNameZ2.Text, True, "Firmanr", dbkey)
|
||||
dh.UpdateTable("Firma", "Strasse", Me.txtStrasse.Text, True, "Firmanr", dbkey)
|
||||
dh.UpdateTable("Firma", "plz", Me.txtPLZ.Text, True, "Firmanr", dbkey)
|
||||
dh.UpdateTable("Firma", "ort", Me.txtOrt.Text, True, "Firmanr", dbkey)
|
||||
dh.UpdateTable("Firma", "tel", Me.txtTelefon.Text, True, "Firmanr", dbkey)
|
||||
dh.UpdateTable("Firma", "Natel", Me.txtNatel.Text, True, "Firmanr", dbkey)
|
||||
dh.UpdateTable("Firma", "fax", Me.txtTelefax.Text, True, "Firmanr", dbkey)
|
||||
dh.UpdateTable("Firma", "web", Me.txtInternet.Text, True, "Firmanr", dbkey)
|
||||
dh.UpdateTable("Firma", "email", Me.txtEmail.Text, True, "Firmanr", dbkey)
|
||||
' dh.UpdateTable("Firma", "anrede", Me.txtAnrede.Text, True, "Firmanr", dbkey)
|
||||
dh.UpdateTable("Firma", "anrede", Me.txtAnredea.Text, True, "Firmanr", dbkey)
|
||||
dh.UpdateTable("Firma", "name", Me.txtname.Text, True, "Firmanr", dbkey)
|
||||
dh.UpdateTable("Firma", "vorname", Me.txtVorname.Text, True, "Firmanr", dbkey)
|
||||
dh.UpdateTable("Firma", "mutiert_am", Now, True, "Firmanr", dbkey)
|
||||
dh.UpdateTable("Firma", "Bemerkung", "", True, "Firmanr", dbkey)
|
||||
dh.UpdateTable("Firma", "Ausbildungsstandort", "", True, "Firmanr", dbkey)
|
||||
dh.UpdateTable("Firma", "Ausbildungsbemerkung", "", True, "Firmanr", dbkey)
|
||||
End If
|
||||
|
||||
dh.Insert_Web_User(Me.txtUsername.Text, Me.txtPasswort1.Text, 2, dbkey, 0)
|
||||
Dim userkey As Integer = dh.Get_LastKey("Web_User", "Eintragnr") - 1
|
||||
|
||||
dh.Insert_Ansprechpartner(dbkey, Me.txtname.Text, Me.txtVorname.Text, Me.txtTelefon.Text, Me.txtEmail.Text, Me.txtAnredea.SelectedValue)
|
||||
|
||||
Dim KeyGen As RandomKeyGenerator
|
||||
Dim NumKeys As Integer
|
||||
Dim RandomKey As String
|
||||
NumKeys = 1
|
||||
|
||||
KeyGen = New RandomKeyGenerator
|
||||
KeyGen.KeyLetters = "abcdefghijklmnopqrstuvwxyz"
|
||||
KeyGen.KeyNumbers = "0123456789"
|
||||
KeyGen.KeyChars = 46
|
||||
RandomKey = KeyGen.Generate()
|
||||
dh.UpdateTable("Web_User", "VerifyString", RandomKey, True, "Eintragnr", userkey)
|
||||
dh.UpdateTable("Web_User", "EMail", Me.txtUserEmail.Text, True, "Eintragnr", userkey)
|
||||
Dim mds As New DataSet
|
||||
mds = dh.Get_Tabledata("Select * from Web_MailTexte where nreintrag=1", False, True)
|
||||
Dim inhalt As String = mds.Tables(0).Rows(0).Item("Inhalt")
|
||||
inhalt = inhalt.Replace("[Weblink]", WebConfigurationManager.AppSettings("WebSite"))
|
||||
inhalt = inhalt.Replace("[RegisterLink]", WebConfigurationManager.AppSettings("WebSite") + "/user/" + "RegisterBestaetigung.aspx?fnkt=Aktivierung&Code=" + RandomKey)
|
||||
|
||||
Dim mailer As New clsSendMail
|
||||
mailer.SendMailMessage("", Me.txtUserEmail.Text, "", "", mds.Tables(0).Rows(0).Item("Betreff").ToString, inhalt)
|
||||
Response.Redirect("~/user/registerbestaetigung.aspx?fnkt=Bestaetigung")
|
||||
|
||||
|
||||
End Sub
|
||||
|
||||
Protected Sub btnSave_Click(sender As Object, e As EventArgs) Handles btnSave.Click
|
||||
If Page.IsValid Then
|
||||
Dim dbkey As Integer = Session.Item("Firmanr")
|
||||
Dim dh As New clsDatahandling
|
||||
dh.UpdateTable("Firma", "NameZ1", Me.txtNameZ1.Text, True, "Firmanr", dbkey)
|
||||
dh.UpdateTable("Firma", "NameZ2", Me.txtNameZ2.Text, True, "Firmanr", dbkey)
|
||||
dh.UpdateTable("Firma", "Strasse", Me.txtStrasse.Text, True, "Firmanr", dbkey)
|
||||
dh.UpdateTable("Firma", "plz", Me.txtPLZ.Text, True, "Firmanr", dbkey)
|
||||
dh.UpdateTable("Firma", "ort", Me.txtOrt.Text, True, "Firmanr", dbkey)
|
||||
dh.UpdateTable("Firma", "tel", Me.txtTelefon.Text, True, "Firmanr", dbkey)
|
||||
dh.UpdateTable("Firma", "Natel", Me.txtNatel.Text, True, "Firmanr", dbkey)
|
||||
dh.UpdateTable("Firma", "fax", Me.txtTelefax.Text, True, "Firmanr", dbkey)
|
||||
dh.UpdateTable("Firma", "web", Me.txtInternet.Text, True, "Firmanr", dbkey)
|
||||
dh.UpdateTable("Firma", "email", Me.txtEmail.Text, True, "Firmanr", dbkey)
|
||||
'dh.UpdateTable("Firma", "anrede", Me.txtAnrede.Text, True, "Firmanr", dbkey)
|
||||
dh.UpdateTable("Firma", "anrede", Me.txtAnredea.Text, True, "Firmanr", dbkey)
|
||||
dh.UpdateTable("Firma", "name", Me.txtname.Text, True, "Firmanr", dbkey)
|
||||
dh.UpdateTable("Firma", "vorname", Me.txtVorname.Text, True, "Firmanr", dbkey)
|
||||
dh.UpdateTable("Firma", "mutiert_am", Now, True, "Firmanr", dbkey)
|
||||
dh.UpdateTable("Firma", "Bemerkung", Me.txtBemerkung.Text, True, "Firmanr", dbkey)
|
||||
dh.UpdateTable("Firma", "Ausbildungsstandort", Me.txtAusbildungsstandort.Text, True, "Firmanr", dbkey)
|
||||
dh.UpdateTable("Firma", "Ausbildungsbemerkung", Me.txtAusbildungBemerkung.Text, True, "Firmanr", dbkey)
|
||||
End If
|
||||
Response.Redirect("~/firmen/Firmendaten1.aspx?Tab=2")
|
||||
End Sub
|
||||
|
||||
Public Function Check_Userid(source As Object, args As ServerValidateEventArgs)
|
||||
Dim dh As New clsDatahandling
|
||||
Dim ds As New DataSet
|
||||
ds = dh.Get_Tabledata("Select * from web_user where Username='" + Me.txtUsername.Text + "'", False, True)
|
||||
If ds.Tables(0).Rows.Count > 0 Then
|
||||
args.IsValid = False
|
||||
Else
|
||||
args.IsValid = True
|
||||
End If
|
||||
End Function
|
||||
|
||||
Public Function Check_Captcha(source As Object, args As ServerValidateEventArgs)
|
||||
If Me.RadCaptcha1.IsValid = False Then
|
||||
args.IsValid = False
|
||||
Else
|
||||
args.IsValid = True
|
||||
End If
|
||||
End Function
|
||||
|
||||
|
||||
Protected Sub RadAjaxManager1_AjaxRequest(sender As Object, e As Telerik.Web.UI.AjaxRequestEventArgs) Handles RadAjaxManager1.AjaxRequest
|
||||
|
||||
End Sub
|
||||
End Class
|
||||
60
LPWeb20/Firmen/SIK/Firmendaten1.aspx
Normal file
60
LPWeb20/Firmen/SIK/Firmendaten1.aspx
Normal file
@@ -0,0 +1,60 @@
|
||||
<%@ Page Language="vb" AutoEventWireup="false" CodeBehind="Firmendaten1.aspx.vb" Inherits="LPWeb.Firmendaten1" %>
|
||||
|
||||
<%@ Register Src="~/Defaults/Header1.ascx" TagPrefix="shu" TagName="Header" %>
|
||||
<%@ Register Src="~/UserControls/Menu1.ascx" TagPrefix="shu" TagName="Menu" %>
|
||||
<%@ Register Src="~/Defaults/Footer.ascx" TagPrefix="shu" TagName="Footer" %>
|
||||
|
||||
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
|
||||
|
||||
<html xmlns="http://www.w3.org/1999/xhtml">
|
||||
<head id="Head1" runat="server">
|
||||
<title></title>
|
||||
<link href="~/Styles/Site.css" rel="stylesheet" type="text/css" /></head>
|
||||
<body>
|
||||
<form id="form1" runat="server">
|
||||
<telerik:RadScriptManager ID="RadScriptManager1" runat="server">
|
||||
<Scripts>
|
||||
<asp:ScriptReference Assembly="Telerik.Web.UI"
|
||||
Name="Telerik.Web.UI.Common.Core.js">
|
||||
</asp:ScriptReference>
|
||||
<asp:ScriptReference Assembly="Telerik.Web.UI"
|
||||
Name="Telerik.Web.UI.Common.jQuery.js">
|
||||
</asp:ScriptReference>
|
||||
<asp:ScriptReference Assembly="Telerik.Web.UI"
|
||||
Name="Telerik.Web.UI.Common.jQueryInclude.js">
|
||||
</asp:ScriptReference>
|
||||
</Scripts>
|
||||
</telerik:RadScriptManager>
|
||||
<div class="page">
|
||||
<shu:Header runat="Server" ID="Header1"></shu:Header>
|
||||
<shu:Menu runat="server" ID="Menu1" NavigationLanguage="VB"></shu:Menu>
|
||||
<div class="main">
|
||||
<h2>Firmendaten</h2>
|
||||
<telerik:RadTabStrip ID="RadTabStrip1" runat="server" SelectedIndex="0"
|
||||
MultiPageID="RadMultiPage1" >
|
||||
<Tabs>
|
||||
<telerik:RadTab runat="server" Text="Stammdaten" Selected="True">
|
||||
</telerik:RadTab>
|
||||
<telerik:RadTab runat="server" Text="Ansprechpartner">
|
||||
</telerik:RadTab>
|
||||
<telerik:RadTab runat="server" Text="Berufs-Angebot">
|
||||
</telerik:RadTab>
|
||||
</Tabs>
|
||||
</telerik:RadTabStrip>
|
||||
<telerik:RadMultiPage ID="RadMultiPage1" runat="server" SelectedIndex="0">
|
||||
<telerik:RadPageView ID="RadPageView1" runat="server">
|
||||
|
||||
</telerik:RadPageView>
|
||||
<telerik:RadPageView ID="RadPageView2" runat="server">
|
||||
</telerik:RadPageView>
|
||||
<telerik:RadPageView ID="RadPageView3" runat="server">
|
||||
</telerik:RadPageView>
|
||||
|
||||
</telerik:RadMultiPage>
|
||||
<br />
|
||||
</div>
|
||||
</div>
|
||||
<shu:Footer runat="Server" ID="Footer1"></SHU:Footer>
|
||||
</form>
|
||||
</body>
|
||||
</html>
|
||||
114
LPWeb20/Firmen/SIK/Firmendaten1.aspx.designer.vb
generated
Normal file
114
LPWeb20/Firmen/SIK/Firmendaten1.aspx.designer.vb
generated
Normal file
@@ -0,0 +1,114 @@
|
||||
'------------------------------------------------------------------------------
|
||||
' <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 Firmendaten1
|
||||
|
||||
'''<summary>
|
||||
'''Head1-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 Head1 As Global.System.Web.UI.HtmlControls.HtmlHead
|
||||
|
||||
'''<summary>
|
||||
'''form1-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 form1 As Global.System.Web.UI.HtmlControls.HtmlForm
|
||||
|
||||
'''<summary>
|
||||
'''RadScriptManager1-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 RadScriptManager1 As Global.Telerik.Web.UI.RadScriptManager
|
||||
|
||||
'''<summary>
|
||||
'''Header1-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 Header1 As Global.LPWeb.Header1
|
||||
|
||||
'''<summary>
|
||||
'''Menu1-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 Menu1 As Global.LPWeb.Menu1
|
||||
|
||||
'''<summary>
|
||||
'''RadTabStrip1-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 RadTabStrip1 As Global.Telerik.Web.UI.RadTabStrip
|
||||
|
||||
'''<summary>
|
||||
'''RadMultiPage1-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 RadMultiPage1 As Global.Telerik.Web.UI.RadMultiPage
|
||||
|
||||
'''<summary>
|
||||
'''RadPageView1-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 RadPageView1 As Global.Telerik.Web.UI.RadPageView
|
||||
|
||||
'''<summary>
|
||||
'''RadPageView2-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 RadPageView2 As Global.Telerik.Web.UI.RadPageView
|
||||
|
||||
'''<summary>
|
||||
'''RadPageView3-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 RadPageView3 As Global.Telerik.Web.UI.RadPageView
|
||||
|
||||
'''<summary>
|
||||
'''Footer1-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 Footer1 As Global.LPWeb.Footer
|
||||
End Class
|
||||
34
LPWeb20/Firmen/SIK/Firmendaten1.aspx.vb
Normal file
34
LPWeb20/Firmen/SIK/Firmendaten1.aspx.vb
Normal file
@@ -0,0 +1,34 @@
|
||||
Public Class Firmendaten1
|
||||
Inherits System.Web.UI.Page
|
||||
|
||||
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
|
||||
If Request.QueryString("Firmanr") <> "" Then Session.Item("Firmanr") = Request.QueryString("Firmanr")
|
||||
If Request.QueryString("RegisterAsCompany") = "True" Then
|
||||
Session.Item("RegisterAsCompany") = "True"
|
||||
Me.RadTabStrip1.Visible = False
|
||||
Me.RadPageView1.Controls.Add(Page.LoadControl("~/Firmen/Firmendaten.ascx"))
|
||||
Else
|
||||
Me.RadPageView1.Controls.Add(Page.LoadControl("~/Firmen/Firmendaten.ascx"))
|
||||
Me.RadPageView2.Controls.Add(Page.LoadControl("~/Firmen/Firmenansprechpartner.ascx"))
|
||||
Me.RadPageView3.Controls.Add(Page.LoadControl("~/Firmen/Firmenangebot.ascx"))
|
||||
End If
|
||||
If Request.QueryString("Tab") = Nothing Then
|
||||
' Me.RadTabStrip1.SelectedIndex = 0
|
||||
' Me.RadMultiPage1.SelectedIndex = 0
|
||||
End If
|
||||
If Request.QueryString("Tab") = 1 Then
|
||||
Me.RadTabStrip1.SelectedIndex = 0
|
||||
Me.RadMultiPage1.SelectedIndex = 0
|
||||
End If
|
||||
If Request.QueryString("Tab") = 2 Then
|
||||
Me.RadTabStrip1.SelectedIndex = 1
|
||||
Me.RadMultiPage1.SelectedIndex = 1
|
||||
End If
|
||||
If Request.QueryString("Tab") = 3 Then
|
||||
Me.RadTabStrip1.SelectedIndex = 2
|
||||
Me.RadMultiPage1.SelectedIndex = 2
|
||||
End If
|
||||
End Sub
|
||||
|
||||
|
||||
End Class
|
||||
71
LPWeb20/Firmen/SIK/Firmenreport.aspx
Normal file
71
LPWeb20/Firmen/SIK/Firmenreport.aspx
Normal file
@@ -0,0 +1,71 @@
|
||||
<%@ Page Language="vb" AutoEventWireup="false" CodeBehind="Firmenreport.aspx.vb" Inherits="LPWeb.Firmenreport" %>
|
||||
<%@ Register Src="~/Defaults/Header.ascx" TagPrefix="shu" TagName="Header" %>
|
||||
<%@ Register Src="~/UserControls/Menu1.ascx" TagPrefix="shu" TagName="Menu" %>
|
||||
<%@ Register Src="~/Defaults/Footer.ascx" TagPrefix="shu" TagName="Footer" %>
|
||||
<%@ Register assembly="FastReport.Web, Version=2013.2.2.0, Culture=neutral, PublicKeyToken=db7e5ce63278458c" namespace="FastReport.Web" tagprefix="cc1" %>
|
||||
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
|
||||
|
||||
<html xmlns="http://www.w3.org/1999/xhtml">
|
||||
<head id="Head1" runat="server">
|
||||
<title></title>
|
||||
<link href="~/Styles/Site.css" rel="stylesheet" type="text/css" />
|
||||
<style type="text/css">
|
||||
.style1
|
||||
{
|
||||
}
|
||||
</style>
|
||||
</head>
|
||||
<body>
|
||||
<form id="form1" runat="server">
|
||||
<telerik:RadScriptManager ID="ScriptManager1" runat="server"
|
||||
EnableTheming="True">
|
||||
<scripts>
|
||||
<asp:ScriptReference Assembly="Telerik.Web.UI"
|
||||
Name="Telerik.Web.UI.Common.Core.js">
|
||||
</asp:ScriptReference>
|
||||
<asp:ScriptReference Assembly="Telerik.Web.UI"
|
||||
Name="Telerik.Web.UI.Common.jQuery.js">
|
||||
</asp:ScriptReference>
|
||||
<asp:ScriptReference Assembly="Telerik.Web.UI"
|
||||
Name="Telerik.Web.UI.Common.jQueryInclude.js">
|
||||
</asp:ScriptReference>
|
||||
</scripts>
|
||||
</telerik:RadScriptManager>
|
||||
<telerik:RadAjaxManager ID="RadAjaxManager1" runat="server">
|
||||
</telerik:RadAjaxManager>
|
||||
|
||||
<div class="page">
|
||||
<shu:Header runat="Server" ID="Header1"></shu:Header>
|
||||
<shu:Menu runat="server" ID="Menu1" NavigationLanguage="VB"></shu:Menu>
|
||||
<div class="main">
|
||||
<h2>Auswertung</h2>
|
||||
<p>
|
||||
<table>
|
||||
<tr>
|
||||
<td valign="top" class="style1">
|
||||
<asp:Panel ID="Panel1" runat="server" Height="500px" Width="884px">
|
||||
<cc1:WebReport ID="WebReport1" runat="server" />
|
||||
|
||||
</asp:Panel>
|
||||
|
||||
</td>
|
||||
</tr>
|
||||
</table>
|
||||
<telerik:RadButton ID="RadButton1" runat="server" Text="Zurück">
|
||||
</telerik:RadButton>
|
||||
|
||||
</p>
|
||||
</div>
|
||||
</div>
|
||||
<shu:Footer runat="Server" ID="Footer1"></SHU:Footer>
|
||||
<asp:SqlDataSource ID="SqlDataSource1" runat="server"
|
||||
ConnectionString="<%$ ConnectionStrings:LPConnectionString %>"
|
||||
SelectCommand="SELECT [ID], [ParentID], [Bezeichnung] FROM [Web_Report] where aktiv=1">
|
||||
</asp:SqlDataSource>
|
||||
|
||||
</form>
|
||||
|
||||
|
||||
|
||||
</body>
|
||||
</html>
|
||||
114
LPWeb20/Firmen/SIK/Firmenreport.aspx.designer.vb
generated
Normal file
114
LPWeb20/Firmen/SIK/Firmenreport.aspx.designer.vb
generated
Normal file
@@ -0,0 +1,114 @@
|
||||
'------------------------------------------------------------------------------
|
||||
' <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 Firmenreport
|
||||
|
||||
'''<summary>
|
||||
'''Head1-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 Head1 As Global.System.Web.UI.HtmlControls.HtmlHead
|
||||
|
||||
'''<summary>
|
||||
'''form1-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 form1 As Global.System.Web.UI.HtmlControls.HtmlForm
|
||||
|
||||
'''<summary>
|
||||
'''ScriptManager1-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 ScriptManager1 As Global.Telerik.Web.UI.RadScriptManager
|
||||
|
||||
'''<summary>
|
||||
'''RadAjaxManager1-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 RadAjaxManager1 As Global.Telerik.Web.UI.RadAjaxManager
|
||||
|
||||
'''<summary>
|
||||
'''Header1-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 Header1 As Global.LPWeb.Header
|
||||
|
||||
'''<summary>
|
||||
'''Menu1-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 Menu1 As Global.LPWeb.Menu1
|
||||
|
||||
'''<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
|
||||
|
||||
'''<summary>
|
||||
'''WebReport1-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 WebReport1 As Global.FastReport.Web.WebReport
|
||||
|
||||
'''<summary>
|
||||
'''RadButton1-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 RadButton1 As Global.Telerik.Web.UI.RadButton
|
||||
|
||||
'''<summary>
|
||||
'''Footer1-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 Footer1 As Global.LPWeb.Footer
|
||||
|
||||
'''<summary>
|
||||
'''SqlDataSource1-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 SqlDataSource1 As Global.System.Web.UI.WebControls.SqlDataSource
|
||||
End Class
|
||||
108
LPWeb20/Firmen/SIK/Firmenreport.aspx.vb
Normal file
108
LPWeb20/Firmen/SIK/Firmenreport.aspx.vb
Normal file
@@ -0,0 +1,108 @@
|
||||
Imports System.Web.Configuration
|
||||
Public Class Firmenreport
|
||||
Inherits System.Web.UI.Page
|
||||
|
||||
Dim scounter As Integer = 0
|
||||
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
|
||||
If Not Page.IsPostBack Then
|
||||
Try
|
||||
Dim reportnr As String = WebConfigurationManager.AppSettings("ReportFirma")
|
||||
Dim dh As New clsDatahandling
|
||||
Dim ds As New DataSet
|
||||
ds = dh.Get_Tabledata("Select * from web_report where id=" + reportnr, False, True)
|
||||
show_report(ds.Tables(0).Rows(0).Item("SQL"), ds.Tables(0).Rows(0).Item("SQLType"), ds.Tables(0).Rows(0).Item("Reportdatei"), ds.Tables(0).Rows(0).Item("Dokumentnr").ToString)
|
||||
show_report(ds.Tables(0).Rows(0).Item("SQL"), ds.Tables(0).Rows(0).Item("SQLType"), ds.Tables(0).Rows(0).Item("Reportdatei"), ds.Tables(0).Rows(0).Item("Dokumentnr").ToString)
|
||||
Me.WebReport1.Visible = True
|
||||
Me.WebReport1.Zoom = 1
|
||||
Catch
|
||||
End Try
|
||||
'show_report("Berufsliste", "SP", "Berufsliste.frx")
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Sub Open_Report(ByVal reportnr As Integer)
|
||||
Dim url As String = Server.MapPath("/default.aspx")
|
||||
Response.Write("<SCRIPT LANGUAGE='JavaScript'>window.open('" + url + "', '_blank');</SCRIPT>")
|
||||
'HttpContext.Current.Response.Write("<SCRIPT LANGUAGE='JavaScript'>window.open('" + url + "', '_blank');</SCRIPT>")
|
||||
Exit Sub
|
||||
'Page.ClientScript.RegisterStartupScript(Me.RadTreeView1.GetType.GetType, "New Windows", "window.open('" + url + "','','')", True)
|
||||
Page.ClientScript.RegisterClientScriptBlock(Me.GetType, "New windows", "window.open('" + url + "','baba','')", True)
|
||||
End Sub
|
||||
|
||||
|
||||
|
||||
Sub show_report(ByVal sql As String, ByVal sqltype As String, ByVal filename As String, dokumentnr As String)
|
||||
Try
|
||||
If dokumentnr <> "" Then
|
||||
If dokumentnr <> "-1" Then sql = sql.Replace("%DOKNR%", dokumentnr)
|
||||
End If
|
||||
|
||||
|
||||
Dim ds1 As New DataSet
|
||||
Dim ds As New DataSet
|
||||
Dim dh As New clsDatahandling
|
||||
ds = dh.Get_Tabledata("Select * from firmendaten where firmanr=" + Session("firmanr").ToString, False, True)
|
||||
'If sqltype = "SP" Then
|
||||
' ds = dh.Get_Tabledata(sql, True, False)
|
||||
'Else
|
||||
' If sqltype = "SQL" Then
|
||||
' ds = dh.Get_Tabledata(sql, False, True)
|
||||
' Else
|
||||
' ds = dh.Get_Tabledata(sql, False, False)
|
||||
' End If
|
||||
'End If
|
||||
|
||||
Me.WebReport1.Prepare()
|
||||
Me.WebReport1.ReportFile = "~/Reporting/" + filename
|
||||
Me.WebReport1.DataBind()
|
||||
Dim x As FastReport.Report = WebReport1.Report
|
||||
x.RegisterData(ds)
|
||||
scounter = scounter + 1
|
||||
'If scounter > 1 Then
|
||||
' Dim exp As New FastReport.Export.Pdf.PDFExport
|
||||
' Me.WebReport1.Report.Export(exp, "E:\WebProjects\LPWeb\LPWeb\reporting\exported.pdf")
|
||||
'End If
|
||||
Catch ex As Exception
|
||||
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub WebReport1_PreRender(sender As Object, e As System.EventArgs) Handles WebReport1.PreRender
|
||||
Me.WebReport1.Prepare()
|
||||
End Sub
|
||||
|
||||
Private Sub WebReport1_StartReport(sender As Object, e As System.EventArgs) Handles WebReport1.StartReport
|
||||
Dim dh As New clsDatahandling
|
||||
Me.WebReport1.Report.SetParameterValue("Parcours", dh.Get_Option(2))
|
||||
Me.WebReport1.Report.SetParameterValue("Spruch", dh.Get_Option(3))
|
||||
Me.WebReport1.Report.SetParameterValue("URL", "..\bilder\reportlogo.jpg")
|
||||
End Sub
|
||||
|
||||
Protected Sub RadButton1_Click(sender As Object, e As EventArgs) Handles RadButton1.Click
|
||||
Dim exp As New FastReport.Export.Pdf.PDFExport
|
||||
|
||||
'If exp.ShowDialog Then
|
||||
|
||||
'End If
|
||||
|
||||
Response.Redirect("~/Firmen/Firmendaten1.aspx?Tab=3")
|
||||
End Sub
|
||||
|
||||
'Protected Sub RadButton2_Click(sender As Object, e As EventArgs) Handles RadButton2.Click
|
||||
' Me.WebReport1.Prepare()
|
||||
' Me.WebReport1.Prepare()
|
||||
' Dim exp As New FastReport.Export.Pdf.PDFExport
|
||||
' Dim fn As String = Server.MapPath("~/Reporting/") + System.IO.Path.GetRandomFileName + ".pdf"
|
||||
' Me.WebReport1.Report.Export(exp, fn)
|
||||
|
||||
' Dim downloadfile As New System.IO.FileInfo(fn)
|
||||
' HttpContext.Current.Response.Clear()
|
||||
' HttpContext.Current.Response.AddHeader("Content-Disposition", String.Format("attachment; filename={0}", downloadfile.Name))
|
||||
' HttpContext.Current.Response.AddHeader("Content-Length", downloadfile.Length.ToString())
|
||||
' HttpContext.Current.Response.ContentType = "application/octet-stream"
|
||||
' HttpContext.Current.Response.WriteFile(downloadfile.FullName)
|
||||
' HttpContext.Current.Response.End()
|
||||
|
||||
'End Sub
|
||||
End Class
|
||||
Reference in New Issue
Block a user