edv/VERAG_Homepage
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

GUI Anpassungen und Salt generierung bei Create User

Browse Source
This commit is contained in:
ja
2021-12-09 09:50:27 +01:00
parent a95c71e743
commit 7e9e518b98
3 changed files with 20 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
Customers/LKWs.aspx
View File

@@ -78,7 +78,7 @@
<div class="col-9">
<div class="col-12">
<asp:Image runat="server" ClientIDMode="AutoID" ID="Img_Text1" ImageUrl="~/images/truck.png" style="width:106px;height:66px" />
<asp:Label runat="server" Font-Size="20px" Font-Bold="true">Spedition Coopersped 10</asp:Label>
<asp:Label runat="server" Font-Size="20px" Font-Bold="true">Bitte Spedition wählen</asp:Label>
</div>
<div class="col-12">
<asp:Label ID="lbl_natLKW" runat="server" Font-Size="1em" style="color:#043381">Nationalität:</asp:Label><asp:Label runat="server">Placeholder</asp:Label>
@@ -87,8 +87,8 @@
<asp:Label ID="lbl_SDL" runat="server" Font-Size="1.331em" style="color:#043381;font-weight:500">SDL-Leistungen:</asp:Label>
</div>
<div class="col-12"style="height:10px;"></div>
<div id="conovertab" class="col-12" style="background-color:#fff;overflow-x:auto">
<asp:Table ID="tbl_mainpage" runat="server" Width="100%" CssClass="table table-striped">
<div id="conovertab" class="col-12" style="margin-left:-10px;background-color:#fff;overflow-x:auto">
<asp:Table ID="tbl_mainpage" runat="server" Width="100%" CssClass="table table-striped col-12">
<asp:TableHeaderRow style="background-color:#043381;color:#fff"><asp:TableHeaderCell>SDL-Nr</asp:TableHeaderCell><asp:TableHeaderCell>Bezeichnung</asp:TableHeaderCell><asp:TableHeaderCell>Gültig Bis</asp:TableHeaderCell><asp:TableHeaderCell>Karten-Nummer</asp:TableHeaderCell></asp:TableHeaderRow>
</asp:Table>
</div>

8
login/CreateUser.aspx
View File

@@ -270,6 +270,14 @@
<asp:TextBox ID="txt_AVISO" CssClass="bg-AVISO-icon" Placeholder="Aviso-ID" runat="server" AutoCompleteType="Search" style="border-radius: 8px 8px 8px 8px;-webkit-border-radius: 8px;-moz-border-radius: 8px;"></asp:TextBox>
</td>
</tr>
<tr>
<td colspan="6">
<asp:TextBox ID="txt_PW" CssClass="bg-key-icon" Placeholder="Password" runat="server" style="border-radius: 8px 8px 8px 8px;-webkit-border-radius: 8px;-moz-border-radius: 8px;"></asp:TextBox>
</td>
<td colspan="6">
<asp:TextBox ID="txt_PW_WH" CssClass="bg-key-icon" Placeholder="Password repeat" runat="server" style="border-radius: 8px 8px 8px 8px; -webkit-border-radius: 8px; -moz-border-radius:8px"></asp:TextBox>
</td>
</tr>
<tr>
<td colspan="12">
<asp:Label ID="lbl_Company" runat="server" cssclass="txt_design2" Text="Company"></asp:Label>

11
login/CreateUser.aspx.vb
View File

@@ -1,7 +1,8 @@

Partial Class login_CreateUser
Inherits System.Web.UI.Page
Dim salt As Byte()
Dim initrandzahl As Integer
Protected Sub Page_Load(sender As Object, e As EventArgs)
If User.Identity.IsAuthenticated = False Then
FormsAuthentication.RedirectToLoginPage()
@@ -14,6 +15,9 @@ Partial Class login_CreateUser
VERAG_VARIABLES.initerrorcount()
End If
salt = VERAG_VARIABLES.GenerateSalt(VERAG_VARIABLES.RandomInteger(VERAG_VARIABLES.RandomInteger(0, Math.Pow(2, 6)), VERAG_VARIABLES.RandomInteger(Math.Pow(2, 7), Math.Pow(2, 10))))
initrandzahl = VERAG_VARIABLES.getiterationnumber
End Sub
Protected Sub LinkButton1_Click(sender As Object, e As EventArgs)
@@ -36,7 +40,7 @@ Partial Class login_CreateUser
End If
End Sub
Protected Sub btn_Save_Changes_Click(sender As Object, e As EventArgs)
Protected Async Sub btn_Save_Changes_Click(sender As Object, e As EventArgs)
Dim validFileTypes As String() = {"bmp", "gif", "png", "jpg", "jpeg"}
Dim ext As String = System.IO.Path.GetExtension(FileUpload_Desktop.PostedFile.FileName)
Dim isValidFile As Boolean = False
@@ -57,6 +61,9 @@ Partial Class login_CreateUser
lbl_message_desktop.ForeColor = System.Drawing.Color.Green
lbl_message_desktop.Text = "File uploaded successfully."
End If
If String.IsNullOrEmpty(txt_PW.Text) = False AndAlso String.IsNullOrEmpty(txt_PW_WH.Text) = False Then
Dim hashpw As Byte() = Await VERAG_VARIABLES.HashPassword(txt_PW_WH.Text, salt, initrandzahl, VERAG_VARIABLES.RandomInteger(0, Math.Pow(2, 7)))
End If
End Sub