Вниз
Скачать: CL | DM;

Как создать файл БД 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;
Может кто знает чего за параметры передаются ?
И как задать пароль и юзера ?
А то файл то создался, а открыть его нельзя ... :-/



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.009 c
1-48016
Brand
2002-07-31 00:53
2002.08.15
RichEdit + Memo


1-48059
Deuss
2002-08-04 12:00
2002.08.15
BlockRead & BlockWrite


14-48299
Ajax
2002-07-19 22:48
2002.08.15
Extensis Fotoframe


1-48062
diMAN
2002-08-02 19:05
2002.08.15
Ошибка при запуске программы


1-48019
Alex
2002-08-02 22:48
2002.08.15
Шутка юмора




   Наверх