Текущий архив: 2007.02.18;
Скачать: CL | DM;

Вниз

Как создать программно *.mdb БД   Найти похожие ветки 

← →
xazan ©   (2006-11-30 09:28) [0]

Здравствуйте! Кто знает как создать Access БД программно?

---

← →
Savek   (2006-11-30 10:10) [1]

То ли из DRKB то ли из DW5000 не помню уже, вот код

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;


---

← →
Jeer ©   (2006-11-30 14:23) [2]

1. экспорт, например из Excel в *.mdb
2. копирование существующего "безтабличного" *.mdb
....
N. Витийство.

---

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

Текущий архив: 2007.02.18;
Скачать: CL | DM;

Наверх

Память: 0.47 MB
Время: 0.03 c