Este código funciona correctamente en Windows XP...
TRY
oExcel := GetActiveObject( "Excel.Application" )
CATCH
TRY
oExcel := CreateObject( "Excel.Application" )
CATCH
MsgAlert( "ERROR! Excel not avialable. [" + Ole2TxtError()+ "]" )
oFile:Destroy()
::oBrowse1:SetFocus()
RETURN Nil
END
END
oExcel:Visible := .T.
oExcel:WorkBooks():Open( oFile:cFullFileName )
...
pero mi sorpresa a sido cuando lanzo la misma aplicación en Windows 7, 32 o 64 bits, y no resuelve el mandato Open(), se va al CATCH.
Algun ajuste a hacer en Win7???
Estoy utilizando la versión 2.1.5.
Un Saludo.
Xevi
In order for this site to work correctly we need to store a small file (called a cookie) on your computer. Most every site in the world does this, however since the 25th of May 2011, by law we have to get your permission first. Please abandon the forum if you disagree.
Para que este foro funcione correctamente es necesario guardar un pequeño fichero (llamado cookie) en su ordenador. La mayoría de los sitios de Internet lo hacen, no obstante desde el 25 de Marzo de 2011 y por ley, necesitamos de su permiso con antelación. Abandone este foro si no está conforme.
Para que este foro funcione correctamente es necesario guardar un pequeño fichero (llamado cookie) en su ordenador. La mayoría de los sitios de Internet lo hacen, no obstante desde el 25 de Marzo de 2011 y por ley, necesitamos de su permiso con antelación. Abandone este foro si no está conforme.
error en TOLE()
error en TOLE()
Un Saludo,
Xevi.
Xevi.
error en TOLE()
Xevi,
> Este código funciona correctamente en Windows XP...
>
> ...
>
> pero mi sorpresa a sido cuando lanzo la misma aplicación en
> Windows 7, 32 o 64 bits, y no resuelve el mandato Open(), se
> va al CATCH.
>
> Algun ajuste a hacer en Win7???
Lo acabo de probar con xHarbour y con Harbour, y funciona correctamente,
al menos con Win7 32 bits y Excel 2003.
> Estoy utilizando la versión 2.1.5.
Si no tienes una versión más nueva, intenta instalarte una demo de la
2.6 y pruébalo, por si hubiera habido algún problema en esa versión,
aunque dudo mucho que sea eso.
Un saludo,
José F. Giménez
http://www.xailer.com
http://www.xailer.info
> Este código funciona correctamente en Windows XP...
>
> ...
>
> pero mi sorpresa a sido cuando lanzo la misma aplicación en
> Windows 7, 32 o 64 bits, y no resuelve el mandato Open(), se
> va al CATCH.
>
> Algun ajuste a hacer en Win7???
Lo acabo de probar con xHarbour y con Harbour, y funciona correctamente,
al menos con Win7 32 bits y Excel 2003.
> Estoy utilizando la versión 2.1.5.
Si no tienes una versión más nueva, intenta instalarte una demo de la
2.6 y pruébalo, por si hubiera habido algún problema en esa versión,
aunque dudo mucho que sea eso.
Un saludo,
José F. Giménez
http://www.xailer.com
http://www.xailer.info
error en TOLE()
El problema debe estar en Office2010...
Intentaré instalar Office2003 para comprobarlo.
Gracias.
Un Saludo,
Xevi.
Intentaré instalar Office2003 para comprobarlo.
Gracias.
Un Saludo,
Xevi.
Un Saludo,
Xevi.
Xevi.
error en TOLE()
Jose,
Por lo visto lo que me ocurria...
corria Excel en Visible a .f. para mandar unos datos a la hoja y rellenar
campos, para finalmente hacerla visible.
después de rellenarla, la salvaba :Save() y la mostrava Visible := .t.
Como usaba una plantilla hecha en Excel2003, al correrla en Excel2010, el
cambio de versión aparece una ventana de diálogo de advertencia de
compatibilidades.
La aplicación se quedava a la espera del diálogo, sin mostrarse, pues
todavia estava visible a .f..
Cambiando el orden, y primero hacer Visible := .t. y luego :Save()... todo
funciona correctamente.
Un Saludo,
Xevi.
"Jose F. Gimenez" <jfgimenezAM]"@wanadoo.es> ha escrit al missatge
del grup de discussió: [email=50648e9a@svctag-j7w3v3j....]50648e9a@svctag-j7w3v3j....[/email]
> Xevi,
>
>> Este código funciona correctamente en Windows XP...
>>
>> ...
>>
>> pero mi sorpresa a sido cuando lanzo la misma aplicación en
>> Windows 7, 32 o 64 bits, y no resuelve el mandato Open(), se
>> va al CATCH.
>>
>> Algun ajuste a hacer en Win7???
>
> Lo acabo de probar con xHarbour y con Harbour, y funciona correctamente,
> al menos con Win7 32 bits y Excel 2003.
>
>
>> Estoy utilizando la versión 2.1.5.
>
> Si no tienes una versión más nueva, intenta instalarte una demo de la 2.6
> y pruébalo, por si hubiera habido algún problema en esa versión, aunque
> dudo mucho que sea eso.
>
>
> Un saludo,
>
> José F. Giménez
> http://www.xailer.com
> http://www.xailer.info
>
> __________ Informacin de ESET NOD32 Antivirus, versin de la base de firmas
> de virus 7645 (20121031) __________
>
> ESET NOD32 Antivirus ha comprobado este mensaje.
>
> http://www.eset.com
>
>
>
__________ Información de ESET NOD32 Antivirus, versión de la base de firmas de virus 7653 (20121102) __________
ESET NOD32 Antivirus ha comprobado este mensaje.
http://www.eset.com
Por lo visto lo que me ocurria...
corria Excel en Visible a .f. para mandar unos datos a la hoja y rellenar
campos, para finalmente hacerla visible.
después de rellenarla, la salvaba :Save() y la mostrava Visible := .t.
Como usaba una plantilla hecha en Excel2003, al correrla en Excel2010, el
cambio de versión aparece una ventana de diálogo de advertencia de
compatibilidades.
La aplicación se quedava a la espera del diálogo, sin mostrarse, pues
todavia estava visible a .f..
Cambiando el orden, y primero hacer Visible := .t. y luego :Save()... todo
funciona correctamente.
Un Saludo,
Xevi.
"Jose F. Gimenez" <jfgimenezAM]"@wanadoo.es> ha escrit al missatge
del grup de discussió: [email=50648e9a@svctag-j7w3v3j....]50648e9a@svctag-j7w3v3j....[/email]
> Xevi,
>
>> Este código funciona correctamente en Windows XP...
>>
>> ...
>>
>> pero mi sorpresa a sido cuando lanzo la misma aplicación en
>> Windows 7, 32 o 64 bits, y no resuelve el mandato Open(), se
>> va al CATCH.
>>
>> Algun ajuste a hacer en Win7???
>
> Lo acabo de probar con xHarbour y con Harbour, y funciona correctamente,
> al menos con Win7 32 bits y Excel 2003.
>
>
>> Estoy utilizando la versión 2.1.5.
>
> Si no tienes una versión más nueva, intenta instalarte una demo de la 2.6
> y pruébalo, por si hubiera habido algún problema en esa versión, aunque
> dudo mucho que sea eso.
>
>
> Un saludo,
>
> José F. Giménez
> http://www.xailer.com
> http://www.xailer.info
>
> __________ Informacin de ESET NOD32 Antivirus, versin de la base de firmas
> de virus 7645 (20121031) __________
>
> ESET NOD32 Antivirus ha comprobado este mensaje.
>
> http://www.eset.com
>
>
>
__________ Información de ESET NOD32 Antivirus, versión de la base de firmas de virus 7653 (20121102) __________
ESET NOD32 Antivirus ha comprobado este mensaje.
http://www.eset.com
Un Saludo,
Xevi.
Xevi.