Pregunta: | 66320 - IMPORTAR DOS TABLAS DE EXCEL A UNA SOLA EN VFP |
Autor: | Johdag Johdag |
Hola, tengo una cuestión,
Necesito importar dos tablas desde excel a una sola en VFP. Si utilizo el comando Append From con la primera tabla si me funciona correcto; pero al utilizarlo con el segundo xls me sobrescribe los registros y sólo aparecen los últimos importados. Qué comando necesito?? No puedo guardar los datos en una sóla tabla de excel ya que son más de 180 mil registros y para importar a VFP la solución más sencilla que encontre fue convertir los xls a version 5.0, pero esta version solo me permite guardar hasta 65 mil registros. asi que tuve que dividir la tabla en tres partes.. Alguna solución? se nota que no soy experto, pero voy aprendiendo con mis errores. Hasta ahora tengo apenas unas cuantas lineas: xarchivo=GETFILE('xls','Archivo de Excel','Abrir',1,'Abrir Archivo de Planilla de Excel') SELECT 50 USE "mi tabla" APPEND FROM (xarchivo) TYPE xls |
Respuesta: | Jose Maria Vilar |
Lo mas simple que se me ocurre es que crees dos cursores con el formato de la tabla, primero importas el excel a un cursor y luego al otro.
Al terminar comensas a leer un Cursor y lo grabas en tu base y luego haces lo mismo para el segundo cursor Ej create cursor primero( registro1,registro2,registro3.....) create cursor segundo( registro1,registro2,registro3.....) && Deben ser igual a la tabla que queres actualizar xarchivo=GETFILE('xls','Archivo de Excel','Abrir',1,'Abrir Archivo de Planilla de Excel') SELE O USE "mi tabla" SELECT 0 USE " primero" APPEND FROM (xarchivo) TYPE xls SELECT 0 USE " segundo" APPEND FROM (xarchivo) TYPE xls sele " primero" scan scatter memvar sele "mi tabla" appe blank gather memvar endscan SELE " segundo" scan scatter memvar sele "mi tabla" appe blank gather memvar endscan Espero que lo entiendas |