Как создать файл БД Access динамически ?

← →
UnDISCOvery (2002-07-26 12:24) [0]

Можно ли создать БД Акцесс динамически ? Например какимнить запросом типа CREATE DATABASE ?

← →
UnDISCOvery (2002-07-26 13:24) [1]

Нашел вот такую процедурку ...
procedure CheckBase;
var
DBEngine, Workspace: Variant;
const {Important to use the following constant as is}
dbLangGeneral = ";LANGID=0x0409;CP=1252;COUNTRY=0";
dbVersion30 = 32;
begin
if not FileExists(BaseDir+"\svnBase.mdb") then begin
//DBEngine := CreateOleObject("DAO.DBEngine");
DBEngine := CreateOleObject("DAO.DBEngine.36"); {For DAO 3.6}
Workspace := DBEngine.Workspaces[0];
try
Workspace.CreateDatabase(BaseDir+"\svnBase.mdb",
dbLangGeneral, dbVersion30);
except
on EOleException do ShowMessage("Database already exists");
end;
end;
Может кто знает чего за параметры передаются ?
И как задать пароль и юзера ?
А то файл то создался, а открыть его нельзя ... :-/

Как создать файл БД Access динамически ? Найти похожие ветки