cosa dimentico o sbaglio??

[Elena78]

Scusate l'ignoranza...ma mi genera questo errore.. sicuramente è x il db che nn vede ma nn so cosa manchi...
Questo è il codice


TxtCognome.SetFocus
Cognome = Trim(TxtCognome.Text)
TxtNome.SetFocus
Nome = Trim(TxtNome.Text)
strsql = ""
strsql = strsql & "SELECT * FROM Anagrafica where Anagrafica.Cognome=" & Cognome
Set dbs = CurrentDb()
Set rs = dbs.OpenRecordset(strsql)
rs.MoveFirst
DoCmd.OpenForm "DettaglioAnagrafica"

e come errore dice che nn trova la tabella o la queery di input.. ma la tabella c'è-..

[darkblOOd]

Ciao Elena, come va?
Prova a passare il valore tra apici (sql vuole che si faccia così per le stringhe...)

strsql = strsql & "SELECT * FROM Anagrafica where Anagrafica.Cognome='" & Cognome &"'"

e poi la connessione al db è aperta? :master: Non vedo il codice...
:tongue:

[Elena78]

azzo la connessione...
Grazie provo!!

[darkblOOd]