Hello I have a query QProvvisori and a form Provvisorio.
In the form I created a combobox to find a specific record using the email
the combo has the following query:
SELECT Anagrafica.eMai l, QProvvisorio.Da taPrimoContatto , Anagrafica.Cogn omeRagioneSocia le, Anagrafica.Nome
FROM QProvvisorio INNER JOIN Anagrafica ON QProvvisorio.Id Anagrafica = Anagrafica.IdAn agrafica
WHERE (((Anagrafica.e Mail) Is Not Null))
ORDER BY Anagrafica.eMai l;
the code is
Private Sub CasellaCombinat a204_AfterUpdat e()
' Trova il record corrispondente al controllo
Dim rs As Object
Set rs = Me.Recordset.Cl one
rs.FindFirst "[eMail] = '" & Str(NZ(Me![CasellaCombinat a204], 0)) & "'"
If Not rs.EOF Then Me.Bookmark = rs.Bookmark
End Sub
it does not retrieve the record and gives errore in the rs.FindFirst
Anybody can help?
thank you
In the form I created a combobox to find a specific record using the email
the combo has the following query:
SELECT Anagrafica.eMai l, QProvvisorio.Da taPrimoContatto , Anagrafica.Cogn omeRagioneSocia le, Anagrafica.Nome
FROM QProvvisorio INNER JOIN Anagrafica ON QProvvisorio.Id Anagrafica = Anagrafica.IdAn agrafica
WHERE (((Anagrafica.e Mail) Is Not Null))
ORDER BY Anagrafica.eMai l;
the code is
Private Sub CasellaCombinat a204_AfterUpdat e()
' Trova il record corrispondente al controllo
Dim rs As Object
Set rs = Me.Recordset.Cl one
rs.FindFirst "[eMail] = '" & Str(NZ(Me![CasellaCombinat a204], 0)) & "'"
If Not rs.EOF Then Me.Bookmark = rs.Bookmark
End Sub
it does not retrieve the record and gives errore in the rs.FindFirst
Anybody can help?
thank you