URL abrufen

[Bonsai]

Hallo.. habe eine Frage.. Ich möchte eine URL abrufen.. Mit dem MSDN Code klappt es auch .. Allerdings nur bei Seiten mit wenig Inhalt.. Also nur bei "kleinen" Seiten. Auch wenn ich nur www.google.de abrufen will, dauern es ungewöhnlich lange!! Jmd. ne Idee?? Hier der Code..

Imports System
Imports System.IO
Imports System.Net
Imports System.Text
Namespace Examples.System.Net
    Public Class WebRequestGetExample

        Public Shared Sub Main()
            ' Create a request for the URL.         
            Dim request As WebRequest = WebRequest.Create("http://www.contoso.com/default.html")
            ' If required by the server, set the credentials.
            request.Credentials = CredentialCache.DefaultCredentials
            ' Get the response.
            Dim response As HttpWebResponse = CType(request.GetResponse(), HttpWebResponse)
            ' Display the status.
            Console.WriteLine(response.StatusDescription)
            ' Get the stream containing content returned by the server.
            Dim dataStream As Stream = response.GetResponseStream()
            ' Open the stream using a StreamReader for easy access.
            Dim reader As New StreamReader(dataStream)
            ' Read the content.
            Dim responseFromServer As String = reader.ReadToEnd()
            ' Display the content.
            Console.WriteLine(responseFromServer)
            ' Cleanup the streams and the response.
            reader.Close()
            dataStream.Close()
            response.Close()
        End Sub 'Main
    End Class 'WebRequestGetExample
End Namespace

[Bacardi]

Also ich mache es immer so, funktioniert wunderbar?:

  Dim IOStream As System.IO.Stream
        Dim strread As System.IO.StreamReader
        Dim Quelltext1 As String
        Dim request As System.Net.HttpWebRequest = CType(System.Net.HttpWebRequest.Create(URL), System.Net.HttpWebRequest)

        IOStream = request.GetResponse.GetResponseStream
        strread = New System.IO.StreamReader(IOStream)
        Quelltext1 = strread.ReadToEnd

        strread.Close()
        IOStream.Close()