OrigenSoporte técnico de Microsoft
PUBLICACIÓN RÁPIDA
LOS ARTÍCULOS DE PUBLICACIÓN RÁPIDA PROPORCIONAN INFORMACIÓN DIRECTAMENTE DESDE LA ORGANIZACIÓN DE SOPORTE TÉCNICO DE MICROSOFT. LA INFORMACIÓN CONTENIDA EN EL PRESENTE SE CREA EN RESPUESTA A TEMAS EMERGENTES O ÚNICOS, O ESTÁ PENSADO PARA OBTENER MÁS INFORMACIÓN SOBRE LA BASE DE CONOCIMIENTOS.
Action
Tiene un libro de Microsoft Excel 2007 (. XLSX). Desea importar datos desde el mismo a una tabla de Microsoft Visual FoxPro (VFP) con VFP.
Resolución
Hay varias formas de realizar esta tarea: 1. Exportar las hojas de Excel como archivos delimitados por comas (. CSV) y use el comando importar o el Asistente para importación en VFP para importar los archivos. 2. Escriba código de automatización OLE de VFP personalizado para automatizar Excel y extraer los datos a VFP. 3. Use el controlador ODBC de Microsoft Excel driver (*. xls, *. xlsx, *. xlsm, *. xlsb) incluido con el 2007 driver System de Office: paquete de componentes de conectividad de datos para obtener acceso y extraer datos del libro de Excel, ya sea a través de una vista remota de VFP o mediante programación, como en el siguiente código de ejemplo: *-----------------------------------* AUTHOR: Trevor Hancock * creado: 02/15/08 04:55:31 PM * ABSTRACT: código muestra cómo conectarse a * y extraer datos de un libro de Excel 2007 * con el "controlador de Microsoft Excel (*. xls, *. xlsx, *. xlsm, *. xlsb)" * del controlador de sistema de Office de 2007: componentes de conectividad de datos *-----------------------------------lcXLBook como cadena, lnSQLHand como entero; lcSQLCmd AS STRING, lnSuccess AS Integer,; lcConnstr como STRINGCLEARlcXLBook = [C:\SampleWorkbook.xlsx] lcConnstr = [driver =] +; [{Microsoft Excel driver (*. xls, *. xlsx, *. xlsm, *. xlsb)};] + ; [DBQ =] + lcXLBookIF! ARCHIVO (lcXLBook)? [Archivo de Excel no encontrado] Volver. F. ENDIF *--intentar una conexión con el. Libro XLSX. *--Nota: Si no se encuentra el libro especificado, * se creará con este controlador. No se puede confiar en un error de conexión *--error. Ergo, éxito *: no se ha activado aquí. Se usó el archivo (). lnSQLHand = SQLSTRINGCONNECT (lcConnstr) *--Connected on si estamos aquí. Extraer datos... lcSQLCmd = [SELECT * FROM "Hoja1 $"] lnSuccess = SQLEXEC (lnSQLHand, lcSQLCmd, [xlResults])? [Error de cmd de SQL:], IIF (lnSuccess > 0, ' ¡ correcto! ', ' failed ') si lnSuccess < 0 de matriz LOCAL laErr [1] AERROR (laErr)? laErr (3) SQLDISCONNECT (lnSQLHand) return. F. ENDIF *: mostrar el resultsSELECT xlResultsBROWSE NOWAITSQLDISCONNECT (lnSQLHand)
DECLINACIÓN DE RESPONSABILIDADES
NI MICROSOFT NI SUS PROVEEDORES GARANTIZAN LA IDONEIDAD, FIABILIDAD O EXACTITUD DE LA INFORMACIÓN CONTENIDA EN LOS DOCUMENTOS Y GRÁFICOS RELACIONADOS PUBLICADOS EN ESTE SITIO WEB (LOS "MATERIALES") PARA CUALQUIER PROPÓSITO. LOS MATERIALES PUEDEN INCLUIR IMPRECISIONES TÉCNICAS O ERRORES TIPOGRÁFICOS Y SE PUEDEN MODIFICAR EN CUALQUIER MOMENTO SIN PREVIO AVISO. EN LA MEDIDA EN QUE LO PERMITAN LAS LEYES VIGENTES, MICROSOFT O SUS PROVEEDORES RENUNCIAN E EXCLUYEN TODAS LAS DECLARACIONES, GARANTÍAS Y CONDICIONES, YA SEAN EXPRESAS, IMPLÍCITAS O ESTATUTARIAS, INCLUIDAS PERO NO LIMITADAS A LAS REPRESENTACIONES, GARANTÍAS O CONDICIONES DE TÍTULO, AUSENCIA DE INFRACCIÓN, CONDICIÓN O CALIDAD SATISFACTORIA, COMERCIABILIDAD E IDONEIDAD PARA UN FIN DETERMINADO, CON RESPECTO A LOS MATERIALES.
