Dim webrequest As HttpWebRequest = HttpWebRequest.Create( _
    "http://musicbrainz.org/ws/2/artist/?query=artist:Coldplay")
        Dim webResponse As WebResponse
        Dim webstream As Stream
        Dim reader As StreamReader
        Try
            webrequest.UserAgent = "MSIE 8.0"
            webResponse = webrequest.GetResponse
            webstream = webResponse.GetResponseStream
            webResponse.GetResponseStream()
            reader = New StreamReader(webstream)
            Dim xmldoc As New XmlDocument
            xmldoc.LoadXml(reader.ReadToEnd)
            xmldoc.Save(PfadundDateinamehierienfügen)
            MsgBox("Fertig")
            reader.Close()
            webstream.Close()
        Catch ex As Exception
            MsgBox(ex.Message)
        Finally
            reader.Close()
            webstream.Close()
        End Try