There sure use a better way to return the schema and the XML content of a dataset then the way I am doing it now. By default, if you do something like this:

lcXml=toDataSet.GetXmlSchema()+toDataSet.GetXml()

lcXml becomes unreadable by the browser because there should only be one root element. In order to make lcXml readable, I have to do some funny parsing:

            lcXml = toDataSet.GetXml()
            lcXmlSchema = toDataSet.GetXmlSchema()
            lcDataSetName = Mid(lcXml, 1, lcXml.IndexOf(">") + 1)
            lcEncoding = Mid(lcXmlSchema, 1, lcXmlSchema.IndexOf(">") + 1)
            lcXmlResult = lcEncoding + lcDataSetName + Mid(lcXmlSchema, lcXmlSchema.IndexOf(">") + 2) + _
             Mid(lcXml, lcXml.IndexOf(">") + 2)
            Return lcXmlResult

There sure is a better way to do that. Comments?