view this codes and tell me what i did wrong. this update statement don't do anything


Code:
datGrouping.RecordSource = "UPDATE [Contacts] SET [Group] = '" & tempstring & "'"

datGrouping.RecordSource = "SELECT * FROM [Contacts] ORDER BY CompanyName"

datGrouping.Refresh