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 |