Error fixing einloggen

This commit is contained in:
ja
2022-02-02 13:37:44 +01:00
parent 247d79419b
commit f67a55b0b7
2 changed files with 3323 additions and 3311 deletions

View File

@@ -23,10 +23,10 @@ Partial Class login_FLEX
Dim teststr = String.Empty Dim teststr = String.Empty
If HttpContext.Current.Request.ServerVariables("SERVER_NAME") = "localhost" Then If HttpContext.Current.Request.ServerVariables("SERVER_NAME") = "localhost" Then
intzahliterats = VERAG_VARIABLES.RandomInteger(Math.Pow(2, 4), Math.Pow(2, 5)) intzahliterats = VERAG_VARIABLES.RandomInteger(Math.Pow(2, 4), VERAG_VARIABLES.GetCpuSpeed())
teststr = Await TestPerformance.TestHashrateServerAsync(8) teststr = Await TestPerformance.TestHashrateServerAsync(8)
Else Else
intzahliterats = VERAG_VARIABLES.RandomInteger(Math.Pow(2, 4), Math.Pow(2, 7)) intzahliterats = VERAG_VARIABLES.RandomInteger(Math.Pow(2, 4), VERAG_VARIABLES.GetCpuSpeed())
teststr = Await TestPerformance.TestHashrateServerAsync(VERAG_VARIABLES.RandomInteger(98, 127)) teststr = Await TestPerformance.TestHashrateServerAsync(VERAG_VARIABLES.RandomInteger(98, 127))
End If End If
If String.Equals(teststr, String.Empty) = False Then If String.Equals(teststr, String.Empty) = False Then