| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Программное создание БД Access [D6, Access]
saNat © (2005-09-18 02:46:00)Доброго времени суток (о:
Подскажите пожалуйста, как программно создать файл БД Access. Связь посредством ADO.
С уважением, ЕВА
saNat (2005-09-18 17:58:00) [1]Спасибо. Нашел уже пару вариантов через OLE... Но чтото кажется мне что был другой простой и красивый вариант...
menart (2005-09-18 14:40:00) [2]http://excode.ru/?mod=article&id=text&artid=365&action=showart&page=1&ex=1b6f3a9a571224b6fd43011999dd4556
menart (2005-09-18 13:43:00) [3]
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 = 32;
begin
DBEngine := CreateOleObject('DAO.DBEngine');
{DBEngine := CreateOleObject('DAO.DBEngine.35'); For DAO 3.5}
Workspace := DBEngine.Workspaces[0];
try
Workspace.CreateDatabase(filename, dbLangGeneral, dbVersion30);
except on EOleException do
ShowMessage('Database already exists');
end;
end;
Anatoly Podgoretsky (2005-09-18 13:20:00) [4]В синтаксисе SQL команды не видать, наверно надо работать через OLE автоматизацию или использовать шаблоны из ресурса или отдельной папки.
| |
