Dim objX As New XmlTextWriter(Response.OutputStream, Encoding.UTF8)
        objX.WriteStartDocument()
        objX.WriteStartElement("rss")
        objX.WriteAttributeString("version", "2.0  ", " xmlns:dc=""http://purl.org/dc/elements/1.1/""  xmlns:sy=""http://purl.org/rss/1.0/modules/syndication/""")
        objX.WriteStartElement("channel")
        objX.WriteElementString("title", "uberASP.Net NewsWire")
        objX.WriteElementString("link", "http://www.artistic.it/rss.aspx")
        objX.WriteElementString("description", "Mobili antichi")
        objX.WriteElementString("copyright", "(c) 2008, Art.")
        objX.WriteElementString("ttl", "5")