Mensaje enviado por sosinfo@sinectis.com.ar

Hola, mira la forma que te voy a tratar de explicar, quizas no es la más indicada pero puede funcionar.
En declaraciones generales.
Dim RsDestino as New ADODB.Recordset

En una rutina una sola vez

rsdestino.Fields.Append "Campo1", adChar, 20

Fijate recordset.Fields.Append "NombreCampo", TipoDato, Longitud

De esta manera, debés definir los 4 campos del recordset que generaste con Dim.

Y luego puedes recorrer tu msflexgrid e ir agregando los registros en el rs. Nunca trabajé con msflexgrid pero supongo que puedes acceder a los datos de cada columna por cada registro e ir de registro en registro, por lo que una forma (medio osca, pero que debe funcionar) es hacer un for next desde el primer elemento del msflexgrid hasta el
ultimo, y por cada uno hacer un rsdestino.AddNew Array("Campo1", "Campo2"), Array("Valor1", "Valor2")
rsdestino.Update

Espero que te sirva, Gabriel Desde Argentina.

--- In visualbasic-esp@y..., "Julio Ricardo"
wrote:
> hola necesito crear un recordset con 4 campos y pasarle los datos
de un msflexgrid con 4 columnas a ese recordset.Una ayudita para
hacerlo por favor....
> gracias julio