|
hola que tal, mira yo he seguidos los pasos del ultimo post que dejaron en ese hilo y me salio perfectamente, prueba primero hacer andar qye te ve el archivo excel, prestale atencion a los componentes.
Luego yo me cree una tabla para probar y en un boton le hize ese procedimiento y me anduvo joya.
table1.open;
While not ADODataSet1.EoF do begin
table1.insert;
Table1.FieldByName('nombre').Value := AdoDataSet1.Fields[0].Value ;
Table1.FieldByName('num').Value:= AdoDataSet1.Fields[1].Value ;
Table1.FieldByName('num1').Value := AdoDataSet1.Fields[2].Value ;
Table1.FieldByName('ape').Value := AdoDataSet1.Fields[3].Value ;
table1.post;
AdoDataSet1.Next;
end;
end;
bueno suerte, sigue provando y trata de enteder bien el el codigo del ultimo post uqe te va a salir joyaaa
saludoss
|