> ' Convert an XML string, which is a VFP CursorToXml(), into a DataSet > ' expC1 String > Public Function ImportXML(ByVal tcXML As String) > Dim lcString As New StringReader(tcXML) > Dim loData As New DataSet > loData.ReadXml(lcString) > Return loData > End Function >>