Bretti,
Try changing ME.ID to something like ctlID
Dim ctlID as Control
set ctlID = me!ID
and
.seek "=", ctlID
(Access is a bit dodgy about direct references to objects when using seek)
also check that your control data type is the same as the field in the recordset otherwise the seek...