Download großer Daten in String

  • VB.NET

    Download großer Daten in String

    Ich weiß, der 1000. Thread dazu ;)

    Ich will eine Seite runterladen, die laut FF 262.407 Byte groß ist. Und das ist für die Download-Funktionen, die ich bisher getestet habe, wohl zu viel.

    Diese hab ich schon getestet:

    [VB.NET] Download einer Datei in einen String
    -> Keine Fehlermeldung (trotz eingefügter msgbox nach Catch)


    sowie

    VB.NET-Quellcode

    1. Shared Function DownloadWebpage(ByVal URL As String) As String
    2. ' Lädt den Quelltext einer Seite aus dem Inter-/Intranet herunter
    3. ' und liefert ihn als String zurück. Bei Auftreten eines
    4. ' beliebigen Fehlers wird ein leerer String returniert.
    5. Dim IoStream As System.IO.Stream
    6. Dim StrRead As System.IO.StreamReader
    7. Try
    8. ' Einen WebRequest für den URL erzeugen
    9. Dim Request As System.Net.WebRequest _
    10. = System.Net.WebRequest.Create(URL)
    11. ' Die Antwort auf den Request in einen Stream legen
    12. IoStream = Request.GetResponse.GetResponseStream
    13. ' Einen StreamReader erzeugen, der den Stream ausliest
    14. StrRead = New System.IO.StreamReader(IoStream)
    15. ' Den Quellcode des URLs zurückgeben
    16. Return StrRead.ReadToEnd
    17. Catch ex As Exception ' bei beliebigem Fehler
    18. MsgBox("Error")
    19. Return vbNullString
    20. Finally
    21. ' StreamReader und Stream in jedem Fall wieder schließen
    22. StrRead.Close()
    23. IoStream.Close()
    24. End Try
    25. End Function

    Die ist glaub ich aus der Msdn, aber bei diser Funktion erscheint die error-msgbox. Beide Funktionen geben keinen Wert zurück.

    Die untere Funktion funktioniert bei einer kleineren Seite, deswegen schließe ich daraus, dass die Seite einfach zu groß ist.

    Wie bekomm ich jetzt die Seite in einen String? Ich bräuchte auch nicht unbedingt die ganze Seite, die ersten paar kb würden mir schon reichen.

    Dankeschön!

    edit: Es war doch ein anderer Fehler im Code

    kann geschlossen werden

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