änderungen hash algorithmus

2021-12-17 14:16:08 +01:00
parent affd5898dd
commit b7b80b303d
4 changed files with 7 additions and 13 deletions
--- a/Customers/Default2.aspx.vb
+++ b/Customers/Default2.aspx.vb
@@ -35,7 +35,6 @@ Partial Class Customers_Default2
    End Sub

    Protected Sub btn_TesthashrateServer_ClickAsync(sender As Object, e As EventArgs) Handles btn_TesthashrateServer.Click
-        Dim zahl As Integer = VERAG_VARIABLES.RandomInteger(Math.Pow(2, 4), Math.Pow(2, 9))
-        Dim pwhashresult As Byte() = TestPerformance.TestHashrateServer(zahl)
+        Dim pwhashresult As Byte() = TestPerformance.TestHashrateServer(VERAG_VARIABLES.RandomInteger(Math.Pow(2, 4), Math.Pow(2, 8)))
    End Sub
 End Class