| swissman |  |
|
2007-02-05 14:36 - Respuestas: 9 - Tema nº: 2434537
Características: Windows 2000, PIV-512.
Hola, a ver si entendeis la pregunta que voy a hacer. Estoy haciendo 4 filigranas en un propgrama donde cada dia hay que entrar unos datos. La cuestion es que los festivos no se entran estos datos, así, el viernes entré los datos en 4 textos, que sumados me dan 15, y al abrir el nuevo registro de hoy lunes, busco los datos ultimos entrados (datos_hoy=Dlast(xxx) ) y me los compara con los de hoy, y sin son iguales pues salen amarillos y si no pues no. Esto funciona bien, pero al ir atras y volver, o bien al cerrar y volver a abrir el formulario, entonces ya no lo hace, y tengo esta instruccion en "al activar registro". Lo que me falta es saber como decirle con VBA que no me busque la fecha de ayer (fecha=fecha-1 sale dia 4, no dia 2), y entre corchetes tampoco, no poniendo en un texto. creo que seria un dlast, pero claro, si hoy ya tengo un registro, me va a hoy, no al viernes.
muchas gracias
| |
|
|
| ebolo |  |
|
Re: Access: buscar la fecha anterior a hoy (Solucionado) - 2007-02-05 17:39 - Respuesta 2
Hola, puedes meter esa instrucción en el evento Form_Current, y a ver que hace.
Para saber si un día es domingo, lunes,... en VBA puedes usar la función Datepart(.....), ejmplo:
msgbox Datepart("w", date)
Los Valores por defecto son domingo=1, lunes=2,.... y con eso puedes modificar tu función para que haga una cosa u otra(reste 3 y no 1); algo así vamos:
if datepart("w",date)=1 then
.................
else
...................
end if
Saludos.
| |
|
|
| swissman | |
|
Re: Access: buscar la fecha anterior a hoy (Solucionado) - 2007-02-05 18:53 - Respuesta 3
gracias por responder, pero claro, a veces es el miercoles cuando no hay datos.......y no por ser festivo, que ya los tengo marcados para otra cosa, sino porque aquel dia no he ido o no se ha podido hacer la lectura.....de hecho, es una chorrada, y lo ideal seria decirle que buscara la "fechahoy"-1 que haya en la tabla......pero igual no se puede hacer.
Muchas gracias por leerlo y responder | |
|
|
| ebolo | |
|
Re: Access: buscar la fecha anterior a hoy (Solucionado) - 2007-02-06 09:45 - Respuesta 4
Lo que puedes hacer es usar el Dlast pero en el evento Form_Current....., para que cuando vayas hacia detrás o delante te lo actualice.
Saludos.
| |
|
|
| swissman | |
|
Re: Access: buscar la fecha anterior a hoy (Solucionado) - 2007-02-06 14:22 - Respuesta 5
hola, gracias de nuevo por responder. Esto ya está en el form current, supongo que "al activar registro" es donde se pone.
He hecho esto (ya sé que es una superchapuza, pero tampoco me funciona )
-
fecha1 = Date - 1
fecha2 = Date - 2
fecha3 = Date - 3
ahir_dqo = DLast("[dqo-lixi]+...", "[consulta_analitica]", [data] = [fecha1])
If ahir_dqo = "" Then
abans_ahir_dqo = DLast("[dqo-lixi]+[......]", "[consulta_analitica]", [data] = [fecha2])
Else
tres_abans_ahir_dqo = DLast("[dqo-lixi]+................[...] "[consulta_analitica]", [data] = [fecha3])
endif
lo que pasa es que cuando el primer campo, "ahir_dqo" me sale vacio, o sea, que "ayer" no hay nada, me salta al else. creo que es por lo de la fecha final,o que falta o sobra algo, comillas o corchetes.... y ahí ya me he perdido...........
gracias | |
|
|
|
