Como actualizar el valor de un registro existente en una tabla de microsoft access

En principio la instrucción la tienes bien. La única duda que tengo es si IdOrdenador es numérico o texto. Si es texto lo tienes bien. Si por el contrario fuera numérico tendrías que ponerlo como

Docmd. Setwarnings false ( es para que no aparezca la ventanita de "Va a actualizar...")

if.... then

docmd.runsql"update ordenadores set fecha.......where idordenador= " & me.idordenador & "")

Julián te agradezco muchísimo tu rápida respuesta.

Efectivamente IdOrdenador es un campo clave autonumérico, así que he hecho los cambios que me dices, pero al ponerlo en práctica aparece "se ha producido el error 3464 en el tiempo de ejecución. No coinciden los tipos de datos en la expresión de criterios".

Si pulso el botón "depurar" y sitúo el puntero sobre ambas variables, se muestran correctamente la fecha y el número de idOrdenador.

He verificado que en las tablas está el formato fecha y que en el formulario también está elegido el formato fecha corta para ese campo.

Pues no te puedo decir porqué, habría que verlo porque, si tengo la tabla Pedidos

Fíjate en la fecha del IdPedido=6

Y tengo un formulario cualquiera, con un cuadro de texto llamado IdLoQueSea donde escribo un número cualquiera, en este caso un 6, y un cuadro de texo OtraFecha donde pongo una( les he puesto nombres distintos para que veas que da igual como se llamen, lo que si tienen que ser es de datos compatibles, número, con número, texto, con texto, fecha con fecha, etc.)

Lo he puesto en el evento Al hacer clic de un botón, pero se puede poner en cualquier evento. Si pulso el botón

Le ha cambiado la fecha. Y la instrucción es la que te decía.

Private Sub Comando57_Click()
DoCmd.RunSQL "update pedidos set fechapedido=#" & Me.OtraFecha & "# where idpedido=" & Me.IdLoQueSea & ""
End Sub

Si quieres, repito, si quieres, haz una copia vacía de la tabla y el formulario y me los mandas a [email protected] y le echo un vistazo.

Si lo haces, en el asunto del mensaje pon tu alias Nacho, ya que si no sé quien me escribe ni los abro.

Nacho: Ampliando un poco lo que te comenta Julian (un saludo), te comento lo siguiente>>

1.- Si usas el CurrentDB. Execute no hace falta el Previo de >> DoCmd. SetWarnings Faalse

Si es recomendable para evitar el Mensaje si usas el DoCmd.RunSQL...

En cuanto al Evento a Programar yo lo haría en el FechaNota_AfterUpdate() de modo que quedaría:

A.- Si tu IdOrdenador es de tipo Número.

Private Sub FechaNota_AfterUpdate()
If IdTipoNota = 4 Then
    CurrentDb.Execute "UPDATE Ordenadores SET FechaBaja = #" & Format(Me.FechaNota, "mm/dd/yyyy") & "#" & " WHERE IdOrdenador = " & Me.IdOrdenador, dbFailOnError
End If
End Sub

B.- Si tu IdOrdenador es de tipo Texto

Private Sub FechaNota_AfterUpdate()
If IdTipoNota = 4 Then
    CurrentDb.Execute "UPDATE Ordenadores SET FechaBaja = #" & Format(Me.FechaNota, "mm/dd/yyyy") & "#" & " WHERE IdOrdenador = '" & Me.Ordenador & "'", dbFailOnError
End If
End Sub

Mis saludos a los dos >> JTJ