Welkom bij de Tweaking4All gemeenschapsforums!
Voor je gaat deelnemen, bekijk de Forum Regels!
Specifieke onderwerpen: Start het onderwerp met de naam van het programma of systeem.
Bijvoorbeeld “MacOS X – Jouw vraag“, of bijvoorbeeld “MS Word – Jouw Tip of Truc“.
Merk op: Omschakelen naar een andere taal zal niet werken als je een post aan het lezen bent aangezien er waarschijnlijk geen vertaling beschikbaar is.
[Opgelost] Delphi - Hoe maak je een lege MS Access file aanm (mbd)
Delphi, Lazarus, Free Pascal
(@hans)
Famed Member Admin
Deelgenomen: 12 jaar geleden
Berichten: 2864
Topic starter
25 oktober 2013 1:10
uses comobj,sysutils;
...
function CreateAccessDatabase(FileName : String) : String;
var mdb : OLEVariant;
begin
result := '';
try
mdb := CreateOleObject('ADOX.Catalog');
mdb.create('Provider=Microsoft.Jet.OLEDB.4.0;DataSource='+Filename+';');
mdb := NULL;
except on e : Exception do
result := e.message;
end;
end;
