Foros del Web

Foros del Web (http://www.forosdelweb.com/)
-   .NET (http://www.forosdelweb.com/f29/)
-   -   MODIFICACIoN DE DATOS (http://www.forosdelweb.com/f29/modificacion-datos-351693/)

rock_blues.NET 21/11/2005 11:11

MODIFICACIoN DE DATOS
 
HOLA AMIGOS

:no: TENGO UNA APLICACCION VISUAL STUDIO 2002 CON ACCESS, EN LA CUAL QUIERO REALIZAR UNA MODIFICACION DE DATOS Y NO SE CUAL ES LA LINEA DE CODIGOS QUE HAY QUE SEGUIR PARA REALIZAR LA OPERACION, LA IDEA ES QUE SE MANTENGA LA CLAVE PRIMARIA Y MODIFICAR LOS CAMPOS QUE PERTENECEN A ESTA CLAVE.

SI ME PUEDEN AYUDA ES LOS AGRADECERE

reanimar 21/11/2005 14:23

Yo lo hago asi...

Public Overrides Sub Modificar(ByVal Objeto As Object)
Try
Dim ds As New DataSet
Me.AbrirConexion()
Me.command = New OleDb.OleDbCommand("SELECT * FROM Editores WHERE EditorID= " & Objeto.EditorID, conexion)
Me.daEditor = New OleDb.OleDbDataAdapter(command)
Dim autogen As New OleDb.OleDbCommandBuilder(daEditor)
daEditor.Fill(ds, "Editores")
daEditor.UpdateCommand = autogen.GetUpdateCommand
Me.CerrarConexion()
Dim unaFila As DataRow = ds.Tables("Editores").Rows(0)
With unaFila
.Item("Perfil") = Objeto.perfil
.Item("Gen1") = Objeto.gen1
.Item("Gen2") = Objeto.gen2
.Item("Gen3") = Objeto.gen3
End With
Me.daEditor.Update(ds, "Editores")
Catch ex As Exception
Throw ex
End Try
End Sub

Espero que te sirva....

rock_blues.NET 22/11/2005 06:16

ok muchas gracias, lo aplicare en el sistema


La zona horaria es GMT -6. Ahora son las 18:17.

Desarrollado por vBulletin® Versión 3.8.7
Derechos de Autor ©2000 - 2026, Jelsoft Enterprises Ltd.