Скачать: 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 вся ветка

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



Память: 0.45 MB
Время: 0.009 c