Ver Mensaje Individual
  #4  
Antiguo 30-04-2008
Avatar de cHackAll
[cHackAll] cHackAll is offline
Baneado?
 
Registrado: oct 2006
Posts: 2.159
Reputación: 22
cHackAll Va por buen camino
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;
Responder Con Cita