Posizionarsi su record desiderato in sottomaschera

di Anonimizzato27035 il
2 risposte
/
Anonimizzato27035
Utente anonimizzato
Salve a tutti, ho la necessità di posizionarmi su un record desiderato all'interno di una sottomaschera che fra i vari campi ha un campo che ho chiamato [Target Day]. La sottomaschera"Sm_Databasket_BOD" mi viene caricata all'interno della maschera "windowBody" Il record sul quale vorrei che si posizionasse il focus è quello per cui il [Target Day] è la data odierna.
Al click del pulsante lancio il seguente codice:

Private Sub LoadDatabasket_Click()
Me!windowBody.SourceObject = "Sm_Databasket_BODY"
Me!windowBody.LinkChildFields = ""
Me!windowBody.LinkMasterFields = ""
Me!windowBody.SetFocus
'DoCmd.GoToRecord , , acGoTo, "[Target Day]" = Date()
End Sub

ma non funziona...
Allora ho provato a semplificare la ricerca e a vedere se si ferma su un campo generico ad esempio sul record n° 25

Private Sub LoadDatabasket_Click()
Me!windowBody.SourceObject = "Sm_Databasket_BODY"
Me!windowBody.LinkChildFields = ""
Me!windowBody.LinkMasterFields = ""
Me!windowBody.SetFocus
DoCmd.GoToRecord , , acGoTo, 25
End Sub

e così funziona.

Non riesco a capire se il problema è dovuto a:
- Una errata scrittura del parametro "[Target Day]" = Date(); (Ho provato anche numerose altre combinazioni)
- Impossibilità di trovare la sottomaschera "Sm_Databasket_BODY"
-Altro

Grazie per il supporto ad un novizio

2 Risposte

  • Avatar di @Alex
    Super Famoso
    Iscritto da
    feb, 2012
    Messaggi
    8951
    Il motivo per cui non funziona il primo criterio è proprio che il Criterio è ERRATO e la Funzione usata per passare il Crierio non va bene.
    Farei così: 
    
Me!windowBody.SetFocus
With Me.windowBody.Form.RecordsetClone
    .FindFirst Buildcriteria("[Target Day]",dbdate,Date())
    If .NoMatch Then
       MsgBox "Non trovato"
    Else
       Me!windowBody.Bookmark=.BookMark
    End If
End With
Devi accedere o registrarti per scrivere nel forum
2 risposte