|
|
| |
|
|
| | таблиц или данных? что значит удаленной? | |
| |
| |
| |
|
|
| | Есть файл db1.mdb c кнопкой на форме. Запускаю, нажимаю на кнопку. По нажатию кнопки должно произойти следующее: из db2.mdb таблицы Table1 ... Tablen переносятся в db3.mdb.
Вот так должно работать. | |
| |
| |
| |
|
|
| | Help по DoCmd.TransferDatabase | |
| |
| |
| |
|
|
| | Да, только этот метод работает с текущей БД. | |
| |
| |
| |
 25 Кб. |
|
| | см. приложение
нужна ссылка на DAO
в принципе можно и без нее если список таблиц получать через allTable | |
| |
| |
| |
|
|
| | создать пустую БД
прилинковаться к одной таблице, потом к другой и выполнить запрос на добавление - чего тут может не выходить? даже VBA редактор открывать не надо
я бы, конечно, сначала сохранил таблицу локально импортом - на всякий случай
а потом только "ранил эппенд квери" | |
| |
| |
| |
|
|
| | Он же хочет кнопкой, автоматом импорт таблиц. 
Значит надо либо создать таблицу со списком импортируемых таблиц и кодом их перебрасывать.
или перебрасывать все подряд , проверяя не системная-ли таблица ...
Public Function Import_Tablic(put_K_baze As String, Ima_tabl As String, NewNamrTablici As String)
'*************************************************************************
If Nalichie_Tablici_v_DRUGOY_BAZE(put_K_baze, Ima_tabl) = False Then Exit Function
Udalit_TABLICU (Ima_tabl)
DoCmd.TransferDatabase acImport, "Microsoft Access", put_K_baze, acTable, Ima_tabl, NewNamrTablici | |
| |
| |
