Crear BD Accsess desde cero

[cyber_zero]

Empezado por cHackAll

Código Delphi [-]uses ComObj;

procedure TForm1.Button1Click(Sender: TObject);
var db: OleVariant;
begin
db := CreateOleObject('dao.dbengine.36');
db := db.CreateDatabase('c:\nooBD.mdb', ';langid=0x040a;cp=1252;country=0');
db.Execute('create table Tabla(id int, name char(66))'); // Strings + SQL ...
end;

Hola buenos dias, disculpa el codigo que pusiste me resulto muy util y te agradezco la aportacion, solo tengo unas dudas, ¿¿es posible crear con las tablas, consultas y relaciones???, de ante mano muchisimas gracias y que tengas un excelente dia