29/05/2009, 04:36
|
| | Fecha de Ingreso: mayo-2009
Mensajes: 16
Antigüedad: 15 años, 6 meses Puntos: 0 | |
Respuesta: Campo sumado El codigo del boton que suma es el siguiente:
Private Sub Comando42_Click()
On Error GoTo Err_Comando42_Click
Dim stDocName As String
stDocName = "SumaPrecios"
DoCmd.OpenQuery stDocName, acNormal, acEdit
Me.Requery
Exit_Comando42_Click:
Exit Sub
Err_Comando42_Click:
MsgBox Err.Description
Resume Exit_Comando42_Click
End Sub
El boton llama a una consulta en SQL que hace bien la suma y me lo guarda en la tabla, le puse la orden Me.requery como me dijiste pero sigue sin actualizar el form.
Saludos |