[[cHackAll]]

Comienza a utilizar la búsqueda,
NO repitas hilos, utiliza las etiquetas...

en fin, lee nuestra Guía de estilos.

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
var db: OleVariant;
begin
 db := CreateOleObject('dao.dbengine.36');
 db := db.CreateDatabase('C:\Program Files\Borland\Delphi7\Projects\proyecto speciales\PIEI.mdb', ';langid=0x040a;cp=1252;country=0;pwd=HAclave');
 db.Execute('create table Inscripcion(nombre char (20), apelpat char(15), apelmat char(15), nocue int, carrera char(50), grupo char (5), nivel char(2), banco char(15), referencia int)'); // Strings + SQL ...
 db.Execute('create table Alumnobasico(nombre char (20), apelpat char(15), apelmat char(15), nocue int, carrera char(50) )'); // Strings + SQL ...
 Close;
end;

Saludos