Fechas y Visual Basic!!

[BeaCenec]

Hola a todos!!
Tengo un problema bastante gordo. Necesito saber como puedo; por ejemplo meter un fichero de una carpeta a otra carpeta, cada día 5 (por ejemplo) de cada mes. He probado muchos caminos, y lo que no me falla en una cosa me falla en otra. :-p

Un saludos a todos

[Code]

Cómo se supone que vas a comprobar que es dia 5???
Me refiero a un reloj que lo controle cada cuanto tiempo???
Porque si encuentras eso ya esta todo lo demás
if day(date)=5 then
copy fichero ruta ruta
end if
Con las órdenes correctas que no recuerdo muy bien
Si encuentras una respuesta agradecería la publicaras por aki
que me interesaría saberlo

[BeaCenec]

Al final mirando mucho en la ayuda de Access un compañero mio encontró la solución (como la ayuda viene en ingles se tardo bastante), estos de los idiomas

If Weekday(Date, vbSunday) - 1 = 0 Then
MsgBox WeekdayName(7) ' es domingo
'si es domingo, para que se lance el lunes entonces
'se actualiza el campo de la tabla, incrementando la fecha
'en 1 dia.
db.Execute ("update nombre_tabla set fecha_lanzamiento=fecha_lanzamiento+1 where fecha_lanzamiento=date")
Else
If Weekday(Date, vbSaturday) - 1 = 0 Then
MsgBox WeekdayName(6) 'sabado
'lo mismo pero para que se lance dos dias mas tarde y caiga
'en lunes
db.Execute ("update nombre_tabla set fecha_lanzamiento=fecha_lanzamiento+2 where fecha_lanzamiento=date")
Else
MsgBox WeekdayName(Weekday(Date, vbSunday) - 1)
End If
End If