Форумы HiProg.com - MS ACCESS, VBA, VB

ник: джониби
ахах))и вправду)))
Но блин хоть убейте меня,поправил, не работает всё равно )))

ids = DLookup("[Код сотрудника]", "Сотрудники", "[Ответственный за эксплуатацию] ='" & Me.ПолеСоСписком0.Value & "'")     CurrentProject.Connection.Execute "UPDATE Сотрудники SET Сотрудники.WesternUnion = " & Me.Поле2.Value & " WHERE (Сотрудники.Код_сотрудника= " & ids & ") ;"

и так не работает

CurrentProject.Connection.Execute "UPDATE Сотрудники SET Сотрудники.WesternUnion = " & Me.Поле2.Value & " WHERE (Сотрудники.Код_сотрудника= '" & ids & "') ;"