Gracias, anduvo perfecto.

saludos

-----Original Message-----
From: Rafael Copquin <[email protected]>
To: "GUFA List Member"  <[email protected]>
Date: Wed, 29 Oct 2014 10:49:49 -0300
Subject: [GUFA] EXCEL A FOX

> Una vez que obtuviste el cursor desde el Excel, usá la función cast
> en 
> otro select asi:
> 
> select cast(campomemo1 as char(10)) as campomemo1, cast(campomemo2 
as 
> char(50)) as campomemo2.....;
> from xlResults into cursor curConvertido
> 
> select curConvertido
> browse
> 
> Rafael Copquin
> 
> 
> El 29/10/2014 9:24, pablo.oviedo escribió:
> > Hola, con respecto al ejemplo de mas abajo, lo estuve probando y 
veo
> > que la estructura de xlResults incluye campos memo cuando las
> columnas
> > del excel son de texto. Como podría hacer para que los campos 
fueran
> > de caracteres en lugar de memo.
> > Uso vfp9+sp2
> >
> > Saludos, gracias.
> >
> > -----Original Message-----
> > From: Sergio Lescano <[email protected]>
> > To: "GUFA List Member"  <[email protected]>
> > Date: Tue, 28 Oct 2014 15:52:03 -0700
> > Subject: [GUFA] EXCEL A FOX
> >
> >> Gracias a todos por las respuestas voy a probar esta opción.
> >>
> >> Saludos
> >> Sergio
> >>
> >>
> >>
> >> El Viernes, 24 de octubre, 2014 13:51:02, Mario Munuce
> >> <[email protected]> escribió:
> >>   
> >>
> >>
> >> Gracias Ariel!
> >> Abrazo,
> >> m.
> >>   
> >> De:[email protected] [mailto:[email protected]] En nombre de Ariel 
Luna
> >> Enviado el: jueves, 23 de octubre de 2014 03:22 p.m.
> >> Para: GUFA List Member
> >> Asunto: [GUFA] EXCEL A FOX
> >>   
> >> Si tenes Excel instalado y por línea de comando.
> >>   
> >>   
> >> Crear el cursor con los campos del excel
> >>   
> >> lcXLBook = Nombre de Archivo
> >>   
> >> * Hace la cadena de conexion - invocando al driver
> >>   
> >> lcConnstr = [Driver=] + ;
> >>      [{Microsoft Excel Driver (*.xls, *.xlsx, *.xlsm, *.xlsb)};] 
+ ;
> >>      [DBQ=] + lcXLBook
> >>   
> >> lnSQLHand = SQLSTRINGCONNECT( lcConnstr )
> >>   
> >> IF lnSQLHand < 1
> >> *Esto es error de conexión
> >>   
> >> else
> >> *Leer la hoja de excel
> >>   
> >> lcSQLCmd = [Select * FROM "Hoja1$"]
> >>   
> >> lnSuccess = SQLEXEC( lnSQLHand, lcSQLCmd, [xlResults] )
> >> *
> >> IF lnSuccess < 0
> >>        *Error
> >> Else
> >> SELECT cursor
> >> APPEND FROM DBF("xlResults")
> >>   
> >> Endif
> >>   
> >> SQLDISCONNECT( lnSQLHand )
> >>   
> >> endif
> >>   
> >> Espero que te sirva.
> >>   
> >> Saludos.
> >>   
> >>   
> >> De:[email protected] [mailto:[email protected]] En nombre de Sergio
> > Lescano
> >> Enviado el: jueves, 23 de octubre de 2014 02:25 p.m.
> >> Para: GUFA List Member
> >> Asunto: [GUFA] EXCEL A FOX
> >>   
> >> Hola alguien sabe si existe alguna forma de importar una planilla 
en
> >> EXCEL 2007/2010 a una tabla de fox 9 tipo append from  ?
> >>   
> >> saludos y gracias
> >>   
> >> Se certificó que el correo no contiene virus.
> >> Comprobada por AVG - www.avg.es
> >> Versión: 2015.0.5315 / Base de datos de virus: 4181/8438 - Fecha 
de
> > la
> >> versión: 23/10/2014
> >>
> >> ________________________________
> >>
> >> Se certificó que el correo no contiene virus.
> >> Comprobada por AVG - www.avg.es
> >> Versión: 2015.0.5315 / Base de datos de virus: 4181/8400 - Fecha 
de
> > la
> >> versión: 16/10/2014
> >> Las Definiciones de virus internas están desactualizadas.
> >
> >
> 


Responder a