La Web del Programador: Comunidad de Programadores
 
    Pregunta:  14119 - AGREGAR REGISTROS CON EL CONTROL FLEXGRID
Autor:  Marcos Antonio Amador Meza
Necesito saber como puedo agregar registros a una base de datos utilizando el Control FlexGrid.

  Respuesta:  Patoaparato j
lo que puedes hacer es un bucle de tal forma que el dato de una celda lo muevas al campo de la tabla que corresponde y así lo haces fila por fila por ejemplo...
tienes un msflexgrid con 3 columnas y n filas...
ojo, esto es utilizando un objeto recordset...

dim x as byte
set objeto = base.openrecordset("tabla1")
x=1
while not x > msflexgrid.rows (la iteracion la hace tantas veces como filas tenga, el valor de las filas te la da el metodo .rows)
objeto.addmew
objeto.fields(campo1)=msflexgrid.texmatrix(x,0)
objeto.fields(campo2)=msflexgrid.texmatrix(x,1)
objeto.fields(campo3)=msflexgrid.texmatrix(x,2)
objeto.update
x=x+1
wend

así te movera el dato de cada celda y grabara el registro fila por fila
espero que te sirva...