La Web del Programador: Comunidad de Programadores
 
    Pregunta:  49015 - ERROR 8577
Autor:  Marcelo Nuñez del Prado
Buenas a todos: tengo un problema que no se como resolverlo,
Cuando copia una tabla de access desde el mismo access funciona sin problemas, mas cuando creo la tabla desde Visual Basic (definiendo los campos correctamente) al ejecutar el programa que lee la tabla da
Error 8577 No se ha Especificado valores para alguno de los parámetros requeridos.

Si alguien tiene idea de el porque del error agradeceria si me ayudan

Gracias

  Respuesta:  yurandir Lopez
Saludos, te envio este código esperoq ue te ayude, lo he usado y me ha funcionado.

Private Sub Copy_table()
dim idl01 as database
dim idl02 as database
Dim idl01r As TableDef 'la tabla origen
Dim idl02r As TableDef 'la tabla nueva
Set idl01 = OpenDatabase("base de datos origen")
set idl02 = opendatabase("base de datos destino")
Set idl01r = idl01!tablaorigen
Set idl02r = idl02.CreateTableDef("tablanueva")
With idl01r
mcampos = .Fields.Count
For a = 0 To mcampos - 1
idl02r.Fields.Append idl02r.CreateField(.Fields(a).Name, .Fields (a).Type, .Fields(a).Size)
Next
End With
idl02.TableDefs.Append idl02r
End Sub