dataset a xml

Hola Mikes,

si pudieras pasar la porción de código que utilizas, podríamos mirar porqué
está ocurriendo eso. No puedo repetir lo que te está ocurriendo ahora mismo,
pero de todas las maneras, prueba con algo similar a:
System.Xml.XmlTextWrite("C:\a.xml",Encoding.UTF8)

Un saludo,

Jorge Serrano
MVP VB.NET


"Mikes" wrote:

Hola a todos, quiero enviar la información de un dataset a XML y utilizo la
siguiente instrucción: dsfam.WriteXml(nom_file, XmlWriteMode.IgnoreSchema),
si me envie los registros del dataset pero en la primer línea me aparece
<?xml version="1.0" standalone="yes"?> y yo quiero que me aparezca de la
siguiente forma : <?xml version="1.0" encoding="utf-8"?> alguien me puede
decir como lo puedo hacer, gracias.

Jorge aqui esta el código que utilizo,
dim nom_file as String

nom_file = "C:\archivo.xml"
dsItem.Clear()
DAItems.Fill(dsItem, "F4101")
'Leo cada registro de los productos
For Each r In dsItem.Tables("F4101").Rows
'Agrego registro a la tabla de Update Reference
nvo = ProductUpdatesRecord.NewRow
nvo("DeviceCode") = Dev_code
nvo("SubscriberCodes") = Site_code
nvo("IsSubscribed") = 1
nvo("Code") = "MxMi_" & Trim(r("IMLITM"))
nvo("Caption") = nvo("Code") & "_" & Trim(r("IMDSC1"))
nvo("CategoryCode") = 2
nvo("FamilyCode") = "MxMi_" & Trim(r("IMSRP2"))
nvo("ComputationAreaCode") = "FILLING"
nvo("ExpiryPeriod") = IIf(r("IMSLD") <= 0, 10, r("IMSLD"))
nvo("RecyclingPeriod") = 365
tiempo = fecha_Brit(r("IMUPMJ"))
f_cap = r("IMTDAY")
tiempo = tiempo.AddHours(f_cap.Substring(0, 2))
tiempo = tiempo.AddMinutes(f_cap.Substring(2, 2))
tiempo = tiempo.AddSeconds(f_cap.Substring(3))
f_cap = " "
f_cap = f_cap.Concat(tiempo.ToString("s"), ".",
tiempo.Millisecond, tiempo.Now.ToString("zzz"))
nvo("LastUpdateDate") = f_cap
ProductUpdatesRecord.Rows.Add(nvo)
'Actualizo el F4101 User Reference a 1 para ya no ser tomado en
cuenta
dsItem.Tables("F4101").Rows(con).Item("IMURAB") = 1
DAItems.Update(dsItem, "F4101")
Next
'Termino de leer los productos
dsProduct.WriteXml(nom_file, XmlWriteMode.IgnoreSchema)