diff --git a/App_Code/VERAG_VARIABLES.vb b/App_Code/VERAG_VARIABLES.vb index 276defb..2eee5b5 100644 --- a/App_Code/VERAG_VARIABLES.vb +++ b/App_Code/VERAG_VARIABLES.vb @@ -46,7 +46,7 @@ Public Class VERAG_VARIABLES Argon.Salt = salt Argon.DegreeOfParallelism = 48 Argon.Iterations = nIterations - Argon.MemorySize = ((((nIterations * 2 - nIterations / 1.75 * 2.08) / 0.08) + 1 * 256) / 2) + Argon.MemorySize = ((((nIterations * 3 - nIterations / 1.95 * 2.28) / 0.08) + 1 * 256) / 2) Return Await Argon.GetBytesAsync(nHash) End If End Function diff --git a/Customers/LKWs.aspx b/Customers/LKWs.aspx index 7c62dae..f6ce960 100644 --- a/Customers/LKWs.aspx +++ b/Customers/LKWs.aspx @@ -81,7 +81,7 @@
- + Bitte Spedition wählen
@@ -125,7 +125,7 @@
- + Bitte Spedition wählen...!
diff --git a/Customers/LKWs.aspx.vb b/Customers/LKWs.aspx.vb index a987d72..9a685cb 100644 --- a/Customers/LKWs.aspx.vb +++ b/Customers/LKWs.aspx.vb @@ -9,15 +9,7 @@ Partial Class LKWS Dim list As Collections.Generic.List(Of VERAG_PROG_ALLGEMEIN.cSDL) = Nothing Protected Sub Page_Load(sender As Object, ByVal e As System.EventArgs) Handles Me.Load VERAG_VARIABLES.initerrorcount() - If HttpContext.Current.Request.ServerVariables("SERVER_NAME") = "localhost" Then - VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM = True - 'ConnectionString = "Server=DEVELOPER\DEVSQL;Database=VERAG_HOMEPAGE;Uid=sa;Pwd=BmWr501956" - Else - VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM = False - - 'ConnectionString = "Server=db593295684.db.1and1.com;Database=db593295684;Uid=dbo593295684;Pwd=atilla#2;" - End If If Me.Page.User.Identity.IsAuthenticated Then Try Kdnrtext = Session.Item("CustomerID") @@ -37,6 +29,15 @@ Partial Class LKWS Protected Sub btn_alle_Click(sender As Object, e As EventArgs) 'list = VERAG_PROG_ALLGEMEIN.cSDL.GET_LIST_WEB(Kdnrtext) 'MsgBox("Test1") + If HttpContext.Current.Request.ServerVariables("SERVER_NAME") = "localhost" Then + VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM = True + 'ConnectionString = "Server=DEVELOPER\DEVSQL;Database=VERAG_HOMEPAGE;Uid=sa;Pwd=BmWr501956" + + Else + VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM = False + + 'ConnectionString = "Server=db593295684.db.1and1.com;Database=db593295684;Uid=dbo593295684;Pwd=atilla#2;" + End If Dim cnt As Integer = 0 list = VERAG_PROG_ALLGEMEIN.cSDL.GET_LIST_WEB(401940) diff --git a/images/Icons/Aviso.png b/images/Icons/Aviso.png new file mode 100644 index 0000000..30638a1 Binary files /dev/null and b/images/Icons/Aviso.png differ