Multithreading A Function in VB.Net

Posted by Ben on Stack Overflow See other posts from Stack Overflow or by Ben
Published on 2010-12-22T18:00:05Z Indexed on 2010/12/22 20:54 UTC
Read the original article Hit count: 235

Filed under:
|
|
|
|

I am trying to multi thread my application so as it is visible while it is executing the process, this is what I have so far:

Private Sub SendPOST(ByVal URL As String)
    Try
        Dim DataBytes As Byte() = Encoding.ASCII.GetBytes("")
        Dim Request As HttpWebRequest = TryCast(WebRequest.Create(URL.Trim & "/webdav/"), HttpWebRequest)
        Request.Method = "POST"
        Request.ContentType = "application/x-www-form-urlencoded"
        Request.ContentLength = DataBytes.Length
        Request.Timeout = 1000
        Request.ReadWriteTimeout = 1000

        Dim PostData As Stream = Request.GetRequestStream()
        PostData.Write(DataBytes, 0, DataBytes.Length)

        Dim Response As WebResponse = Request.GetResponse()
        Dim ResponseStream As Stream = Response.GetResponseStream()
        Dim StreamReader As New IO.StreamReader(ResponseStream)
        Dim Text As String = StreamReader.ReadToEnd()
        PostData.Close()
    Catch ex As Exception
        If ex.ToString.Contains("401") Then
            TextBox2.Text = TextBox2.Text & URL & "/webdav/" & vbNewLine
        End If
    End Try
End Sub

Public Sub G0()
    Dim siteSplit() As String = TextBox1.Text.Split(vbNewLine)

    For i = 0 To siteSplit.Count - 1
        Try
            If siteSplit(i).Contains("http://") Then
                SendPOST(siteSplit(i).Trim)
            Else
                SendPOST("http://" & siteSplit(i).Trim)
            End If
        Catch ex As Exception
        End Try
    Next
End Sub

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
    Dim t As Thread
    t = New Thread(AddressOf Me.G0)
    t.Start()
End Sub

However, the 'G0' sub code is not being executed at all, and I need to multi thread the 'SendPOST' as that is what slows the application.

© Stack Overflow or respective owner

Related posts about vb.net

Related posts about multithreading