registro de Dataseta xml

Estimado Eduardo:

Aqui un fragmento de un articulo de Gerardo Díaz que te puede ser útil
Temporalmente los datos pueden ser almacenados a disco por ejemplo
directamente a un archivo XML, bastará con utilizar el método WriteXml y
WriteXmlSchema del objeto DataSet:

wDataset.WriteXmlSchema "c:\dataet_estructura.xsd"
wDataset.WriteXml "c:\dataset_datos.xml"

Con esto se esta volcando toda la estructura básicamente en 2 pasos, primero
la estructura, es decir, definición de tablas, columnas, tipos de datos,
constraints, relaciones, etc y en la segunda instrucción es el vaciado de los
datos.

Luego si mas adelante la aplicación debe de recuperar estos datos únicamente
tendrá que llamarlos utilizando:

wDataset.ReadXmlSchema "c:\dataet_estructura.xsd"
wDataset.ReadXml "c:\dataset_datos.xml

Espero que te sea de utilidad

Saludos

Roberto Rocha


"Eduardo" wrote:

Hola a todos, necesito grabar un solo registro de un dataset a xml
asi tengo todos los registros MiDataset.WriteXml("nombre del archivo")
pero un solo registro como tengo que hacer?
Desde ya Muchas Gracias

Muchas Gracias Roberto por tu atención, pero lo que necesito es guardar en
xml solamente el ultimo registro, no todos los registros
Como se puede hacer eso?

Eduardo.

Estimado Eduardo:

Si por ejemplo tenemos una base en Acces pudieras crear un filtro de manera
que asi obtienes solo el registro que deseas guardar.

Supongamos que tenemos un Dataset que tiene una tabla catalogo y quiero
guardar solamente un registro de ella, podemos hacer lo siguiente:

Llamaremos al Adaptador : OldbDatset1
Llamaremos al Dataset : Oldb_Catalogo
Llamaremos a la Tabla : Catalogo
Dim cCta AS String ´Esta es la variable donde indico que quiero filtrar
cCta = "1101"
OleDbSelectCommand1.Parameters.Add(New OleDbParameter("Cuenta",
OleDbType.Char))
OleDbSelectCommand1.CommandText = "SELECT cuenta FROM Catalogo WHERE
(cuenta = @Cuenta)"
OleDbSelectCommand1.Parameters(0).Value = cCta
OldbDataset1.Fill(Oldb_Catalogo)
if Me.BindingContex(Oldb_Catalogo,"Catalogo").Count <> -1 Then
´Significa que el filtro fue efectivo
Aqui copias el Dataset
Endif


Espero que esto te ayude

Saludos

Roberto

"Roberto Roccha" wrote:

Estimado Eduardo:

Aqui un fragmento de un articulo de Gerardo Díaz que te puede ser útil:
Temporalmente los datos pueden ser almacenados a disco por ejemplo
directamente a un archivo XML, bastará con utilizar el método WriteXml y
WriteXmlSchema del objeto DataSet:

wDataset.WriteXmlSchema "c:\dataet_estructura.xsd"
wDataset.WriteXml "c:\dataset_datos.xml"

Con esto se esta volcando toda la estructura básicamente en 2 pasos, primero
la estructura, es decir, definición de tablas, columnas, tipos de datos,
constraints, relaciones, etc y en la segunda instrucción es el vaciado de los
datos.

Luego si mas adelante la aplicación debe de recuperar estos datos únicamente
tendrá que llamarlos utilizando:

wDataset.ReadXmlSchema "c:\dataet_estructura.xsd"
wDataset.ReadXml "c:\dataset_datos.xml"

Espero que te sea de utilidad

Saludos

Roberto Rocha


"Eduardo" wrote:

> Hola a todos, necesito grabar un solo registro de un dataset a xml
> asi tengo todos los registros MiDataset.WriteXml("nombre del archivo")
> pero un solo registro como tengo que hacer?
> Desde ya Muchas Gracias
>
>
>
>
>
>
>

Roberto desde ya muchisimas gracias por contestar, tengo un inconveniente y
no tengo idea de que pasa

Dim OleDbSelectCommand1 As New OleDbCommand

Dim cCta As String 'Esta es la variable donde indico que quiero filtrar

cCta = "8888"

OleDbSelectCommand1.Parameters.Add(New OleDb.OleDbParameter("numero",
OleDbType.Char))

OleDbSelectCommand1.CommandText = "SELECT numero FROM guias WHERE (numero =
@numero)"

OleDbSelectCommand1.Parameters(0).Value = cCta

Me.GuiasTableAdapter.Fill(GuiasDS.guias) ' Aqui es donde tengo el problema,
tiene que tener la tabla sino da error

If Me.BindingContext(Me.GuiasDS, "guias").Count <> -1 Then

Me.GuiasDS.WriteXml("C:\Guia_copiada.xml")

'Significa que el filtro fue efectivo

Label63.Text = "Siiiiii" ' Aqui copias el Dataset

End If

El problemas es que me copia todos los registros, no solo el que coincida
con " cCta "
Que estoy haciendo mal?

El Dataset se llama guias.xsd
El Adaptador se llama guiasTableAdapter
El DataTable se llama guias

Eduardo.







"Roberto Roccha" escribió en el
mensaje news:

Estimado Eduardo:

Si por ejemplo tenemos una base en Acces pudieras crear un filtro de
manera
que asi obtienes solo el registro que deseas guardar.

Supongamos que tenemos un Dataset que tiene una tabla catalogo y quiero
guardar solamente un registro de ella, podemos hacer lo siguiente:

Llamaremos al Adaptador : OldbDatset1
Llamaremos al Dataset : Oldb_Catalogo
Llamaremos a la Tabla : Catalogo
Dim cCta AS String ´Esta es la variable donde indico que quiero filtrar
cCta = "1101"
OleDbSelectCommand1.Parameters.Add(New OleDbParameter("Cuenta",
OleDbType.Char))
OleDbSelectCommand1.CommandText = "SELECT cuenta FROM Catalogo WHERE
(cuenta = @Cuenta)"
OleDbSelectCommand1.Parameters(0).Value = cCta
OldbDataset1.Fill(Oldb_Catalogo)
if Me.BindingContex(Oldb_Catalogo,"Catalogo").Count <> -1 Then
´Significa que el filtro fue efectivo
Aqui copias el Dataset
Endif


Espero que esto te ayude

Saludos

Roberto

"Roberto Roccha" wrote:

Estimado Eduardo:

Aqui un fragmento de un articulo de Gerardo Díaz que te puede ser útil:
Temporalmente los datos pueden ser almacenados a disco por ejemplo
directamente a un archivo XML, bastará con utilizar el método WriteXml y
WriteXmlSchema del objeto DataSet:

wDataset.WriteXmlSchema "c:\dataet_estructura.xsd"
wDataset.WriteXml "c:\dataset_datos.xml"

Con esto se esta volcando toda la estructura básicamente en 2 pasos,
primero
la estructura, es decir, definición de tablas, columnas, tipos de datos,
constraints, relaciones, etc y en la segunda instrucción es el vaciado de
los
datos.

Luego si mas adelante la aplicación debe de recuperar estos datos
únicamente
tendrá que llamarlos utilizando:

wDataset.ReadXmlSchema "c:\dataet_estructura.xsd"
wDataset.ReadXml "c:\dataset_datos.xml"

Espero que te sea de utilidad

Saludos

Roberto Rocha


"Eduardo" wrote:

> Hola a todos, necesito grabar un solo registro de un dataset a xml
> asi tengo todos los registros MiDataset.WriteXml("nombre del archivo")
> pero un solo registro como tengo que hacer?
> Desde ya Muchas Gracias
>
>
>
>
>
>
>

Estimado Eduardo:

Esto te está ocurriendo por que en OleDbSelecCommand debe de ser el del
Dataset que estás utilizando, debes ver en las propiedades del Dataset
(Me.GuiasTablaAdapter) y ver cual OleDbSelecCommand estas usando.

No necesitas crear un OleDbSelecCommand por que este se crea automáticamente
cuando creas el Dataset.

Cuando uses el correcto hará el filtro de modo contrario traerá todos los
datos del dataset.

Si el Dataset lo creas con código ahi puedes crearlo en caso contrario si lo
creas con el Tool Box en tiempo de edicion este se crea automaticamente y lo
pudes ver en las propiedades.


Si puedes enviarme parte del codigo con guste te ayudo a corregir el problema.


Saludos Roberto

mi correo


"Eduardo" wrote:

Roberto desde ya muchisimas gracias por contestar, tengo un inconveniente y
no tengo idea de que pasa

Dim OleDbSelectCommand1 As New OleDbCommand

Dim cCta As String 'Esta es la variable donde indico que quiero filtrar

cCta = "8888"

OleDbSelectCommand1.Parameters.Add(New OleDb.OleDbParameter("numero",
OleDbType.Char))

OleDbSelectCommand1.CommandText = "SELECT numero FROM guias WHERE (numero =
@numero)"

OleDbSelectCommand1.Parameters(0).Value = cCta

Me.GuiasTableAdapter.Fill(GuiasDS.guias) ' Aqui es donde tengo el problema,
tiene que tener la tabla sino da error

If Me.BindingContext(Me.GuiasDS, "guias").Count <> -1 Then

Me.GuiasDS.WriteXml("C:\Guia_copiada.xml")

'Significa que el filtro fue efectivo

Label63.Text = "Siiiiii" ' Aqui copias el Dataset

End If

El problemas es que me copia todos los registros, no solo el que coincida
con " cCta "
Que estoy haciendo mal?

El Dataset se llama guias.xsd
El Adaptador se llama guiasTableAdapter
El DataTable se llama guias

Eduardo.







"Roberto Roccha" escribió en el
mensaje news:
> Estimado Eduardo:
>
> Si por ejemplo tenemos una base en Acces pudieras crear un filtro de
> manera
> que asi obtienes solo el registro que deseas guardar.
>
> Supongamos que tenemos un Dataset que tiene una tabla catalogo y quiero
> guardar solamente un registro de ella, podemos hacer lo siguiente:
>
> Llamaremos al Adaptador : OldbDatset1
> Llamaremos al Dataset : Oldb_Catalogo
> Llamaremos a la Tabla : Catalogo
> Dim cCta AS String ´Esta es la variable donde indico que quiero filtrar
> cCta = "1101"
> OleDbSelectCommand1.Parameters.Add(New OleDbParameter("Cuenta",
> OleDbType.Char))
> OleDbSelectCommand1.CommandText = "SELECT cuenta FROM Catalogo WHERE
> (cuenta = @Cuenta)"
> OleDbSelectCommand1.Parameters(0).Value = cCta
> OldbDataset1.Fill(Oldb_Catalogo)
> if Me.BindingContex(Oldb_Catalogo,"Catalogo").Count <> -1 Then
> ´Significa que el filtro fue efectivo
> Aqui copias el Dataset
> Endif
>
>
> Espero que esto te ayude
>
> Saludos
>
> Roberto
>
> "Roberto Roccha" wrote:
>
>> Estimado Eduardo:
>>
>> Aqui un fragmento de un articulo de Gerardo Díaz que te puede ser útil:
>> Temporalmente los datos pueden ser almacenados a disco por ejemplo
>> directamente a un archivo XML, bastará con utilizar el método WriteXml y
>> WriteXmlSchema del objeto DataSet:
>>
>> wDataset.WriteXmlSchema "c:\dataet_estructura.xsd"
>> wDataset.WriteXml "c:\dataset_datos.xml"
>>
>> Con esto se esta volcando toda la estructura básicamente en 2 pasos,
>> primero
>> la estructura, es decir, definición de tablas, columnas, tipos de datos,
>> constraints, relaciones, etc y en la segunda instrucción es el vaciado de
>> los
>> datos.
>>
>> Luego si mas adelante la aplicación debe de recuperar estos datos
>> únicamente
>> tendrá que llamarlos utilizando:
>>
>> wDataset.ReadXmlSchema "c:\dataet_estructura.xsd"
>> wDataset.ReadXml "c:\dataset_datos.xml"
>>
>> Espero que te sea de utilidad
>>
>> Saludos
>>
>> Roberto Rocha
>>
>>
>> "Eduardo" wrote:
>>
>> > Hola a todos, necesito grabar un solo registro de un dataset a xml
>> > asi tengo todos los registros MiDataset.WriteXml("nombre del archivo")
>> > pero un solo registro como tengo que hacer?
>> > Desde ya Muchas Gracias
>> >
>> >
>> >
>> >
>> >
>> >
>> >