RaoulDuke ha scritto:
Sì certo, ma hai scritto di verificare perchè non funziona e non capivo.
Se si tratta di capire perchè utilizzando la funzione GetRecNum ottengo un errore al requery, posso dirti che ho fatto il debug passo a passo e la funzione raggiunta la riga
If Not (.BOF And .EOF) Then
passa ad errore e imposta GetRecNum = 0
Ma se non ti serve questo metodo la verifica è questione di voler capire, e non è indispensabile.
Nel tuo caso devi verificare se è correttamente LETTO l'oggetto, quindi la Maschera, e di conseguenza il suo RecordsetClone, se ti da errore mi viene il dubbio che non lo sia e questo può accadere se l'oggetto chiamante non è quello che ci si aspetta.
Public Function GetRecNum() As Long
On Error GoTo erh
Debug.print CodeContextObject.Type, CodeContextObject.Name, CodeContextObject.RecordSource
With CodeContextObject
....
Da li si guarda cosa succede e perchè...
Ciao