[ACCESS 2010]-Routine con criterio.

[theShort]

Ciao a tutti,
avrei un piccolo problema con una routine in un DB Access.
In un Form, in base ai valori contenuti in "ID_progetto" (numerico) ed "etichetta" (testo), un pulsante deve aprirmi il relativo Form "Pratica".
Questo è il codice che ho scritto:

Codice: Seleziona tutto

Private Sub Comando9_Click()
On Error GoTo Err_Comando9_Click

    Dim stDocName As String
    Dim stLinkCriteria As String

    stDocName = "Pratica"
   
    stLinkCriteria = "[ID_Progetto]=" & "'" & Me![ID_Progetto] & "' And [Etichetta]=" & "'" & Me![Etichetta] & "'"
    DoCmd.OpenForm stDocName, , , stLinkCriteria

Exit_Comando9_Click:
    Exit Sub

Err_Comando9_Click:
    MsgBox Err.Description
    Resume Exit_Comando9_Click
End Sub


Purtroppo ottengo l'errore "tipi di dati non corrispondenti nell'espressione criterio".
Il tutto si dovrebbe risolvere giocando con gli (') e le ("), però non sono ancora riuscito a trovare la soluzione.

Grazie a chi mi aiuta!

[theShort]

Ho fatto qualche passo in avanti modificando il il criterio del mio codice in questo modo:

Codice: Seleziona tutto

stLinkCriteria = "[ID_Progetto]=" & Me![ID_Progetto] & "And" & "[Etichetta]=" & Me![Etichetta]


Ora funziona chiedendomi di inserire il secondo parametro (Etichetta) manualmente tramite una finestra di dialogo. Ma per quale motivo non lo prende in automatico?

Nessuno sa aiutarmi?

Grazie!

[archimede]

Codice: Seleziona tutto

stLinkCriteria = "ID_Progetto=" & Me!ID_Progetto & " And Etichetta='" & Me!etichetta & "'"


HTH.

Alessandro

[theShort]

Grazie archimede! Mi sei stato molto utile!
Infatti sospettavo fosse una questione di (') e (").

Dannazione, mi sono troppo arrugginito col VBA!