i toke the code from this link
http://support.microsoft.com/kb/316337[
^], but i made change in GetADORS to take only XML string come from another dataset then i'm creating dataset inside the method again
<pre lang="vb">Dim xwriter As New XmlTextWriter(FileName, System.Text.Encoding.Default)
Dim ds As New DataSet
Dim xmlSR As StringReader = New StringReader(dsXmlString)
ds.ReadXml(xmlSR)