DownloadFileCompleted funktioniert nicht mehr

  • VB.NET

Es gibt 18 Antworten in diesem Thema. Der letzte Beitrag () ist von Cell.

    DownloadFileCompleted funktioniert nicht mehr

    Hallo zusammen

    Ich habe mich hier im Forum schon ein klein wenig umgesehen und auch die Boardsuche verwendet aber irgendwie kann ich nichts finden, dass mir bei meinem Problem helfen kann.

    Folgendes Problem:

    Ich lade von meinem Server eine Datei mit dem WebClient herunter.
    Soweit so Gut
    Ich kann die Datei anschließend aber nicht öffnen, da ich dann eine IOException bekomme. (Die Datei wird von einem anderen Prozess verwendet)
    Da kommt eigentlich nur der Downloadprozess in Frage. Der aber durfte nicht mehr auf die Datei zugreifen, da ich meinen StreamReader in dem DownloadFileCompleted Event benutze

    ich hoffe ihr habt eine Idee

    mfg Cell

    klar hier mein code:



    VB.NET-Quellcode

    1. Imports System
    2. Imports System.IO
    3. Imports System.Net
    4. Imports System.Text
    6. Public Class Form1
    8. Public WithEvents wc As New WebClient
    9. Dim schritt As String = "Prüfung"
    10. Public clientversion As Integer
    14. Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
    15. wc.DownloadFileAsync(New Uri("http://www.meinserver.de/update.dat"), Application.StartupPath & "\update.dat")
    16. End Sub
    18. Private Sub wc_DownloadFileCompleted(ByVal sender As Object, ByVal e As System.ComponentModel.AsyncCompletedEventArgs) Handles wc.DownloadFileCompleted
    20. If schritt = "Prüfung" Then
    23. 'Serverversion auslesen Anfang
    24. Dim serverversion As Integer
    25. Dim sr As StreamReader = New StreamReader(Application.StartupPath & "\update.dat")
    26. serverversion = Convert.ToInt32(sr.ReadLine)
    27. sr.Close()
    28. 'Serverversion auslesen Ende
    31. 'Clientversion auslesen Anfang
    32. Try
    33. Dim sr2 As StreamReader = New StreamReader(Application.StartupPath & "\vers.dat")
    34. clientversion = Convert.ToInt32(sr2.ReadLine)
    35. sr.Close()
    36. Catch
    37. clientversion = 1
    38. End Try
    39. 'Clientversion auslesen Ende
    41. 'Prüfen ob Server neuer ist als Client Anfang
    43. If serverversion > clientversion Then
    44. schritt = "Listeladen"
    45. File.Delete(Application.StartupPath & "\update.dat")
    46. wc.DownloadFileAsync(New Uri("http://www.meinserver.de/serverliste.dat"), Application.StartupPath & "\serverliste.dat")
    47. Else
    48. File.Delete(Application.StartupPath & "\update.datl")
    49. Shell(Application.StartupPath & "\progie.exe")
    50. End If
    51. 'Prüfen ob Server neuer ist als Client Ende
    52. End If
    54. If schritt = "Listeladen" Then
    55. serverliste()
    56. End If
    58. End Sub
    60. Public Sub serverliste()
    61. Dim sline As String
    62. Dim sr As StreamReader = New StreamReader(Application.StartupPath & "\serverliste.dat")
    64. Do
    65. sline = sr.ReadLine
    66. lb_namen.Items.Add(sline)
    67. Loop Until sr.ReadToEnd
    68. End Sub
    70. Private Sub wc_DownloadProgressChanged(ByVal sender As Object, ByVal e As System.Net.DownloadProgressChangedEventArgs) Handles wc.DownloadProgressChanged
    71. ProgressBar1.Value = e.ProgressPercentage
    72. End Sub
    73. End Class




    wenn Ich das Programm Starte, arbeitet er es ab bis zur Sub serverliste und gibt mir dann die Exception

    die Frage war auch nicht wie ich einen Dateidownload noch durchführen kann, sondern die Frage ist noch immer... Warum ich auf die heruntergeladene Datei nicht zugreifen kann, wenn der Webclient schon das DownloadFileCompleted Event ausgelöst hast.

    Der Dateidownload ansich Funktioniert auch in meinem Beispiel

    Richtig

    Das ist ja das irrwitzige dabei. Beim ersten mal führt er den Schritt problemlos aus. Sprich die Serververion kann ich problemlos auslesen. Wenn ich allerdings die Serverliste übermitteln will gibts probleme. Dann kommt die Exception.

    Ich habe aber mit dem gleichen Code schon grössere Dateien heruntergeladen und hatte nie Probleme. Ich verstehe nicht warum das jetzt grade mit dem Projekt solche Spacken macht

    Nur zum besseren Verständniss. Der Fehler tritt in Zeile 62 auf

    Einfache Erklärung:

    Bei DownloadFileAsync wird die Datei heruntergeladen und der Code läuft nebenbei weiter.
    Bei DownloadFile läuft der Code erst dann weiter wenn die Datei vollständig heruntergeladen wurde.


    Es kann also dazu komme das der STreamreader instaziiert wird aber die Datei noch nicht vorhanden ist.

    Cell schrieb:

    Das ist ja alles gut und schön aber sollte nicht trotzdem das DownloadfileCompleted Event ausgelöst werden wenn die Datei Wirklich komplett heruntergeladen wurde.... Naja manchmal offensichtlich nicht... Wieder was gelernt


    Vorher gibt's aber die Exception dann kommt es nimmer dazu :P

    Du machst es einwenig umständlich.
    Du kannst das Event einfach weglassen und es direkt als String konvertieren.

    wc.DownloadFileAsync(New Uri("http://www.meinserver.de/update.dat"), Application.StartupPath & "\update.dat")
    Diese ganzen Schritte überspringen.

    Dim Clientversion As String = wc.DownloadString(New Uri("http://www.meinserver.de/update.dat"), Application.StartupPath & "\update.dat")

    Wie du weiter hantieren kannst, wirst du wahrscheinlich selber wissen.



    Das Event wird immer gefeuert. Lass mal den gesamten Clusterfuck im Event weg und mach nur MessageBox.Show("DownloadFileCompleted") draus.

    Richtig das ist mir schon klar aber es wird zu früh gefeuert. Nämlich schon dann, wenn die Datei noch gar nicht vollständig heruntergeladen wurde. Bzw bevor der zugriff auf die Datei möglich ist.

    Zitat von »Cell«


    Das ist ja alles gut und schön aber sollte nicht trotzdem das DownloadfileCompleted Event ausgelöst werden wenn die Datei Wirklich komplett heruntergeladen wurde.... Naja manchmal offensichtlich nicht... Wieder was gelernt

    Vorher gibt's aber die Exception dann kommt es nimmer dazu :P


    Das kann nicht sein. Wie Samus Aran schon richtig gesagt hat wird das Event in jedem Fall gefeuert. Solange ich in dem Event nicht auf die heruntergeladene Datei zugreifen muss, gibts auch keine Exception. Also kann sie auch nicht schon vorher auftreten.

    Das "Problem" dass ich hatte, ist das das Event ausgelöst hatte, bevor der Zugriff auf die Datei möglich war.





    Du machst es einwenig umständlich.
    Du kannst das Event einfach weglassen und es direkt als String konvertieren.

    wc.DownloadFileAsync(New Uri("http://www.meinserver.de/update.dat"), Application.StartupPath & "\update.dat")
    Diese ganzen Schritte überspringen.

    Dim Clientversion As String = wc.DownloadString(New Uri("http://www.meinserver.de/update.dat"), Application.StartupPath & "\update.dat")

    Wie du weiter hantieren kannst, wirst du wahrscheinlich selber wissen.

    Das ist natürlich richtig. So werde ich es in Zukunft auch machen. Wenn ich dergleichen wieder Programmieren muss.

Facebook