скопировать таблицу в mdb файле

[МNР]

При попытке из VB6 создать таблицу в baza.mdb командой
SELECT * into таблица2 FROM таблица1
Бейсик ругается: "Отсутсвует разрешение на изменение макета таблицы..."
Подключаюсь так:

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

Set conn = CreateObject("ADODB.Connection")
    stroka = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + "D:\BASA\baza.mdb" + ";Jet OLEDB:Database Password=123;"
    conn.Open stroka

Однако команда

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

DROP TABLE таблица2

выполняется без проблем. (если таблицу2 предварительно создать руками)
Разрешений никаких не нестраивал, все выставлено по умолчанию, пользователь один - admin
Подскажите что сделать?

[alibek]

SELECT * INTO? Это как?
Может лучше делать INSERT?

[Twister]

А разве не так:

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

insert into tblSomeTable (select * from tblOtherTable)

?

[МNР]

Команду

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

SELECT * into таблица2 FROM таблица1

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

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

insert into ...

предполагает что выходная таблица уже существует. Или нет?

[Twister]

Да, предполагает. А создать слабо?

[alibek]

Нет, таблица будет создана.
Но ты можешь создать таблицу и кодом.

[Twister]

Нет, таблица будет создана.

Разве??? Блин, нигде об этом не слышал...

[МNР]

Таблица не создается, только что проверил.
А создать действительно слабо. Лень перечислять поля после create table. Может есть более быстрый способ чтоб создать новую таблицу на основе структуры старой.

[alibek]

Правда не создается?
Хм... Ну тогда предварительно CREATE TABLE

[Twister]

Да ладно, один раз перечисли и всю жизнь пользуйся, не миллион же их...
ЩАС заглянул в книженку которая есть на работе, но копирование структуры таблиц не нашел...

[Summer.05]

А разве нельзя в Access скопировать уже имеющуюся таблицу, затем дать команду вставить. Пойдет запрос: только структуру или с данными? Ответ: структуру. И никаких проблем...
Там все просто.
Или я чего-нибудь не понял в теме топика?

[Nicky]

insert into вставляет записи в _существующую_ таблицу
select into _создает_ таблицу и вставляет записи

может ты делаешь select into при существующей таблице?

[Nicky]

А разве нельзя в Access скопировать уже имеющуюся таблицу, затем дать команду вставить.

"Копирование структуры":

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

select top 1 * into t2 from t1
delete from t2

[Antonariy]

может ты делаешь select into при существующей таблице?

select into предварительно дропает существующую таблицу.

"Копирование структуры":

Во-первых можно select top 0, чтобы без delete, во-вторых этим способом копируются только типы полей, а индексы, defaultы и т.п. - нет.

[Nicky]

select into предварительно дропает существующую таблицу

Хм, по крайней мере в DAO не дропает: "Таблица 't2' уже существует"

[Antonariy]

Запрос, выполняемый в самом аксе дропает. Или предупреждает, если предупреждения включены. А сам акс вроде использует dao?

[Nicky]

Проверил в Access 2000 через CurrentDb (DAO 3.6) - ругается см.выше

[alibek]

А сам акс вроде использует dao?

Насчет 2000 не уверен, но в XP используется ADO, хотя и DAO тоже подключена. Впрочем, в 2000 тоже подключены обе библиотеки.

[Nicky]

Опытным путем дошел до

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

Application.CodeProject.Connection.Execute "select * into t2 from t1"

Это вроде уже ADO, ошибка см.выше