Локальное сохранение таблиц при использовании ADO

[Leon_]

Возможно ли сохранять некоторые таблицы локально при использовании ADO?
В приложении предполагается сохранение данных на переднем плане. При использовании модели DAO я хранил таблицы БД смешанно: специфичные для пользователя данные -- локально в файле qwerty.mdb, собственно данные базы -- удаленно (связанные таблицы) в файле qwerty_be.mdb. Смогу ли я продолжить сохранение некоторых данных в локальных таблицах?

[Konst_One]

rs.Save FileName, adpersistxml

[alibek]

Не о том речь.

Используй такую-же схему, в ADO тоже реализованы связанные таблицы.

[Leon_]

Не совсем точно сформулировал..

Собираюсь перевести используемую базу с MDB+DAO на (MS SQL Server)+DAO. Краем уха слышал, что в этом варианте сохранение на переднем плане недоступно.
Подскажите какие-нибудь идеи по этому поводу?

[Andrey Fedorov]

Если уж переводить то MS SQL Server+ADO.

DAO уже свое отжила - ADO намного удобней...

[Leon_]

с MDB+DAO на (MS SQL Server)+DAO

Это я описался (в смысле -- оговорился ). Конечно на ADO.
Но не стоит списывать со счетов DAO, она нам еще послужит

При конвертации "приложения MDB" на Access в "проект APJ" возможны варианты как "чистого проекта клиент-сервер", так и продолжение использования "связанных" таблиц (источниками для них могут быть как *.mdf так и *.mdb файлы баз данных).
Меня же интересует именно вариант "чистого" клиент-сервера. Как при этом можно локально хранить таблицы (желательно, в *.mdb, или в Persisting Recordsets), чтобы иметь возможность редактировать их напрямую из форм проекта Access?
Нашел какие-то отсылки к MSDataShape, но толком пока ничего не получилось.

[Andrey Fedorov]

Да какие проблемы-то у тебя - непонятно...

У формы Access-a есть свойство Recordset. Этому свойству ты можешь подсунуть Recordset созданный на основе как локальной так и серверной таблицы или на их связке. Все примитивно.

А вообще писать на Access-e довольно неудобно - убог он по своим возможностям (сам несколько лет с ним раньше работал)...

[Leon_]

У формы Access-a есть свойство Recordset. Этому свойству ты можешь подсунуть Recordset созданный на основе как локальной так и серверной таблицы или на их связке.

Для проекта Access в варианте "клиент-сервер" (см. выше), так работать не будет. Такой Recordset не будет обновляемым.

Вот во что я уперся, и никак ни могу найти лазейку:

Microsoft Access forms will only allow you to edit data from an ADO recordset if the ADO recordset is created by using a combination of the MSDataShape and SQL Server OLEDB providers.

[Andrey Fedorov]

Для проекта Access в варианте "клиент-сервер" (см. выше), так работать не будет. Такой Recordset не будет обновляемым

Чего ради? Прекрасно обновлялся, насколько помню - если, конечно, он построен на обновляемом запросе.

Кстати, сам пишу на VB под SQL и такие Recordset-ы подсовываются Grid-ам постоянно - думаешь у меня все не работает?

[Leon_]

Прекрасно обновлялся, насколько помню - если, конечно, он построен на обновляемом запросе.

Я пытаюсь просто связать с формой в проекте Access таблицу, которая хранится не на MS SQL Servere. Да так связать, чтобы ее можно было редактировать из формы. При чем здесь Grid?

Код: Выделить всё

SELECT * FROM tblPack

Разве такой запрос не обновляемый?

Кстати, сам пишу на VB под SQL и такие Recordset-ы подсовываются Grid-ам постоянно - думаешь у меня все не работает?

Покажи пример тогда, разберу.

[Andrey Fedorov]

Сейчас попробовал с Access-ом (ибо давно с ним уже не работаю).

Сам-то Recordset, как и следовало ожидать, получается обновляемый - с ним все нормально. В него записи добавляются и редактируются.

А вот форма, которой он присваивается, действительно открывается как необновляемая. В чем тут дело на скорую руку непонять - ибо влезать опять в потроха Access-a и экспериментировать совершенно нехочется. Может еще кто подскажет...

Код в форме пробовал такой:

Код: Выделить всё

Private Sub Form_Load()
    Dim cn As New ADODB.Connection
    Dim r As New ADODB.Recordset
   
    cn.Provider = "Microsoft.Jet.OLEDB.4.0"
    cn.Open "Data Source=" & CurrentProject.Path & "\Table.mdb"
    r.Open "SELECT * FROM [Table]", cn, adOpenStatic, adLockOptimistic
   
    Set Recordset = r
End Sub

Да, если этот код заменить на

RecordSource = "SELECT Table.* FROM [Table] IN 'Table.mdb'"

То форма редактируется нормально.
В принципе запрос может включать таблицы из нескольких баз.
Может этого для тебя и будет достаточно.

P.S. Беги от этого Access-a при первой возможности иначе чем дальше тем больше подобных ограничений будет попадаться...