|
| How to create a Access-Database (mdb) without Access |  
|
|---|
| Using MS-Jet-Engine to create a *.mdb File | Product:
Delphi all versions | Category:
ADO/OLE-DB | Skill Level:
 | Scoring:  | Last Update:
02/03/2003 | Search Keys:
delphi delphi3000 article borland vcl code-snippet ADO Access mdb Database create Jet Engine | Times Scored:
17 | Visits:
8292 | Uploader: Alex Schlecht
Company: | Reference: N/A | | | Question/Problem/Abstract:
Using MS-Access-Databases with ADO is no problem in Delphi. But what to do if no Access is installed? How to create your Database? | Answer:
It's very simple to create a empty Access-Database (*.mdb File) using OLE. It's not necessary to have MS-Access installed on your computer. If an exception occures the error message will returned. After creating the DB you can create Tables with simple SQL-Statements.
uses comobj,sysutils;
function CreateAccessDatabase(FileName : String) : String;
var cat : OLEVariant;
begin
result := '';
try
cat := CreateOleObject('ADOX.Catalog');
cat.create ('Provider=Microsoft.Jet.OLEDB.4.0;Data Source='+Filename+';');
cat := NULL;
except
on e : Exception do result := e.message;
end;
end;
|
|
|
| |
Sign up to consume product discounts for Bronze memberships !
|
|
| |
Community Ad of
S. Carter |
|
| |
|
|
|
Sign Up
