Selezione Report da form

Ciao ragazzi sono nuovo e penso si il posto giusto x esporvi il mio problema
Io ho una maschera dove inserisco degli ordini
poi ho creato un bottone dove attraverso un codice voglio che mi crei un report che successivamente verra inviato via mail .
Il problema è che con il codice

Option Compare Database

Private Sub Comando141_Click()
On Error GoTo Err_Comando141_Click

    Dim stDocName As String

    stDocName = "Ordini Query"
DoCmd.OpenReport "Ordini Query", acViewPreview, , "Id =" & Me!ID
   ' DoCmd.SendObject acReport, "Ordini Query", acFormatRTF, "Destinatario@libero.it", , , "oggetto della email", "corpo della mail"
    
   ' DoCmd.SendObject acReport, stDocName

Exit_Comando141_Click:
    Exit Sub

Err_Comando141_Click:
    MsgBox Err.Description
    Resume Exit_Comando141_Click
    
End Sub

Mi crea il report del record che ho aperto nel form; ma io volevo che lui mi selezionasse il report e anzichè tramite il parametro ID attraverso il parametro " Data Ordine"

Ho provato a sostituire ID con Data ordine ma non funziona mi da errore sintassi

Option Compare Database

Private Sub Comando141_Click()
On Error GoTo Err_Comando141_Click

    Dim stDocName As String

    stDocName = "Ordini Query"
DoCmd.OpenReport "Ordini Query", acViewPreview, , "Data Ordine =" & "10/10/2009"
   ' DoCmd.SendObject acReport, "Ordini Query", acFormatRTF, "Destinatario@libero.it", , , "oggetto della email", "corpo della mail"
    
   ' DoCmd.SendObject acReport, stDocName

Exit_Comando141_Click:
    Exit Sub

Err_Comando141_Click:
    MsgBox Err.Description
    Resume Exit_Comando141_Click
    
End Sub

come posso fare ?
vi ringrazio