Condividi tramite

Uso Docmd.OpenForm: apertura Form da altra maschera

Anonimo
2020-11-02T16:27:16+00:00

Buonasera a tutti,

 ho cercato sul web, ho provato diverse volte, ma non riesco a trovare la soluzione. Penso sia un problema di sintassi che però non riesco a risolvere.

Ho due maschere ( Progetti e Scorte) con relazione uno a molti collegate tra loro con chiave primaria (IDPJCT) e secondaria (Idfscortelink) entrambe le chiavi sono di tipo numerico long integer. La maschera Progetti contiene la chiave primaria IDPJCT.

Ho creato un pulsante, sulla maschera scorte, che vorrei mi aprisse la maschera Progetti sulla riga corrispondente al progetto; cioè che la condizione WHERE sia tale da soddisfare IDPJCT =  Idfscortelink

Al pulsante ho associato la sub seguente, la quale mi apre la maschera Progetti però in una nuova riga cioè non mi "legge" la condizione Where.

Dove ho sbagliato?

Private Sub cmdreturn_DblClick(Cancel As Integer)

Dim stdocname, stLinkCriteria As String

Dim lngstore As Long

stdocname = "Frm_Telecom_WDM_1830_Anagrafica"

lngstore = Me!Idfscortelink

If CurrentProject.AllForms(stdocname).IsLoaded Then

DoCmd.Close acForm, "Frm_Situazione_scorte", acSavePrompt

DoCmd.SelectObject acForm, stdocname, False

DoCmd.Restore

Else

stLinkCriteria = "[IDPJCT]=" & lngstore

DoCmd.OpenForm stdocname, , , stLinkCriteria   <----- 

End If

End Sub

Grazie per l'aiuto

Manuele

Microsoft 365 e Office | Access | Per la casa | Windows

Domanda bloccata. Questa domanda è stata eseguita dalla community del supporto tecnico Microsoft. È possibile votare se è utile, ma non è possibile aggiungere commenti o risposte o seguire la domanda.

0 commenti Nessun commento

Risposta accettata dall'autore della domanda

domenico laurenza 9,900 Punti di reputazione Moderatore volontario
2020-11-02T17:23:15+00:00

Ciao,

verifica la proprietà immissione dati della maschera  "Frm_Telecom_WDM_1830_Anagrafica" potrebbe essere impostata a Sì.

Ciao Mimmo

La risposta è stata utile?

1 persona ha trovato utile questa risposta.
0 commenti Nessun commento

1 risposta aggiuntiva

Ordina per: Più utili
  1. Anonimo
    2020-11-02T17:57:50+00:00

    Ciao Mimmo,

    sono salvo.

    Funziona perfettamente; da solo non ci sarei mai arrivato!

    Grazie 1000

    La risposta è stata utile?

    0 commenti Nessun commento