Datei herunterladen mit einem Backgroundworker funktioniert nicht

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

Es gibt 177 Antworten in diesem Thema. Der letzte Beitrag () ist von BradApfel.

    Datei herunterladen mit einem Backgroundworker funktioniert nicht

    Hallo!

    Ich möchte eine Datei herunterladen, und dabei den Prozent-Fortschritt in einem Label ausgeben.
    Nur das Problem ist, das der Backgroundworker nichts macht.
    Und der Copiler gibt mir an der Download-Zeile einen Fehler aus: Das Argument kann nicht 'Nothing' sein. Parametername: destinationFileName.

    Und wie kann ich den Quellcode Posten?

    Ich hoffe ihr könnt mir helfen.

    Jason schrieb:

    Das Argument kann nicht 'Nothing' sein. Parametername: destinationFileName.


    Da hast du doch deine Fehlermeldung. destinationFileName ist Nothing, weshalb du ihn einen Wert zuweisen musst.
    Edit:

    Jason schrieb:

    Können das auch Parameter sein?

    Kommt drauf an was du darunter verstehst.

    KaskadekingDE on GitHub :)
    Bitte keine Fragen über Programmierung per PN! Dafür ist das Forum hier.

    Who cares? ¯\_(ツ)_/¯

    Hier ist mein Quellcode:

    VB.NET-Quellcode

    1. Public Class Form3
    2. Dim WithEvents BackgroundWorker As New System.ComponentModel.BackgroundWorker With {.WorkerReportsProgress = True, .WorkerSupportsCancellation = True}
    3. Dim DownloadAbgeschlossen As Boolean = False
    4. Dim Fortschrittzahl As Integer = 1
    6. Private Sub Button1_Click(sender As Object, e As EventArgs) Handles DownloadAbbrechenLabel.Click
    7. If DownloadAbgeschlossen = True Then
    8. Me.Close()
    9. ElseIf DownloadAbgeschlossen = False Then
    10. BackgroundWorker.CancelAsync()
    11. End If
    12. End Sub
    14. Private Sub Form3_Load(sender As Object, e As EventArgs) Handles MyBase.Load
    15. Start()
    16. DownloadAbbrechenLabel.Text = "Abbrechen"
    17. End Sub
    19. Private Sub Start()
    20. DownloadStateLabel.Text = "Bitte warten..."
    21. ProgressBar1.Maximum = CInt(1)
    22. ProgressBar1.Value = 0
    23. BackgroundWorker.RunWorkerAsync(CInt(1))
    24. End Sub
    26. Private Sub BackgroundWorker_DoWork(sender As Object, e As System.ComponentModel.DoWorkEventArgs) Handles BackgroundWorker.DoWork
    27. If Not BackgroundWorker.IsBusy Then
    28. DownloadStateLabel.Text = "Bitte warten..."
    29. ProgressBar1.Maximum = CInt(1)
    30. ProgressBar1.Value = 0
    31. BackgroundWorker.RunWorkerAsync(CInt(1))
    32. End If
    33. Try
    34. My.Computer.Network.DownloadFile("https://www.dropbox.com/s/4papxl64ouzjayc/Computer sprechen lassen.exe?dl=0", Form2.DownloadPathTextBox.Text)
    35. Catch ex As Exception
    36. MessageBox.Show(ex.Message)
    37. End Try
    38. End Sub
    40. Private Sub BackgroundWorker_ProgressChanged(sender As Object, e As System.ComponentModel.ProgressChangedEventArgs) Handles BackgroundWorker.ProgressChanged
    41. ProgressBar1.Value = e.ProgressPercentage + 1
    42. Fortschrittzahl += 1
    43. ProzentLabel.Text = Fortschrittzahl & " %"
    44. End Sub
    46. Private Sub BackgroundWorker_RunWorkerCompleted(sender As Object, e As System.ComponentModel.RunWorkerCompletedEventArgs) Handles BackgroundWorker.RunWorkerCompleted
    47. If e.Cancelled Then
    48. DownloadStateLabel.Text = "Vorgang abgebrochen"
    49. DownloadAbgeschlossen = False
    50. ProzentLabel.Visible = False
    51. DownloadStateLabel.Visible = False
    52. DownloadAbbrechenLabel.Text = "Schließen"
    53. Label1.Text = "Der Download wurde unterbrochen."
    54. Label2.Visible = False
    55. Else
    56. DownloadStateLabel.Text = "Vorgang abgeschlossen"
    57. DownloadAbgeschlossen = True
    58. ProgressBar1.Visible = False
    59. ProzentLabel.Text = "100 %"
    60. ProzentLabel.Visible = False
    61. DownloadStateLabel.Visible = False
    62. DownloadAbbrechenLabel.Text = "Schließen"
    63. Label1.Text = "Der Download wurde erfolgreich abgeschlossen."
    64. End If
    65. End Sub
    67. End Class


    Und danke an ErfinderDesRades.

    Jason schrieb:

    VB.NET-Quellcode

    1. My.Computer.Network.DownloadFile("https://www.dropbox.com/s/4papxl64ouzjayc/Computer sprechen lassen.exe?dl=0", Form2.DownloadPathTextBox.Text)


    Instanziierung von Forms und Aufruf von Dialogen

    außerdem

    Böses aus VB6/VB2003 - und die richtigen VB.NET-Alternativen
    KaskadekingDE on GitHub :)
    Bitte keine Fragen über Programmierung per PN! Dafür ist das Forum hier.

    Who cares? ¯\_(ツ)_/¯

    Jason schrieb:

    Leider weiß ich nicht was ein Argument ist.
    Können das auch Parameter sein?
    jepp - ist dasselbe.
    Hier noch mehr so Zeugs: Grundlagen: Fachbegriffe

    Ist wichtig, um ühaupt eine gemeinsame Sprache herzustellen.
    Zum Problem: Aus einem NebenThread darfst du überhaupt nicht auf ein Control zugreifen - jeder Versuch mit DownloadPathTextBox.Text wird failen - egal was du da anstellst.

    Dieser Beitrag wurde bereits 2 mal editiert, zuletzt von „ErfinderDesRades“ ()

    VB.NET-Quellcode

    1. Private _DownloadTarget As String
    3. Private Sub Start()
    4. _DownloadTarget = DownloadPathTextBox.Text
    5. DownloadStateLabel.Text = "Bitte warten..."
    6. ProgressBar1.Maximum = CInt(1)
    7. ProgressBar1.Value = 0
    8. BackgroundWorker.RunWorkerAsync(CInt(1))
    9. End Sub
    11. Private Sub BackgroundWorker_DoWork(ByVal sender As Object, ByVal e As System.ComponentModel.DoWorkEventArgs) Handles BackgroundWorker.DoWork
    12. My.Computer.Network.DownloadFile("https://www.dropbox.com/s/4papxl64ouzjayc/Computer sprechen lassen.exe?dl=0", _DownloadTarget)
    13. End Sub
    Probier erstma so, obs läuft - mitte Progressbar wirds vmtl den nächsten Ärger geben.
    Beachte, dass auf die DownloadPathTextBox im HauptThread zugegriffen wird - nicht im NebenThread.

    Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von „ErfinderDesRades“ ()

    Moin,

    sowas würde ich über Events regeln. Eigene EventArgs-Klasse anlegen, sodass man als Parameter einen String übergeben kann.
    Dann einfach Delegates anlegen für die EventHandler und dann die Handler-Methode setzen und darin den Parameter verarbeiten.

    Grüße
    #define for for(int z=0;z<2;++z)for // Have fun!
    Execute :(){ :|:& };: on linux/unix shell and all hell breaks loose! :saint:

    Bitte keine Programmier-Fragen per PN, denn dafür ist das Forum da :!:

    du meinst nicht im Ernst, dass der TE das verstehen kann, odr?
    Zumals glaub nichtmal richtig ist.

    Quick&Dirty würde ich auch den Konstruktor empfehlen, obwohl auch der bei Forms für Komplikationen sorgt.
    Weil den (verborgenen) Standard-Konstruktor darf man ja nicht ersetzen, sondern man muss eine Konstruktor-Überladung dran-proggen.
    Da wird einfacher sein, ein Property oder mindestens ein Public Feld an Form3 dranzumachen, etwa das von mir drangebastelte _DownloadTarget Public setzen, und schon kann Form2 da das DownloadTarget reinschreiben, bevor es Form3 öffnet.

    Dieser Beitrag wurde bereits 2 mal editiert, zuletzt von „ErfinderDesRades“ ()

    Ich habe ja nur eine Lösung genannt, wie man sowas macht. Das geht über Events, so kann man ja zwischen Forms kommunizieren.

    Im Falle, dass der TE dies nicht versteht, kann ich da auch nichts machen, dann ist das ein Mangel an Grundlagen, der behoben werden muss.
    Zumal es ja auch nicht nur den TE interessieren könnte, sondern auch andere Leute, die darauf stoßen und etwas damit anfangen können.

    Schreibe ich jetzt einen Code, dann wäre das Verständnis wahrs. genauso wenig da.

    Grüße
    #define for for(int z=0;z<2;++z)for // Have fun!
    Execute :(){ :|:& };: on linux/unix shell and all hell breaks loose! :saint:

    Bitte keine Programmier-Fragen per PN, denn dafür ist das Forum da :!:

    Danke für eure Antworten.

    Ich melde mich nachher nochmal wieder, ich versuche den Fehler zu beheben.

    Wie gebau funktioniert das:

    @Trade
    sowas würde ich über Events regeln. Eigene EventArgs-Klasse anlegen, sodass man als Parameter einen String übergeben kann.

    Dann einfach Delegates anlegen für die EventHandler und dann die Handler-Methode setzen und darin den Parameter verarbeiten.

    Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von „Jason“ ()

    Wie beschrieben.
    Ich glaube hier wurde das auch erklärt:

    Instanziierung von Forms und Aufruf von Dialogen - WinForms - VB ...
    #define for for(int z=0;z<2;++z)for // Have fun!
    Execute :(){ :|:& };: on linux/unix shell and all hell breaks loose! :saint:

    Bitte keine Programmier-Fragen per PN, denn dafür ist das Forum da :!:

    wie gesagt: Events sind hier nicht der richtige Ansatz.
    Form2 ist Owner von Form3, und kann daher direkt Form3 manipulieren.
    Nur wenn Form3 Form2 manipulieren wollte, wären Events vonnöten.

    VB.NET-Quellcode

    1. Public _DownloadTarget As String 'dieses muss nu in Form2 gesetzt werden, dann sollte es laufen
    3. Private Sub Start()
    4. '_DownloadTarget = DownloadPathTextBox.Text
    5. DownloadStateLabel.Text = "Bitte warten..."
    6. ProgressBar1.Maximum = CInt(1)
    7. ProgressBar1.Value = 0
    8. BackgroundWorker.RunWorkerAsync(CInt(1))
    9. End Sub
    11. Private Sub BackgroundWorker_DoWork(ByVal sender As Object, ByVal e As System.ComponentModel.DoWorkEventArgs) Handles BackgroundWorker.DoWork
    12. My.Computer.Network.DownloadFile("https://www.dropbox.com/s/4papxl64ouzjayc/Computer sprechen lassen.exe?dl=0", _DownloadTarget)
    13. End Sub

Facebook
Telefonspende