Текущий архив: 2002.05.16;
Скачать: CL | DM;
Вниз
КАК програмно СОЗДАТЬ файл БД ACESS-a ? Найти похожие ветки
← →
ao1973 (2002-04-18 11:44) [0]КАК програмно СОЗДАТЬ файл БД ACESS-a ?
← →
sniknik (2002-04-18 11:48) [1]procedure TForm1.Button1Click(Sender: TObject);
var AdoEngine: Variant;
begin
if not FileExists(PathBase+"\MyBase.Mdb") then
try
AdoEngine:= CreateOleObject("ADOX.Catalog");
AdoEngine.Create("Provider=Microsoft.Jet.OLEDB.4.0;Data Source="+PathBase+"\MyBase.Mdb;Jet OLEDB:Engine Type=5;");
AdoEngine.ActiveConnection.Close;
AdoEngine:= Null;
except
on E: EADOError do DoIfError(E.Message);
on E: EOleException do DoIfError(E.Message);
on E: EDataBaseError do DoIfError(E.Message);
else DoIfError("
← →
Den_ (2002-04-18 13:11) [2]или использовать компонент KADAO - очень легко и просто создаст БД и все необходимое
Страницы: 1 вся ветка
Текущий архив: 2002.05.16;
Скачать: CL | DM;
Память: 0.44 MB
Время: 0.006 c
