If Exist(Excel)

[zeasoftware]

Como puedo detrerminar si el cliente tiene instalado en su pc el MS-Excel?
esto por que al probar con uno me marca error, pero es por que este no esta
instalado.
Saludos.
PD.: esta todo muy calmado.....
--
Ramón Zea
ramonzea@yahoo.com
zeasoftware@hotmail.com
zeasoft.movil@hotmail.com
http://www.paginasprodigy.com/zeasoft/

[Xevi]

Ramón,
Prueba con este trozo de código...
TRY
oExcel := GetActiveObject( "Excel.Application" )
CATCH
TRY
oExcel := CreateObject( "Excel.Application" )
CATCH
Alert( "ERROR! Excel not avialable. [" + Ole2TxtError()+ "]" )
RETURN Nil
END
END
Un Saludo,
Xevi.
"RamónZea" <zeasoftware@hotmail.com> escribió en el mensaje
news:[email=45b3be9e@news.xailer.com...]45b3be9e@news.xailer.com...[/email]
> Como puedo detrerminar si el cliente tiene instalado en su pc el MS-Excel?
>
> esto por que al probar con uno me marca error, pero es por que este no
> esta instalado.
>
> Saludos.
> PD.: esta todo muy calmado.....
> --
> Ramón Zea
> ramonzea@yahoo.com
> zeasoftware@hotmail.com
> zeasoft.movil@hotmail.com
> http://www.paginasprodigy.com/zeasoft/
>

[zeasoftware]

gracias,
otra pregunta...
que diferencia hay entre:
TOleAuto():New( "Excel.Application" )
y
GetActiveObject( "Excel.Application" )
?
- cual es mejor?
- es lo mismo?
- cuando usar uno u otro?
Gracias de nuevo.
Saludos.
--
Ramón Zea
ramonzea@yahoo.com
zeasoftware@hotmail.com
zeasoft.movil@hotmail.com
http://www.paginasprodigy.com/zeasoft/
"Xevi" <xevicomas@gmail.com> escribió en el mensaje news:45b4732e$[email=1@news.xailer.com...]1@news.xailer.com...[/email]
> Ramón,
>
> Prueba con este trozo de código...
>
> TRY
> oExcel := GetActiveObject( "Excel.Application" )
> CATCH
> TRY
> oExcel := CreateObject( "Excel.Application" )
> CATCH
> Alert( "ERROR! Excel not avialable. [" + Ole2TxtError()+ "]" )
> RETURN Nil
> END
> END
>
>
> Un Saludo,
> Xevi.
>
>
> "RamónZea" <zeasoftware@hotmail.com> escribió en el mensaje
> news:[email=45b3be9e@news.xailer.com...]45b3be9e@news.xailer.com...[/email]
>> Como puedo detrerminar si el cliente tiene instalado en su pc el MS-Excel?
>>
>> esto por que al probar con uno me marca error, pero es por que este no
>> esta instalado.
>>
>> Saludos.
>> PD.: esta todo muy calmado.....
>> --
>> Ramón Zea
>> ramonzea@yahoo.com
>> zeasoftware@hotmail.com
>> zeasoft.movil@hotmail.com
>> http://www.paginasprodigy.com/zeasoft/
>>
>
>
--

[Xevi]

Ramón,
No se trata de cual es mejor, sinó que para que cada cual...
GetActiveObject( "Excel.Application" )
lo que hacemos es comprobar si ya tenemos ejecutando Excel en nuestro
Windows y si ya está ejecutándose lo podemos utilizar.
TOleAuto():New( "Excel.Application" )
esto crea una instancia OLE nueva de Excel.
Si no es así, que alguien me corrija...
Un Saludo,
Xevi.
"RamónZea" <zeasoftware@hotmail.com> escribió en el mensaje
news:45b4dc3e$[email=1@news.xailer.com...]1@news.xailer.com...[/email]
gracias,
otra pregunta...
que diferencia hay entre:
TOleAuto():New( "Excel.Application" )
y
GetActiveObject( "Excel.Application" )
?
- cual es mejor?
- es lo mismo?
- cuando usar uno u otro?
Gracias de nuevo.
Saludos.
--
Ramón Zea
ramonzea@yahoo.com
zeasoftware@hotmail.com
zeasoft.movil@hotmail.com
http://www.paginasprodigy.com/zeasoft/
"Xevi" <xevicomas@gmail.com> escribió en el mensaje
news:45b4732e$[email=1@news.xailer.com...]1@news.xailer.com...[/email]
> Ramón,
>
> Prueba con este trozo de código...
>
> TRY
> oExcel := GetActiveObject( "Excel.Application" )
> CATCH
> TRY
> oExcel := CreateObject( "Excel.Application" )
> CATCH
> Alert( "ERROR! Excel not avialable. [" + Ole2TxtError()+ "]" )
> RETURN Nil
> END
> END
>
>
> Un Saludo,
> Xevi.
>
>
> "RamónZea" <zeasoftware@hotmail.com> escribió en el mensaje
> news:[email=45b3be9e@news.xailer.com...]45b3be9e@news.xailer.com...[/email]
>> Como puedo detrerminar si el cliente tiene instalado en su pc el
>> MS-Excel?
>>
>> esto por que al probar con uno me marca error, pero es por que este no
>> esta instalado.
>>
>> Saludos.
>> PD.: esta todo muy calmado.....
>> --
>> Ramón Zea
>> ramonzea@yahoo.com
>> zeasoftware@hotmail.com
>> zeasoft.movil@hotmail.com
>> http://www.paginasprodigy.com/zeasoft/
>>
>
>

[pablogarciau]

Disculpa Xevi, ¿Donde encuentro la ayuda de GetActiveObject y CreateObject ?
Saludos y gracias