Hola de nuevo, he conseguido una posible solución (aunque no me gusta demasiado):
Código:
'Parametros de entrada:
' StrXML: Cadena con el contenido XML
' Usuario: Usuario que realiza la peticion (para poder guardar varias peticiones
Public Function StrXml2Table(ByVal StrXML As String, ByVal Usuario As String) As DataTable
Dim ds As New DataSet("kk")
Dim TablaDatos As DataTable
Dim xd As XmlDocument
xd = New XmlDocument
xd.LoadXml(StrXML)
xd.Save(RUTA_XML_LOCAL + Usuario + ".xml")
ds.ReadXml(RUTA_XML_LOCAL + Usuario + ".xml")
TablaDatos = New DataTable
TablaDatos = ds.Tables(0)
ds.Dispose()
StrXml2Table = TablaDatos
End Sub
El problema que le veo es el tener que guardar el fichero XML en disco para seguidamente recuperarlo, con la consiguiente demora de acceso a disco tanto para escribirlo como para leerlo.
Seguro que tiene que haber algun metodo para evitar el tener que guardar el fichero para despues recuperarlo??????
Espero que a algun forero se le ocurra una mejor solucion.
Un saludo y mil gracias.