VB.Net线程池允许的最大线程数

-1

这里的第一个问题，以及它关于vb.net的线程。我最近获得了一个程序的源代码，我希望对表单做出自己的更改和修改，但似乎无法更改允许的最大线程数。该程序允许的最大线程数为两个线程，它们转到Netflix并登录，从而恢复帐户的信息。它最多有两个线程，但它也是无代理的。我包含线程池所在代码的一部分，我很想知道在哪里编辑它，而我可以更改线程的最大数量。我试图寻找某些关键字，但没有找到任何有用的信息。VB.Net线程池允许的最大线程数

Private Sub ButtonX1_Click(sender As Object, e As EventArgs) Handles ButtonX1.Click 
    If (Me.usernames.Count > 0) Then 
     If (Me.ButtonX1.Text = "Start") Then 
      Me.NumericUpDown1.Enabled = False 
      Me.ProgressBarX1.Maximum = Me.usernames.Count 
      Me.ProgressBarX1.Value = 0 
      Me.thread_status = True 
      Me.available = 0 
      Dim workerThreads As Integer = Me.NumericUpDown1.Value 
      ThreadPool.SetMinThreads(workerThreads, workerThreads) 
      ThreadPool.SetMaxThreads(workerThreads, workerThreads) 
      ServicePointManager.DefaultConnectionLimit = workerThreads 
      ServicePointManager.Expect100Continue = False 
      Dim str As String 
      For Each str In Me.usernames 
       ThreadPool.QueueUserWorkItem(New WaitCallback(AddressOf Me.Lam__R141), str) 
      Next 
      Me.ButtonX1.Text = "Stop" 
      Me.Label3.Text = "Cracking Start" 
     Else 
      Me.NumericUpDown1.Enabled = True 
      Me.thread_status = False 
      Me.ButtonX1.Text = "Start" 
      Me.Label3.Text = "Cracking Stop" 
     End If 
    Else 
     Me.Label3.Text = "Load Combolist" 
    End If 
End Sub

来源

2017-07-21 Safa Mohammad

ThreadPool.SetMaxThreads（workerThreads，workerThreads）可能需要更改。 – N0Alias

你有什么建议吗？ –

您是否尝试更改'NumericUpDown1'的值？ –

看着它，我建议你从ThreadPool.SetMaxThreads(workerThreads, workerThreads)改变支架值，你可能还需要设置ServicePointManager.DefaultConnectionLimit = workerThreads等于更大的东西。

来源

2017-07-23 14:35:34 TeaOfAwesomeness

VB.Net线程池允许的最大线程数

回答

相关问题