La Web del Programador: Comunidad de Programadores
 
    Pregunta:  62706 - MODIFICAR REGISTRO EN UNA BD HECHA EN ACCESS
Autor:  Mauricio Cavieres
Hola
Tengo este codigo, el cual elimina el registro completo y crea uno nuevo.
Private Sub Command1_Click()
Data1.Recordset.Index = "Rut"
Data1.Recordset.Seek "=", Text1.Text + Text2.Text
Data1.Recordset.Delete
Data1.Recordset.MoveFirst

Data1.Recordset.AddNew
Data1.Recordset.Fields("Rut") = Text1.Text + Text2.Text
Data1.Recordset.Fields("Nombre") = Text3.Text
Data1.Recordset.Fields("Apellido Paterno") = Text4.Text
Data1.Recordset.Fields("Apellido Materno") = Text5.Text
Data1.Recordset.Update
End Sub
Mi duda es que si es posible modificar el registro sin tener que eliminarlo y crearlo denuevo, por ejemplo solo cambiar el nombre dejando todo lo demas =.

  Respuesta:  Mauricio rojas rodriguez
Tienes que usar la propiedad UpdateBach
ejemplo:
.Requery
.Find "Id='" & Trim(CodigoMaterias) & "'"
!Nombre = txt_nombre.Text
!Fecha = DTPFecha.Value
!Horario = Combo_horario.Text
!Dia_Lectivo = Combo_dia.Text
!Cuatrimestre = Combo_cuatri.Text
!Monto = txt_Monto.Text
.UpdateBatch
.Requery