Access SQL-SQL Server 2008(Клиент сервер)

Есть код кнопки на форме добавлящая(как задумывалось) Данные в связанные таблицы, но пишет мол "run time-error 3027" Обновление невозможно. База данных или объект доступны только для чтения.

Private Sub Кнопка24_Click()
Dim dbs As Variant
Set dbs = CurrentDb

Dim dataPersonalAdd As Recordset
Set dataPersonalAdd = dbs.OpenRecordset("dbo_Принятые сотрудники", dbOpenDynaset)
With dataPersonalAdd
.AddNew
![Табельный №] = Me![Табельный №]
![ФИО] = Me![ФИО]
![Должность] = Me![Должность]
![Дата приема] = Me![Дата приема]
![Отдел] = Me![Отдел]
.Update
End With

Dim rst As Recordset
Set rst = dbs.OpenRecordset("dbo_Сотрудники", dbOpenDynaset)
With rst
.AddNew
![Табельный №] = Me![Табельный №]
![ФИО] = Me![ФИО]
![Должность] = Me![Должность]
![Дата приема] = Me![Дата приема]
![Отдел] = Me![Отдел]
' .Update
End With

Set rst = dbs.OpenRecordset("dbo_Сотрудники ДОПОЛНИТЕЛЬНО", dbOpenDynaset)
With rst
.AddNew
![Табельный №] = Me![Табельный №]
'.Update
End With



dbs.Close
End Sub

Модератор: Тема перенесена из форума "Microsoft SQL Server".

Где находятся таблицы? Судя по префиксу dbo - SQL Server. Как с ними производится связь? Есть ли у юзера права на редактирования? Какая версия Акса?
Почему нельзя ввести данные прямо с формы?
Какого рожна нужны две таблицы с одинаковой структурой "dbo_Принятые сотрудники" и "dbo_Сотрудники" и что за табла dbo_Сотрудники ДОПОЛНИТЕЛЬНО?
Какого хрена Dim dbs As Variant? Почему не Dim dbs As Database?

Может из-за индексов?Где-то уже было...

Руками записи в эти таблицы добавляются?