Создание БД (MDB) кодом

[alibek]

Вот такой вот вопросик

Вообщем, хочу я, чтобы программа сама создавала базу данных, если таковой не найдено при запуске. У БД есть определенная структура. Также, при создании надо заполнить данными некоотрые таблички.

Велосипед изобретать (создавая БД кодом) мне надоело, хочу сделать, как это принято в цивилизованном мире -- создавать его c помощью SQL DDL.

Теперь, внимание, вопрос
Как из MDB получить его DDL?
Самое простое -- преобразовать в MSSQL (MSDE) и каким-нибудь SQL-менеджером посмотреть структуру. Но во-первых, не хочу ставить MSDE, а во-вторых, неужели нет способа проще?

[GSerg]

Ну, вот, в принципе, платный продукт вроде как для этого

[alibek]

Хм... Ни скриншоты посмотреть, ни описания не почитать, ни триал скачать. Даже цену не посмотреть.
А нет ли чего другого? Желательно бесплатного

[GSerg]

Я думаю, ты сам на ADOX быстро напишешь генератор DDL

[alibek]

Сам спросил, сам ответил

http://www.russianit.ru/load/freeware/
http://rsdn.ru/article/files/progs/BatchAccess.xml

Полевые испытания не проводились, но из тестовой базы структуру извлек правильно.

[GSerg]

FW требует - клиенты не будут против?

[alibek]

Ну эта утилитка нужна только мне
Я просто базу рисую в Access, а затем, когда все будет доделано, выгружу в SQL, и этот SQL встрою в программу (в ресурсы или еще куда).

[VVitafresh]

Есть еще такая ВЕСТЧ Sybase Power Designer-- кроме собственно создания Physical Data Model и кода генерации БД умеет и многое другое. Но, к сожалению, не бесплатно да и размерчик дистрибутива не маленький.

[VVitafresh]

alibek, а как ты будешь SQL из ресурсов применять на стороне клиента без этой утилитки (BatchAccess)?

[GSerg]

Сам как думаешь?

[VVitafresh]

Ну не знаю
Наверное, руками через ADOX создавать пустую базу, потом парсить сохраненный набор SQL команд и применять их последовательно...
Только я не в курсе поддерживает ли Access команды DDL в полном объеме (очень сомнительно).

[GSerg]

Что значит парсить?
execute()

[VVitafresh]

GSerg, хочешь сказать что через execute() можно выполнить нечто такое (сгенерированное BatchAccess):

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

-- SQL script generated using BatchAccess utility
-- Tables
CREATE TABLE Manager (
    Birthday                DateTime,
    FirstName               Text(50) NOT NULL,
    LastName                Text(50) NOT NULL,
    manager_id              AutoIncrement NOT NULL,
    MiddleName              Text(50),
    Sex                     Bit NOT NULL,
    CONSTRAINT Manager_PK PRIMARY KEY (manager_id)
);
-- Constraints
-- Indexes
-- Views
-- Procedures
-- End


Не очень то верится...

[GSerg]

Несомненно.
Причём даже в Access 97.

[VVitafresh]

GSerg, я не поленился проверить:

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

Private Sub cmdDDL_Click()
    Dim cnAccess As ADODB.Connection
    Dim SQL As String
    Set cnAccess = OpenCnAccess(App.Path & "\test.mdb", "") 'Открываем соединение
   
    SQL = ReadSQL(App.Path & "\test.sql")   'Читаем содержимое файла с SQL-скриптом
    cnAccess.Execute SQL
End Sub

test.mdb -- чистая база, test.sql -- содержимое приведенного ранее SQL-скрипта.
Получаем в результате:

Run-time error:
-2147217900 - Ошибочная инструкция SQL; предполагалось 'DELETE', 'INSERT', 'PROCEDURE', 'SELECT' или 'UPDATE'.

[GSerg]

VVitafresh
Я ведь тоже не поленился проверить.
Ты просто каменты не вырезал. Вырежи.

[VVitafresh]

Хе-хе.
Так а смысл тогда какой каждый раз комменты вырезать? Так не интересно. Если уж использовать генерилку то так: изменил что-то в базе, сгенерил скрипт, применил его у клиента -- ВСЕ.

[GSerg]

Судя по тому, что генерилка выдаёт, она выдаёт это для человека.
Соответственно, либо в ней есть ключик, регулирующий каменты, либо вырезать каменты, ибо в данном случае это просто.

[VVitafresh]

И все-таки, я думаю, лучше у клиента выполнять DDL по-командно:
во-первых точно будешь знать не каком этапе произошла ошибка (если она есть),
а во-вторых неизвестно еще какой длины SQL-скрипт (даже без комментов) способен принять Access -- подозреваю не очень большой.

Но еще больше мне нравится подход, когда по физической модели генерится полноценный код VB6 создания базы через ADOX -- это реализовано в Sybase Power Designer. Правда, я его не сильно юзал, так посмотрел, покрутил (с наскоку там не сильно разбежишься). Да и не было у меня таких крупных проектов, где это могло бы пригодиться.

[GSerg]

VVitafresh
Модуль для создания БД кодом Алибеком выложен давно.
Это именно то, от чего в данном топике стараются уйти.

[VVitafresh]

GSerg, если ты имеешь в виду: http://bbs.vbstreets.ru/viewtopic.php?t=13474, то это не совсем то, про что я говорил.
Я имел в виду создание полностью готового модуля с кодом на VB, который достаточно подключить к проекту и использовать. Модуль этот генерится по графической схеме БД, в которой указаны типы полей, связи между таблицами и т.п.

Изменил что-то в схеме, сгенерировал код модуля и заменил старую версию -- вот и все что требуется. Но, я думаю, это нужно больше для баз со сложной структурой (десятки и даже сотни таблиц), для более простых такой подход, возможно, и не оправдан.

[alibek]

alibek, а как ты будешь SQL из ресурсов применять на стороне клиента без этой утилитки (BatchAccess)?

Ты видимо не понял, что мне нужно.

У меня есть программа, работающая с БД.
Программа должна уметь создавать эту БД самостоятельно.
Писать создание БД (структуры, индексов, изначальных данных) кодом мне лениво, да и неправильно это.
Поэтому я создаю БД в Access, в котором достаточно удобный конструктор. Данными заполняю также в Access, ибо там это достаточно удобно. И запросы отлаживаю тоже в Access -- удобно.
Когда БД будет сделана окончательно, надо чтобы программа умела создавать такую БД с нуля.
Самое простое -- сунуть БД в ресурсы и при необходимости выгружать в файл. Не нравится -- коряво.
Другой вариант -- создавать всю структуру и данные кодом. Не нравится -- неудобно вносить изменения в код при изменении структуры БД, неудобно отлаживать, из кода сложно понять, что за таблица будет.
Третий вариант -- создавать БД SQL-кодом. Нравится -- просто и наглядно, при необходимости SQL-код редактируется в любом редакторе.

[VVitafresh]

alibek, я прекрасно понял что тебе нужно с самого начала.

Меня заинтересовал вопрос реализации именно завершающего этапа: создание БД SQL-кодом (который описывает структуру) на стороне клиента. Вот именно это мне интересно.
Просто через execute() прогнать весь скрипт, предварительно убрав комменты (как написал GSerg), или как-то иначе?

[alibek]

Фактически, да.
Только не одним большим скриптом, а по скрипту на табличку. И прогресс можно отслеживать, и будет возможность создать не всю БД с нуля, а восстановить только одну или несколько поврежденных таблиц.