програмное создание БД Access

← →
Std © (2006-05-12 02:15) [0]

Доброго времени суток. Подскажите пж как мне програмно создать файл БД аксеса?
Мне необходимо каждую неделю создавать файл бд(имя фйла задает пользователь) и выгружать в эту бд инфу.
создание таблицы в бд и заполнение таблицы то не проблема, а вот как создать программно файл с бд хз. поиски в Инете ничем не увенчались :(

← →
Alarm © (2006-05-12 08:33) [1]

http://www.swissdelphicenter.ch/en/showcode.php?id=2297

← →
Sergey13 © (2006-05-12 08:59) [2]

2 Std © (12.05.06 02:15)
Заведи файл-болванку с пустой БД и копируй его.

← →
Savek (2006-05-12 09:07) [3]

Еще вариант из и-нета:
procedure CreateMSAccessDB(filename : String); var DBEngine, Workspace: Variant; const {Important to use the following constant as is} dbLangGeneral = ";LANGID=0x0409;CP=1252;COUNTRY=0"; dbVersion30 = 64; begin if not FileExists(FileName+".mdb") then begin //DBEngine := CreateOleObject("DAO.DBEngine"); DBEngine := CreateOleObject("DAO.DBEngine.36"); //For DAO 3.5 Workspace := DBEngine.Workspaces[0]; try Workspace.CreateDatabase(filename, dbLangGeneral, dbVersion30); except on EOleException do ShowMessage("Database already exists"); end; end; end;

← →
Desdechado © (2006-05-12 11:37) [4]

БД на неделю - что-то неладно в датском королевстве

ну разве что...

програмное создание БД Access Найти похожие ветки