** NORMAS DEL FORO **
Inicio del foro Inicio del foro > Access y VBA > Access y VBA
  Mensajes nuevos Mensajes nuevos RSS - Problema con formato al actualizar fecha
  Preguntas frecuentes Preguntas frecuentes  Buscar en el foro   Eventos   Registro Registro  Iniciar sesion Iniciar sesion

Tema cerradoProblema con formato al actualizar fecha

 Responder Responder
Autor
Mensaje
Boogaloozgz Ver desplegable
Nuevo
Nuevo
Avatar

Unido: 03/Abril/2014
Localización: Zaragoza
Estado: Sin conexión
Puntos: 45
Enlace directo a este mensaje Tema: Problema con formato al actualizar fecha
    Enviado: 10/Agosto/2021 a las 11:19
Hola a todos,

Estoy intentando actualizar dos fechas en dos tablas (Pedidos y DetlPedido) con el siguiente código:

' Actualizo en la tabla DetPedido a la fecha de hoy si cumple dos condiciones
 CurrentDb.Execute "UPDATE [DetPedido] SET [DetPedido].Envio = Date() WHERE [idPedido] = " & Me.idPedido & " AND [Enviado]= True;"

' Busco la fecha mayor dentro de DetPedido para actualizarla en la tabla Pedidos para un pedido concreto   
 Dim maxima As Date
    maxima = Format(DMax("Envio", "DetPedido", "idPedido = " & Me.idPedido), "dd-mm-yyyy")
   
    CurrentDb.Execute "UPDATE [Pedidos] SET [Pedidos].Envio =  #" & máxima & "#  WHERE [idPedido] = " & Me.idPedido & ";"
    
Me.Envio.Requery

Los formatos en ambas tablas son los mismos y en los campos de los formularios son los mismos (formato Fecha Corta), sin embargo en la tabla DetPedido actualiza la fecha correctamente (p.e: hoy a 10/08/2021) y en la tabla Pedidos invierte el día y el mes (p.e: hoy a 08/10/2021)

Posiblemente sea una estupidez (más viniendo de mi) pero no consigo ver donde está el "chiste"); os agradezco la ayuda de antemano.

Saludos

Arriba
rokoko Ver desplegable
Colaborador
Colaborador
Avatar

Unido: 16/Febrero/2008
Localización: Pamplona
Estado: Sin conexión
Puntos: 3062
Enlace directo a este mensaje Enviado: 10/Agosto/2021 a las 11:36
Hola, creo que sera esto, en vba el formato fecha en Americano.... mes/Dia/Año

maxima = Format(DMax("Envio", "DetPedido", "idPedido = " & Me.idPedido), "mm-dd-yyyy")

Saludos
Arriba
Boogaloozgz Ver desplegable
Nuevo
Nuevo
Avatar

Unido: 03/Abril/2014
Localización: Zaragoza
Estado: Sin conexión
Puntos: 45
Enlace directo a este mensaje Enviado: 10/Agosto/2021 a las 12:05
Hola rokoko,

Claro, yo lo quiero en formato español, de hecho en la tabla DetPedido lo pone bien, sin embargo al actualizar en la tabla Pedido lo pone en formato americano, es decir, mm-dd-yyyy

Arriba
Mihura Ver desplegable
Administrador
Administrador
Avatar

Unido: 06/Mayo/2005
Localización: En la dehesa
Estado: Sin conexión
Puntos: 13990
Enlace directo a este mensaje Enviado: 10/Agosto/2021 a las 12:11
Al actualizar lo tienes que pasar en formato yanqui mmddyy, al leerlo ya te lo devolverá en el formato regional que tengas seleccionado, en este caso Español.

Jesús Mansilla Castells.
Saludos desde Móstoles.

Access Aplicaciones
Tecsys.es
Arriba
rokoko Ver desplegable
Colaborador
Colaborador
Avatar

Unido: 16/Febrero/2008
Localización: Pamplona
Estado: Sin conexión
Puntos: 3062
Enlace directo a este mensaje Enviado: 10/Agosto/2021 a las 12:46
Ponlo como te he dicho, Mihura te ha explicado como trabaja access.....Wink

Arriba
Boogaloozgz Ver desplegable
Nuevo
Nuevo
Avatar

Unido: 03/Abril/2014
Localización: Zaragoza
Estado: Sin conexión
Puntos: 45
Enlace directo a este mensaje Enviado: 10/Agosto/2021 a las 13:22
Gracias de nuevo "maestro", poniéndole el formato yankee... solucionado el problema.

Se puede cerrar el hilo
Arriba
 Responder Responder
  Compartir tema   

Ir al foro Permisos de foro Ver desplegable