powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Опять проблемма Экспорта таблиц в другую базу
4 сообщений из 4, страница 1 из 1
Опять проблемма Экспорта таблиц в другую базу
    #32829353
Sergei K
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
подскажите, где ошибка???
первый экспорт из таблицы в таблицу проходит без проблемм таблица b1 полностью копируется в другую базу

а таблица b2 должна копироваться не полностью, а только те записи в которых в поле vladelets значится "klient_A"
чтото я запарился с этим СЕЛЕКТОМ.....

============================================================
Private Sub Knopka0_Click()

DoCmd.TransferDatabase acExport, "Microsoft Access", "C:\00\data_00.mdb", acTable, "b1", "b1999", False


DoCmd.TransferDatabase acExport, "Microsoft Access", "C:\00\data_00.mdb", acTable, "SELECT b2.* FROM b2 WHERE (((b2.vladelets)='klient_C'));", "b22222", False


End Sub
==========================================================

и как создать новый файл c:\00\data_00.mdb если его ещё там нет, а если он там есть, удалить и создать новый..
...
Рейтинг: 0 / 0
Опять проблемма Экспорта таблиц в другую базу
    #32829384
Сергей 02
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
If Dir("C:\...\Имя.mdb"<> "" Then Kill "C:\...\Имя.mdb"
FileCopy "c:\...\ПустойШаблон.mdb", "C:\...\Имя.mdb"
...
Рейтинг: 0 / 0
Опять проблемма Экспорта таблиц в другую базу
    #32829419
Фотография Alexander G
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
в справке ясно сказано
источник - Строковое выражение, представляющее имя объекта, являющегося источником данных при импорте, экспорте или связывании.
А про то, что источник может быть селектом - ничего...
...
Рейтинг: 0 / 0
Опять проблемма Экспорта таблиц в другую базу
    #32830977
Sergei K
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Private Sub Knopka4_Click()

If Dir("C:\00\data_00.mdb") <> "" Then Kill "C:\00\data_00.mdb"

FileCopy "c:\11\0_DATA.mdb", "C:\00\data_00.mdb"

DoCmd.TransferDatabase acExport, "Microsoft Access", "C:\00\data_00.mdb", acTable, "b1", "b1_A", False


DoCmd.TransferDatabase acExport, "Microsoft Access", "C:\00\data_00.mdb", acTable, "b2", "b2_A", False

=================================
= ? => как теперь из таблицы "b2_A" удалить все записи кроме "Klient_A"
===================================

End Sub
...
Рейтинг: 0 / 0
4 сообщений из 4, страница 1 из 1
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Опять проблемма Экспорта таблиц в другую базу
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]