Удаление данных из базы MSSQL через Access

blunt BOO
Дата: 27.11.2006 13:57:07
Не нашел ответы на свои вопросы поиском поэтому пишу :)

У меня есть база Access содержащая несколько таблиц внутри, туда же прицеплена база MSSQL через ODBC, при выборке данных вопросов не возникает, данные из базы MSSQL подтянуты с помощью Query в Access, а вот удаление данных с формы в Access, вызвало трудности.
Как удалить такие данные?

Если я пишу просто в коде

    Dim db As Database
    Dim qd As QueryDef
    Dim strSQL As String
    Dim rs As Recordset
    
    Set db = CurrentDb
    
    strSQL = "DELETE * FROM dbo_ManagementReportXOrderTypes where ManagementRepID = " & CStr(ReportList.Value) & " and OrderTypeID = " & CStr(ReportXOrderTypes.Value) & ";"
    
    Set qd = db.CreateQueryDef("", strSQL)
    qd.Execute

где dbo_ManagementReportXOrderTypes - query в Access, выбранны данные из MSSQL,
то у меня возникает ошибка 3086
Joss
Дата: 27.11.2006 14:14:42
blunt BOO


   
    Set qd = db.CreateQueryDef("", strSQL)
    qd.Execute
А почему нельзя просто
CurrentDB.Execute strSQL
adv
Дата: 27.11.2006 14:15:02
на всякий

подобный селект записи возаратит?
права на удаление есть?
дебагпринт покажете?
adv
Дата: 27.11.2006 14:17:32
adv
на всякий
ссылку вставил неправильно

новая
ILL HEAD
Дата: 27.11.2006 14:18:45
автор
где dbo_ManagementReportXOrderTypes - query в Access, выбранны данные из MSSQL

dbo_ManagementReportXOrderTypes - это запрос к серверу ?
blunt BOO
Дата: 27.11.2006 14:36:07
Joss
blunt BOO


   
    Set qd = db.CreateQueryDef("", strSQL)
    qd.Execute
А почему нельзя просто
CurrentDB.Execute strSQL


выдает ту же ошибку - Could not delete from specified tables.

Может быть, query нельзя редактировать??? Тогда пойду по другому пути, прилинковал таблицу на сервере. Получил уже во - это
You must use the dbSeeChanges option with OpenRecordset when accessing a SQL Server table that has an IDENTITY column.


Права на удаление есть!
ILL HEAD
Дата: 27.11.2006 14:43:03
CurrentDB.Execute strSQL, dbSeeChanges
blunt BOO
Дата: 27.11.2006 14:47:17
ILL HEAD
CurrentDB.Execute strSQL, dbSeeChanges

Спасибо огромное, все заработало :)
ILL HEAD
Дата: 27.11.2006 14:51:49
надо внимательно читать сообщения акцесса и пользовать F1