
actualizar bd desde datagrid
Publicado por roberta (14 intervenciones) el 14/10/2014 11:38:25
Hola a todos,
aquí estoy con un nuevo problema.
tengo un formulario con un datagridview enlazado a una base datos de Access.
Este es el código que utilizo para cargar el datagrid:
Function cargardatagrid() As Boolean
'CONEXION
Dim Conexion As New OleDbConnection
Conexion.ConnectionString = "Provider=Microsoft.JET.OLEDB.4.0; Data Source = ..\\Debug\\presupuestos.mdb; Persist Security Info=False"
'CADENA SQL
Dim CadenaSQL As String = "SELECT * FROM presupuesto_9"
'ADAPTADOR
Dim Adaptador As New OleDbDataAdapter(CadenaSQL, Conexion)
'DATA SET
Dim Ds As New DataSet
'LLENAR EL DATASET
Try
Conexion.Open() 'APRE LA CONEXION
Adaptador.Fill(Ds) 'EL ADAPTADOR LLENA CON DATOS AL DATA SET
Conexion.Close()
Catch ex As Exception
MsgBox(ex.ToString)
End Try
'CONTAR REGISTROS
If (Ds.Tables(0).Rows.Count = 0) Then
'NO ENCUENTRA REGISTROS
Return False
Else
'ENCUENTRA TODOS LOS REGISTROS Y LLENA EL DATAGRIDVIEW
DataGridView1.DataSource = Ds.Tables(0)
DataGridView1.Columns(0).Selected = True
End If
Return True
End Function
Hasta este punto tudo bien.
Este datagrid lo necesito para formular un presupuesto.
De aquí la pregunta:
Necesito hacer cambio en el datagrid (modificar registros, eliminar registros y añadir registros).
Los cambio se guardarían al presionar un botón de "modificar".
Había pensado utilizar el update del dataset, pero no encuentro la manera de hacerlo.
Si alguien pudiera darme un ayuda, con un ejemplo, se lo agradecería muchissssssssimo!!!!
Muchas gracias de antemano.
PS: utilizo vb 2010 y Access 2010.
aquí estoy con un nuevo problema.
tengo un formulario con un datagridview enlazado a una base datos de Access.
Este es el código que utilizo para cargar el datagrid:
Function cargardatagrid() As Boolean
'CONEXION
Dim Conexion As New OleDbConnection
Conexion.ConnectionString = "Provider=Microsoft.JET.OLEDB.4.0; Data Source = ..\\Debug\\presupuestos.mdb; Persist Security Info=False"
'CADENA SQL
Dim CadenaSQL As String = "SELECT * FROM presupuesto_9"
'ADAPTADOR
Dim Adaptador As New OleDbDataAdapter(CadenaSQL, Conexion)
'DATA SET
Dim Ds As New DataSet
'LLENAR EL DATASET
Try
Conexion.Open() 'APRE LA CONEXION
Adaptador.Fill(Ds) 'EL ADAPTADOR LLENA CON DATOS AL DATA SET
Conexion.Close()
Catch ex As Exception
MsgBox(ex.ToString)
End Try
'CONTAR REGISTROS
If (Ds.Tables(0).Rows.Count = 0) Then
'NO ENCUENTRA REGISTROS
Return False
Else
'ENCUENTRA TODOS LOS REGISTROS Y LLENA EL DATAGRIDVIEW
DataGridView1.DataSource = Ds.Tables(0)
DataGridView1.Columns(0).Selected = True
End If
Return True
End Function
Hasta este punto tudo bien.
Este datagrid lo necesito para formular un presupuesto.
De aquí la pregunta:
Necesito hacer cambio en el datagrid (modificar registros, eliminar registros y añadir registros).
Los cambio se guardarían al presionar un botón de "modificar".
Había pensado utilizar el update del dataset, pero no encuentro la manera de hacerlo.
Si alguien pudiera darme un ayuda, con un ejemplo, se lo agradecería muchissssssssimo!!!!
Muchas gracias de antemano.
PS: utilizo vb 2010 y Access 2010.
Valora esta pregunta


0