Planillas Excel abiertas!!

Hola Oscar:

Hay diferencia entre Word y Excel para controlar este tema de salida por
parte del usuario.
En Word vale:
IF VARTYPE(oWord) = "O" AND TYPE("oWord.Name") = "C"

* El servidor está funcionando

ENDIF



En Excel no funciona. Mira en el Resumen de la Conferencia DevEssentials más
sobre este tema - domingo 06.06 sesión mañana
http://www.portalfox.com/conferenci.../index.htm

Allí dice:
Esto. no funciona en Excel, para ello Tamar nos propone el siguiente código,
donde emplea una propiedad lShouldBeVisible, la que hay que verificar ante
cualquier acción relacionada con el servidor:



LOCAL lReturn



IF IsNull(oXL)

* No hay servidor instanciado

lReturn = .F.

ELSE

* Compara el valor Visible actual, para explorar la visibilidad

IF oXL.Visible = lShouldBeVisible

* Coinciden, quiere decir que el servidor está abierto y funciona bien

lReturn = .T.

ELSE

* No coinciden, quiere decir que

* es possible que el usuario abandonó la sesión.

lReturn = .F.

ENDIF

ENDIF



RETURN lReturn



Espero que te ayude,


Saludos,

Ana
www.amby.net

"Oscar Cáceres" escribió en el mensaje
news:

Hola :
Tengo un programa que genera informes en Excel. El problema que tengo es

que

el usuario aveces cierra el excel desde el panel de control. Hay alguna
forma de saber si la planilla está abierta o cerrada?? O de que otra forma
lo puedo solucionar opara que no dé error.
Desde ya muchas gracias
Oscar

Muchas gracias Ana.
Me fue de mucha utilidad
Oscar



"Ana María Bisbé York" escribió en el mensaje
news:

Hola Oscar:

Hay diferencia entre Word y Excel para controlar este tema de salida por
parte del usuario.
En Word vale:
IF VARTYPE(oWord) = "O" AND TYPE("oWord.Name") = "C"

* El servidor está funcionando

ENDIF



En Excel no funciona. Mira en el Resumen de la Conferencia DevEssentials

más

sobre este tema - domingo 06.06 sesión mañana
http://www.portalfox.com/conferenci.../index.htm

Allí dice:
Esto. no funciona en Excel, para ello Tamar nos propone el siguiente

código,

donde emplea una propiedad lShouldBeVisible, la que hay que verificar ante
cualquier acción relacionada con el servidor:



LOCAL lReturn



IF IsNull(oXL)

* No hay servidor instanciado

lReturn = .F.

ELSE

* Compara el valor Visible actual, para explorar la visibilidad

IF oXL.Visible = lShouldBeVisible

* Coinciden, quiere decir que el servidor está abierto y funciona bien

lReturn = .T.

ELSE

* No coinciden, quiere decir que

* es possible que el usuario abandonó la sesión.

lReturn = .F.

ENDIF

ENDIF



RETURN lReturn



Espero que te ayude,


Saludos,

Ana
www.amby.net

"Oscar Cáceres" escribió en el mensaje
news:
> Hola :
> Tengo un programa que genera informes en Excel. El problema que tengo es
que
> el usuario aveces cierra el excel desde el panel de control. Hay alguna
> forma de saber si la planilla está abierta o cerrada?? O de que otra

forma

> lo puedo solucionar opara que no dé error.
> Desde ya muchas gracias
> Oscar
>
>