insersion en una base de datos

[vtdeleon]

Empezado por pepe2000

hola alfil 123.
si estas utilizando ADOQUERY lo que tienes que usar es:

adoquery.insert;
adoquery.fieldbyname('campoUno').value:=valor1;
adoquery.fieldbyname('campoDos').value:=valor2;
...
adoquery.post;

Si es un AdoQuery pues esto podria dar un error de que no es modificable, se necesita tener conectado un TUpdateSQL (lo digo de memoria)

Empezado por pepe2000

Logicamente para ingresar 8 registros tendrias que hacer un ciclo while o for.

Otra forma de ingresar puede ser utilizando ADOCOMMAND:

adocommand1.commandtext:='INSERT INTO tabla (campo1, campo2, ..) VALUES (valor1, valor2,...)';
adocommand1.execute;

No est "tan"necesario hacer un ciclo, con una simple sentencia se resulve en un "parpadeo"

Código Delphi [-]
AdoQuery.SQL.Text:='Insert into Tabla1 (campo1, campo2,...CampoN) '+
          'Select top 8 campo1, campo2, campoN fron tabla2';
//El top es opcional, solo  para capturar los 1ros 8 registros