powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Инструкция (IN C:\.....)
4 сообщений из 4, страница 1 из 1
Инструкция (IN C:\.....)
    #32672105
Фотография Access_Abuser
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Как будет звучать зопрос на языке SQL если мне необходимо с помощью запроса в одном *.mdb файле создать таблицу в другом ?
...
Рейтинг: 0 / 0
Инструкция (IN C:\.....)
    #32672122
Фотография Varan
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Можно так
Sub RunDDL(strPath As String, strSql As String)
'Подключиться к БД и выполнить запрос на создание таблицы
'Путь на бд - из таблицы PT.paths
Dim dbs As DAO.Database
'Подключитья к базе
Set dbs = OpenDatabase(strPath)
'Изменить структуру
dbs.Execute strSql
'Закрыть базу
dbs.Close

End Sub
...
Рейтинг: 0 / 0
Инструкция (IN C:\.....)
    #32672200
vam911
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
VaranМожно так
Sub RunDDL(strPath As String, strSql As String)
'Подключиться к БД и выполнить запрос на создание таблицы
'Путь на бд - из таблицы PT.paths
Dim dbs As DAO.Database
'Подключитья к базе
Set dbs = OpenDatabase(strPath)
'Изменить структуру
dbs.Execute strSql
'Закрыть базу
dbs.Close

End Sub

Жестоко
SELECT tbl1.* INTO tbl.name1 IN 'bd1.mdb' FROM ... WHERE ....

Ну или что-то в этом роде.
или
Создай запрос на добавление а в свойствах укажи БД.
...
Рейтинг: 0 / 0
Инструкция (IN C:\.....)
    #32672226
Фотография Serge Gavrilov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Код: plaintext
1.
2.
3.
currentdb.Execute "CREATE TABLE tbl1 (fName CHAR, sName CHAR);"
currentdb.Execute "SELECT * INTO tbl1 in 'C:\Library.mdb' FROM tbl1"
currentdb.Execute "DROP TABLE tbl1;"
...
Рейтинг: 0 / 0
4 сообщений из 4, страница 1 из 1
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Инструкция (IN C:\.....)
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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