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)
-   -   de un grid a access (https://www.clubdelphi.com/foros/showthread.php?t=50747)

sidneyb 27-11-2007 14:40:57

de un grid a access
 
Tengo un problemita al momento de insertar datos, estoy cargando un DBgrid con datos de un dbf, la carga esta perfecta, ahora necesito tomar esos datos e insertarlos a una tabla dentro de access, ya tengo las conexiones (ADO) a ambas tablas hechas solo tengo el inconveniente de no poder insertar los datos; para ello e intentado distintos codigos que he encontrado de ejemplo, el mas cercano segun mi entendimiento es este:

adotable1.Append;
adotable1.FieldByName('numtra').asinteger:= dbgrid1.Columns[2].Field.asinteger;
adotable1.Post;
adotable1.Next;


en esta ocacion me aparece un error de no poder convertir un valor tipo null a un valor tipo String.

les agradezco de ante mano.

Genner 27-11-2007 21:02:19

Seria de mucha ayuda si nos das mas informacion

cuantos campos tiene tu tabla ?

los campos aceptan valores null?

sidneyb 28-11-2007 13:39:50

mi tabla DBF tiene varios campos pero solo me interesa trabajar con tres, (Codbarra(text), codigobarra(text), Numtra(integer)), son los que cargue en el DBgrid, ninguno tiene valor null, en la tabla de access en el que quiero insertar los datos tampoco requiere que todos los datos esten con un valor diferente a <NULL> e intento cargarlos con el mismo formato, es decir los dos en texto y el restante en forma numerica

Lepe 28-11-2007 14:05:41

¿te permite usar adotable1.FieldByName('numtra').AsXXX?
Yo siempre en el foro he visto utilizar .Value


Código Delphi [-]
dbgrid1.datasource.dataset.First;

while not dbgrid1.datasource.dataset.eof do
begin
  adotable1.Append;
  adotable1.FieldByName('numtra').Value := dbgrid1.Columns[2].Field.Value;
  adotable1.Post;
dbgrid1.datasource.dataset.Next; // avanzamos en el grid !!
end;

Saludos


La franja horaria es GMT +2. Ahora son las 23:55:42.

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