Семя автонумерации сброса

У меня есть приложение VB6/Access, которое иногда встречается с проблемой с неправильным полевым семенем автонумерации.

Позволяет говорят, что существует таблица MYTABLE с полем ID автонумерации (который является также первичным ключом). Позволяет говорят в данный момент, что максимальное значение идентификатора 1000. Когда приложение вставляет новую запись (Значение идентификатора не обеспечивается явно), по некоторым причинам это решает, что следующее значение поля автонумерации 950 (а не 1001, как это должно быть) - таким образом, ошибка нарушения первичного ключа происходит.

Я нашел статью KB, которая описывает мои признаки: http://support.microsoft.com/kb/884185. Короче говоря, они предлагают выполнить запрос:

ALTER TABLE MYTABLE ALTER COLUMN ID COUNTER(1001,1)

Когда я пытаюсь сделать это, это перестало работать с "Недопустимым полевым типом данных"

Проблема решена, если я открываю базу данных в Доступе и действительно уплотняю/восстанавливаю, но я должен смочь решить такие проблемы в приложении: это установлено на нескольких тысячах ПК во всем мире, и просьба, чтобы люди уплотнили/восстановили с Доступом, не является опцией.

Я применяю ДАО DBEngine.CompactDatabase для выполнения уплотняют/восстанавливают в приложении, но оно не решает проблему семени, и необходимы некоторые дополнительные приемы.

Я надеюсь, что у кого-то есть идея для решения, я действительно близко к отчаянному

Спасибо все