¿Que formato de fecha usar en instrucciones SQL de access?

Porque la siguiente instrucción SQL en el campo fecha, por ejemplo si
deseo
introducir: 1-2-10 me devuelve en la tabla 02-01-2010

SQL = "INSERT INTO PadreMadreResponsableControl ( ResponsableID,
ControlDetalle, Fecha ) SELECT PadreMadreResponsable.IDResponsable, '" &
NombreActividad & "' AS ControlDetalle, #" & FechaActividad & "# AS Fecha
FROM PadreMadreResponsable;"







El Código completo es el siguiente:

Private Sub cmdNuevaActividad_Click()
Dim NombreActividad As String
Dim FechaActividadStr As String
Dim FechaActividad As Date
Dim x As Integer

Dim Intenciones As Integer

Do Until NombreActividad <> ""
NombreActividad = InputBox("Escribe el nombre de la Actividad a
controlar:", "Nombre de actividad")

If NombreActividad = "" Then
MsgBox "Debe indicar un nombre", vbCritical
NombreActividad = ""
Intenciones = Intenciones + 1
Else

End If
If Intenciones = 2 Then
Exit Do
End If
Loop

If NombreActividad = "" Then
MsgBox "Acción canelada", vbExclamation
Exit Sub
End If
Intenciones = 0

Do Until IsDate(FechaActividadStr) = True
FechaActividadStr = InputBox("Escribe la fecha para la
actividad:",
"Fecha de actividad")

If IsDate(FechaActividad) = False Then
MsgBox "Debe indicar una fecha", vbCritical
FechaActividad = ""
Intenciones = Intenciones + 1
Else
FechaActividad = CDate(FechaActividadStr)
Me.lblFecha.Caption = FechaActividad
End If
If Intenciones = 2 Then
Exit Do
End If
Loop
MsgBox FechaActividad

If FechaActividadStr <> "" Then
SQL = "INSERT INTO PadreMadreResponsableControl (
ResponsableID,
ControlDetalle, Fecha ) SELECT PadreMadreResponsable.IDResponsable, '" &
NombreActividad & "' AS ControlDetalle, #" & FechaActividad & "# AS Fecha
FROM PadreMadreResponsable;"
DoCmd.RunSQL SQL
DoCmd.RunCommand acCmdRefreshPage
DoCmd.OpenForm "PadresControl", acNormal, , "[ControlDetalle] > '" & NombreActividad & "' And [Fecha]= #" & FechaActividad & "#"
Me.cbbActividadSelección = ""
Me.cbbPadresSelección = ""
Else
MsgBox "No se pudo agregar la actividad por falta de datos",
vbExclamation
End If
End Sub

¡Hola, Roy's!

Siempre que introduzcas una fecha entre almohadillas (#) Access por
defecto interpreta que el formato es el américano (mm-dd-yyyy) a no
ser que el primer número sea mayor que 12 que entonces lo interpreta
como el día.
Para evitar confusiones lo mejor al pasar una fecha es forzar que su
formato sea el americano.
En tu caso sustituye la fecha por Format$(FechaActividad, "mm-dd-
yyyy").

Espero que te sirva de ayuda.

Un saludo,
Ignacio.
.