G
Guest
I have used this similar construction to do update from text boxes to a table but this one doesn't seem to work right and I am not sure what exactly is wrong
CurrentDb.Execute "UPDATE DISTINCTROW Screeners SET Screeners.LoginID = """ & Me![Text37] & """ AND Screeners.[First Name] = """ & Me![Text35] & """ And Screeners.[Last Name] = """ & Me![Text31] & """ And Screeners.[SSN] = """ & Me![Text46] & """ And Screeners.[Position] = """ & Me![Text44] & """ And Screeners.[Gender] = """ & Me![Text42] & """ Where ((Screeners.LoginID = """ & Me![Text52] & """));
What is basically is supposed to do is take the values in 6 text boxes and assign them to the values from the record in six seperate fields (LoginID, First Name, Last Name, SSN, Position, Gender), and it does this where the value of "LoginID" is equal to the value of a 7th text box. When I run the above code I get "Data Type Mismatch In Criteria Expression". Waht Exactly do I have wrong here, am an not sure what I need to change
Any help would be appreciate
CurrentDb.Execute "UPDATE DISTINCTROW Screeners SET Screeners.LoginID = """ & Me![Text37] & """ AND Screeners.[First Name] = """ & Me![Text35] & """ And Screeners.[Last Name] = """ & Me![Text31] & """ And Screeners.[SSN] = """ & Me![Text46] & """ And Screeners.[Position] = """ & Me![Text44] & """ And Screeners.[Gender] = """ & Me![Text42] & """ Where ((Screeners.LoginID = """ & Me![Text52] & """));
What is basically is supposed to do is take the values in 6 text boxes and assign them to the values from the record in six seperate fields (LoginID, First Name, Last Name, SSN, Position, Gender), and it does this where the value of "LoginID" is equal to the value of a 7th text box. When I run the above code I get "Data Type Mismatch In Criteria Expression". Waht Exactly do I have wrong here, am an not sure what I need to change
Any help would be appreciate