Found one:
Code:
        Dim theString As String
        Dim objXML As New System.Xml.XmlDocument()
        objXML.Load("http://server/path/default.asp")
        Response.Write(objXML.SelectSingleNode("/loginsystem/error").InnerText())