Die Rückgabewerte mehrerer Tasks bekommen

  • VB.NET
  • .NET (FX) 4.5–4.8

    Die Rückgabewerte mehrerer Tasks bekommen

    Huhu zusammen, ich stehe vor einer Aufgabe die ich bisher immer mit Events und ggf. ner Parent Klasse gelöst habe.

    Wie würdet ihr nun diese Aufgabe mit Tasks lösen?
    Wir haben zum Beispiel einen Webservice der gleichzeitig von mehreren (virtuellen) Clients angesprochen werden soll, jede Response enthält Daten (zur Vereinfachung als Typ String.. Im Live Betrieb sind das natürlich komplexere Daten).

    Statt jetzt sowas hier zu machen und somit alle Clients hintereinander abzuarbeiten:

    VB.NET-Quellcode

    1. Dim Anworten As New List(Of String)
    2. Try
    3. For Each c As Client In Clients
    4. Antworten.Add(Await Task.Run(Function() c.HoleDieAntwort()))
    5. Next
    6. Catch ex As Exception
    7. ' whatever..
    8. End Try


    würde ich gerne so (oder ähnlich) vorgehen, dass diese Requests gleichzeitig stattfinden, ich aber irgendwie gesammelt an einer Stelle nach die Antworten bekomme:

    VB.NET-Quellcode

    1. Dim Antworten = Task.ArbeiteAlleAb(Whatever)


    Kann jemand ggf. seine Ideen mit einbringen, würde mich freuen ;)!
    Ich wüsste halt wie ichs anders löse, aber schadet ja nicht nach vorne oder auch mal zur Seite zu schauen.

    EDIT:
    Ich denke hiermit komm ich meiner gewünschten Lösung schonmal näher:
    Alpha-Lösung

    VB.NET-Quellcode

    1. Imports System.Collections.Concurrent
    3. Public Class Form1
    5. Private Jobs As New List(Of Job)
    7. Private Async Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
    8. Jobs.Clear()
    9. For i As Integer = 1 To 10
    10. Jobs.Add(New Job(i))
    11. Next
    12. Dim results As New ConcurrentBag(Of String)
    13. Await Task.Run(Sub()
    14. Parallel.ForEach(Jobs, Sub(job)
    15. results.Add(job.Run())
    16. Console.WriteLine("Finished Job: " & job.ID.ToString())
    17. End Sub)
    18. End Sub)
    19. MessageBox.Show("finished")
    20. End Sub
    22. End Class
    24. Public Class Job
    26. Public Property ID As Integer
    27. Public Property Result As String
    28. Public ReadOnly Property Finished As Boolean
    29. Get
    30. Return Result <> ""
    31. End Get
    32. End Property
    34. Sub New(ID As Integer)
    35. Me.ID = ID
    36. End Sub
    38. Public Function Run() As String
    39. Using wc As New System.Net.WebClient()
    40. ' schickt die jobid an ein php skript
    41. ' das skript gibt die jobid via echo aus nachdem es eine zufällig zeit zwischen 1 und 10 sekunden gewartet hat
    42. Result = wc.DownloadString("http://meineseite.de/test.php?jobid=" & ID.ToString())
    43. End Using
    44. Return Result
    45. End Function
    47. End Class


    Hier noch das PHP Testskript:
    Spoiler anzeigen

    PHP-Quellcode

    1. <?php
    3. $jobID = $_GET['jobid'];
    5. $nr = rand(1, 10);
    6. sleep($nr);
    7. echo $jobID;


    Polling is trolling!

    Achtung: Ich habe die komische Angewohnheit, simple Dinge zu verkomplizieren..

    Dieser Beitrag wurde bereits 3 mal editiert, zuletzt von „Rootbob91“ ()

Facebook
Telefonspende