Как программно скопировать таблицу из одной базы в другую

@Lander · Регистрация: 23.10.2009

Студворк — интернет-сервис помощи студентам

как программно скопировать таблицу из одной базы в другую?
есть 2 базы: 1.mdb и 2.mdb
в 1ой базе таблица qwerty
во 2ой базе запрос qwerty.

надо скопировать из 1ой базы запрос qwerty во 2ю базу.
во 2й базе таблицу qwerty либо тупо заменить либо дописать к ней данные.
как это сделать? помогите..если можете, то кинте код!!

@coderxx · 01.03.2012, 18:40

Так:

SQL
1
2
3
INSERT INTO ТаблицаВКоторуюНадоПеренестиДанные (столбцы таблицы через запятую) IN 'C:\Documents and Settings\.....путь к файлу другой базы\ИмяФайла.mdb'
SELECT ТаблицаИзКоторойБеремДанные.СтолбцыВторойТаблицыЧерезЗапятую
FROM ТаблицаИзКоторойБеремДанные;

@Lander · 05.03.2012, 16:46 **[ТС]**

значит так:
имя таблицы в которую надо перенести данные - users(login,password,name)
путь к файлу другой базы: - 'D:\1\2.mdb'
Таблица из которой берем данные.столбцы - 1.mdb(login,password,name)
таблица из которой берем данные: - 1.mdb

то есть получается:

Visual Basic
1
insert into users(login,password,name) in "D:\1\2.mdb" select 1.mdb(login,password,name) from 1.mdb

и у меня выдает ошибку..ругается на

Visual Basic
1
users

в чем проблема? я не так написал запрос?.

@coderxx · 05.03.2012, 17:00

Как ругает? Есть текст ошибки?

Сообщение от Lander

insert into users(login,password,name) in "D:\1\2.mdb" select 1.mdb(login,password,name) from 1.mdb

Вторая таблица с точками и называется как 1.mdb? И после select не нужно скобки (), а нужен точки с названием таблицы перед каждой колонкой.

@Lander · 05.03.2012, 17:13 **[ТС]**

текста ошибки нет.просто подсвечивает его и все.

Добавлено через 3 минуты

Visual Basic
1
Insert into users(Login, Password, Names) in "D:\1\1.mdb" select users.Login users.Password users.Names from users;

вот так? все равно ругается на

Visual Basic
1
users

компилятор подсвечивает эту строчку красным цветом, и выделяет

Visual Basic
1
users

@coderxx · 05.03.2012, 18:10

Ты прямо вставил код на окно? Выглядит должно так:

Visual Basic
1
2
3
4
5
Dim OldDb As DAO.Database
Set OldDb = Workspaces(0).OpenDatabase("Путь к моей базе")
OldDb.Execute "Insert into users(Login, Password, Names) In 'D:\1\1.mdb' Select users.Login, users.Password, users.Names From users"
OldDb.Close
Set OldDb = Nothing

И нужно подключить библиотеку Microsoft DAO (для моего примера).

@Lander · 06.03.2012, 10:16 **[ТС]**

выдает такую вот ошибку:

@coderxx · 06.03.2012, 19:54

У тебя база какая версия?

@Lander · 11.03.2012, 11:07 **[ТС]**

он у меня тупо копирует данные с таблицы которые уже были повторно, а новых туда не заносит...

@coderxx · 11.03.2012, 22:02

Как узнать новые данные, они чем-то отличается, например датой, номером, ...
Если есть разницы, то их можно использовать в запросе Select * From Where

Новые блоги и статьи Все статьи Все блоги /
Подстановка значения реквизита справочника в табличную часть документа Maks 10.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: при выборе сотрудника (справочник Сотрудники) в ТЧ документа. . .	Очистка реквизитов документа при копировании Maks 09.04.2026 Алгоритм из решения ниже применим как для типовых, так и для нетиповых документов на самых различных конфигурациях. Задача: при копировании документа очищать определенные реквизиты и табличную. . .	модель ЗдравоСохранения 8. Подготовка к разному выполнению заданий anaschu 08.04.2026 https:/ / github. com/ shumilovas/ med2. git main ветка * содержимое блока дэлэй из старой модели теперь внутри зайца новой модели 8ATzM_2aurI	Блокировка документа от изменений, если он открыт у другого пользователя Maks 08.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа, разработанного в конфигурации КА2. Задача: запретить редактирование документа, если он открыт у другого пользователя. / / . . .
Система безопасности+живучести для сервера-слоя интернета (сети). Двойная привязка. Hrethgir 08.04.2026 Далее были размышления о системе безопасности. Сообщения с наклонным текстом - мои. А как нам будет можно проверить, что ссылка наша, а не подделана хулиганами, которая выбросит на другую ветку и. . .	Модель ЗдрввоСохранения 7: больше работников, больше ресурсов. anaschu 08.04.2026 работников и заданий может быть сколько угодно, но настроено всё так, что используется пока что только 20% kYBz3eJf3jQ	Дальние перспективы сервера - слоя сети с космологическим дизайном интефейса карты и логики. Hrethgir 07.04.2026 Дальнейшее ближайшее планирование вывело к размышлениям над дальними перспективами. И вот тут может быть даже будут нужны оценки специалистов, так как в дальних перспективах всё может очень сильно. . .	Горе от ума kumehtar 07.04.2026 Эта мне ментальная установка, что вот прямо сейчас, мол, мне для полного счастья не хватает (нужное вписать), и когда я этого достигну - тогда и полный кайф. Одна из самых сильных ловушек на пути. . . .

@Lander 0 / 0 / 0 Регистрация: 23.10.2009 Сообщений: 51

	Как программно скопировать таблицу из одной базы в другую 01.03.2012, 15:14. Показов 3370. Ответов 9 Метки нет (Все метки) как программно скопировать таблицу из одной базы в другую? есть 2 базы: 1.mdb и 2.mdb в 1ой базе таблица qwerty во 2ой базе запрос qwerty. надо скопировать из 1ой базы запрос qwerty во 2ю базу. во 2й базе таблицу qwerty либо тупо заменить либо дописать к ней данные. как это сделать? помогите..если можете, то кинте код!! 0

@Lander 0 / 0 / 0 Регистрация: 23.10.2009 Сообщений: 51
	06.03.2012, 10:16 [ТС]
	выдает такую вот ошибку: Миниатюры 0

@coderxx 469 / 183 / 16 Регистрация: 25.02.2012 Сообщений: 418 Записей в блоге: 2
	06.03.2012, 19:54
	У тебя база какая версия? 0

@Lander 0 / 0 / 0 Регистрация: 23.10.2009 Сообщений: 51
	11.03.2012, 11:07 [ТС]
	он у меня тупо копирует данные с таблицы которые уже были повторно, а новых туда не заносит... 0

@coderxx 469 / 183 / 16 Регистрация: 25.02.2012 Сообщений: 418 Записей в блоге: 2
	11.03.2012, 22:02
	Как узнать новые данные, они чем-то отличается, например датой, номером, ... Если есть разницы, то их можно использовать в запросе Select * From Where 0