Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Conexión con bases de datos (https://www.clubdelphi.com/foros/forumdisplay.php?f=2)
-   -   Como agregar un campo a una BD de access (https://www.clubdelphi.com/foros/showthread.php?t=45568)

principiante22 07-07-2007 02:46:42

Como agregar un campo a una BD de access
 
Como puedo agregar nuevos campos a una Base de datos de Access ya existente??

Hasta ahora tengo estos codigos

Código Delphi [-]
procedure TNCurso.Button2Click(Sender: TObject);
var
Table : _Table;
Catalog: _Catalog;
ConnectionString, databasename, nombre, estudiante:String;
begin
nombre:=edit1.Text;
mes:=edit2.text;
DATABASENAME := fichero+'\cursos\'+nombre+'.mdb';
Catalog := CreateCOMObject(StringToGUID('ADOX.Catalog')) as _Catalog;
ConnectionString := 'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=' +  DATABASENAME;
If FileExists(databaseName) Then
begin
Table := CreateCOMObject(StringToGUID('ADOX.Table')) as _Table;
table.Name:=mes;
Catalog.Tables.Append(Table);
Table.Columns.Append('Septiembre', adVarWChar, 128);
Table.Columns.Append('Octubre', adVarWChar, 128);
end;
end;

Donde fichero es la direccion donde se encuentran los archivos de Delphi.

delphi.com.ar 07-07-2007 22:37:38

Te sirve hacerlo mediante SQL: ?
Código SQL [-]
ALTER TABLE [TABLA]
ADD [CAMPO] [TIPO]

principiante22 07-07-2007 23:53:26

hmmm

Pero donde puedo escribir codigos SQL ????

Caral 08-07-2007 00:13:54

Hola
El codigo sql se escribe en conjuncion con los query.
Por ejemplo si colocas un query en el form (query1), este lo enlazas a la base de datos y puedes colocar la sentencia sql dentro del string del componente o por codigo, algo asi:
Esta es una sentencia sql simple:
Código Delphi [-]
Query1.sql.text:= ' select * from TuTabla';
No estoy muy seguro como colocar una sentencia como la que te indica delphi.com.ar, porque nunca lo he hecho, pero debe andar por ese lado.
Saludos

courtois 09-07-2007 04:43:46

como dice caral, si lo pones en un query, lo ejecutas con el método ExecSQL o lo puedes ejecutar OnTheFly con el método Execute de tu conexión ADO

principiante22 09-07-2007 16:20:08

Gracias por la ayuda, ya me funciono ;)


La franja horaria es GMT +2. Ahora son las 15:29:45.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi