A - Metodo findfirst

di il
1 risposte

A - Metodo findfirst

Ho scritto la seguente routine per posizionarmi su un record specifico da visualizzare su una sottomaschera, quando clicco su una listbox ottenuta da una query,
il tutto funziona correttamente se il campo [numero] contiene solo numeri (es. "111"), ma se contiene anche una lettera (es. "11A") mi esce l'errore " errore runtime 3077 - errore di sintassi (operatore mancante nell'espressione)" ed in debug mi evidenzia ala riga
"rst.FindFirst "str([NUMERO]) = " & (Nz(MYVALUE, 0))"

mi potete aiutare a risolvere ? mi ci sono proprio imbarcato.
Grazie.

Private Sub List_Click()
MYVALUE = List.Value
Dim rst As Object
Set rst = Me.Recordset.Clone
rst.FindFirst "str([NUMERO]) = " & (Nz(MYVALUE, 0))
If rst.NoMatch Then
MsgBox "LAVORO NON TROVATO"
Else
Me.Bookmark = rst.Bookmark
End If
End Sub

1 Risposte

  • Re: A - Metodo findfirst

    Prima di tutto usa l'oggetto RecordsetClone e non il clone del Recordset.
    Secondo sbagli in modo evidente la sintassi...
    "NUMERO='" & VALORE &"'"
    Questa è la sintassi corretta.
    Non capisco perché hai usato la fonzione Str all'interno di una stringa....
Devi accedere o registrarti per scrivere nel forum
1 risposte