update que no graba

Hola grupo, antes que nada gracias. ¿porque no graba el update? ej:
conexion.ConnectionString = caminobase

Dim sql As String = "SELECT * FROM Tabla WHERE campo =" & variable

adaptador = New OleDbDataAdapter

adaptador.SelectCommand = New OleDbCommand(sql, conn)

comando = New OleDbCommandBuilder(adaptador)

comando.QuotePrefix = "["

comando.QuoteSuffix = "]"

adaptador.DeleteCommand = comando.GetDeleteCommand

adaptador.InsertCommand = comando.GetInsertCommand

adaptador.UpdateCommand = comando.GetUpdateCommand

Me.datos = New DataSet

conexion.Open()

adaptador.Fill(Me.datos, "Tabla")

conexion.Close()

Luego de esto, cuando quiero grabar los cambios utilizo esto:

conexion.Open()

adaptador.Update(datos, "Tabla")

conexion.Close()

No me da ningun error ni nada, simplemente no refleja los cambios en la
base. Bueno si alguien sabe , gracias

fernando

¿Estás utilizando AcceptChanges en algún lado antes de guardar? porque no

debes utilizar hasta luego que guardes, sino se interpretará como que

registro/s ya han sido guardado dado que no poseen cambios.

Saludos
Federico A. Colli
Analista Universitario en Sistemas


"fernando" escribió en el mensaje
news:u0o$zz#
> Hola grupo, antes que nada gracias. ¿porque no graba el update? ej:
> conexion.ConnectionString = caminobase
>
> Dim sql As String = "SELECT * FROM Tabla WHERE campo =" & variable
>
> adaptador = New OleDbDataAdapter
>
> adaptador.SelectCommand = New OleDbCommand(sql, conn)
>
> comando = New OleDbCommandBuilder(adaptador)
>
> comando.QuotePrefix = "["
>
> comando.QuoteSuffix = "]"
>
> adaptador.DeleteCommand = comando.GetDeleteCommand
>
> adaptador.InsertCommand = comando.GetInsertCommand
>
> adaptador.UpdateCommand = comando.GetUpdateCommand
>
> Me.datos = New DataSet
>
> conexion.Open()
>
> adaptador.Fill(Me.datos, "Tabla")
>
> conexion.Close()
>
> Luego de esto, cuando quiero grabar los cambios utilizo esto:
>
> conexion.Open()
>
> adaptador.Update(datos, "Tabla")
>
> conexion.Close()
>
> No me da ningun error ni nada, simplemente no refleja los cambios en la
> base. Bueno si alguien sabe , gracias
>
> fernando
>
>

¿Estás utilizando AcceptChanges en algún lado antes de guardar? porque no

debes utilizar hasta luego que guardes, sino se interpretará como que

registro/s ya han sido guardado dado que no poseen cambios.

Saludos
Federico A. Colli
Analista Universitario en Sistemas


"fernando" escribió en el mensaje
news:u0o$zz#
> Hola grupo, antes que nada gracias. ¿porque no graba el update? ej:
> conexion.ConnectionString = caminobase
>
> Dim sql As String = "SELECT * FROM Tabla WHERE campo =" & variable
>
> adaptador = New OleDbDataAdapter
>
> adaptador.SelectCommand = New OleDbCommand(sql, conn)
>
> comando = New OleDbCommandBuilder(adaptador)
>
> comando.QuotePrefix = "["
>
> comando.QuoteSuffix = "]"
>
> adaptador.DeleteCommand = comando.GetDeleteCommand
>
> adaptador.InsertCommand = comando.GetInsertCommand
>
> adaptador.UpdateCommand = comando.GetUpdateCommand
>
> Me.datos = New DataSet
>
> conexion.Open()
>
> adaptador.Fill(Me.datos, "Tabla")
>
> conexion.Close()
>
> Luego de esto, cuando quiero grabar los cambios utilizo esto:
>
> conexion.Open()
>
> adaptador.Update(datos, "Tabla")
>
> conexion.Close()
>
> No me da ningun error ni nada, simplemente no refleja los cambios en la
> base. Bueno si alguien sabe , gracias
>
> fernando
>
>

adaptador.SelectCommand = New OleDbCommand(sql, conn)

Hola grupo, antes que nada gracias. ¿porque no graba el update? ej:
conexion.ConnectionString = caminobase

Dim sql As String = "SELECT * FROM Tabla WHERE campo =" & variable

adaptador = New OleDbDataAdapter

adaptador.SelectCommand = New OleDbCommand(sql, conn)

comando = New OleDbCommandBuilder(adaptador)

comando.QuotePrefix = "["

comando.QuoteSuffix = "]"

adaptador.DeleteCommand = comando.GetDeleteCommand

adaptador.InsertCommand = comando.GetInsertCommand

adaptador.UpdateCommand = comando.GetUpdateCommand

Me.datos = New DataSet

conexion.Open()

adaptador.Fill(Me.datos, "Tabla")

conexion.Close()

Luego de esto, cuando quiero grabar los cambios utilizo esto:

conexion.Open()

adaptador.Update(datos, "Tabla")

conexion.Close()

No me da ningun error ni nada, simplemente no refleja los cambios en la
base. Bueno si alguien sabe , gracias

fernando

> adaptador.SelectCommand = New OleDbCommand(sql, conn)

No sé si es un error de escritura o lo tienes así en el codigo, pero esta
conexión no es la misma con la que luego actualizas. ¿Puede ser ese el
error?.
En el caso de que no sea eso vuelve a comprobar el codigo, porque creo que
tiene que ser un error de escritura.
Bueno ademas supongo que el SELECT es con un numero, es decir que variable
es un número, porque si es texto te faltarian las comillas.



"fernando" escribió en el mensaje
news:u0o$zz%
> Hola grupo, antes que nada gracias. ¿porque no graba el update? ej:
> conexion.ConnectionString = caminobase
>
> Dim sql As String = "SELECT * FROM Tabla WHERE campo =" & variable
>
> adaptador = New OleDbDataAdapter
>
> adaptador.SelectCommand = New OleDbCommand(sql, conn)
>
> comando = New OleDbCommandBuilder(adaptador)
>
> comando.QuotePrefix = "["
>
> comando.QuoteSuffix = "]"
>
> adaptador.DeleteCommand = comando.GetDeleteCommand
>
> adaptador.InsertCommand = comando.GetInsertCommand
>
> adaptador.UpdateCommand = comando.GetUpdateCommand
>
> Me.datos = New DataSet
>
> conexion.Open()
>
> adaptador.Fill(Me.datos, "Tabla")
>
> conexion.Close()
>
> Luego de esto, cuando quiero grabar los cambios utilizo esto:
>
> conexion.Open()
>
> adaptador.Update(datos, "Tabla")
>
> conexion.Close()
>
> No me da ningun error ni nada, simplemente no refleja los cambios en la
> base. Bueno si alguien sabe , gracias
>
> fernando
>
>