Código:
'Creo el recordset dinámicamente
Set Gado_ficha = Nothing
Set Gado_ficha = New ADODB.Recordset
Gado_ficha.CursorType = adOpenKeyset '= adOpenStatic
With Gado_ficha
.Fields.Append "campo1", adVarChar, 80, adFldUpdatable And adFldIsNullable
.Fields.Append "campo2", adDouble, adFldUpdatable And adFldIsNullable
.Open
End With
No he incluído la declaración del recordset ni la adición de registros mediante ADDNEW y UPDATE.
Pero hay una solución mejor, mucho mejor:
-creas una tabla exactamente igual en la base de datos fija
-rellenas y borras los registros cuando te apetezca
-no necesitas líos de recordset y menos lógica de programa
si no hay problema por tener una tabla temporal, para mi es la mejor opción.
Saludos
Pablo