[Den-is]

Немного изменил код:

with form1.ADOQuery1 do begin
active:=false;
sql.Clear;
sql.Add('update sotrudniki, attestacia_itr');
sql.Add('set attestacia_itr.at1 = "'+datetostr(datetimepicker1.DateTime)+'"');
sql.Add('where (sotrudniki.tabel = attestacia_itr.tabel) and (sotrudniki.check = Да)');
execSQL;
end;

Ошибка вот какая:
Безымянный.jpg