Duda con uso de TOLE para Word

[jfafive]

Hola,

Cuando abro un documento word,

Code: Select all  Expand view  RUN

oWord:Documents:Open( cFile )


Funciona bien, excepto si el fichero esta corrupto, en ese caso, la aplicación se rompe con una ventana de error.

¿se puede controlar para que si intenta abrir el fichero y no puede, lo ignore o haga la acción asignada?

He buscado, pero no he podido encontrar una lista de datos y metodos para TOLEAUTO con Word.

¿alguien sabe?

[Antonio Linares]

Javier,

Prueba con TRY y CATCH:

Code: Select all  Expand view  RUN

TRY
   oWord:Documents:Open( cFile )
CATCH
   MsgAlert( "fichero corrupto" )
END


Si usas Harbour tienes que anadir estas lineas al inicio del PRG:

Code: Select all  Expand view  RUN

#ifndef __XHARBOUR__
   #xcommand TRY              => bError := errorBlock( {|oErr| break( oErr ) } ) ;;
                                 BEGIN SEQUENCE
   #xcommand CATCH [<!oErr!>] => errorBlock( bError ) ;;
                                 RECOVER [USING <oErr>] <-oErr-> ;;
                                 errorBlock( bError )
#endif


y declarar una variable estatica bError

[jfafive]

Gracias Master,

Por cierto, he visto que puedo buscar una palabra a lo bestia, es decir, usando memoread() para encontrarla en ficheros word, xls,

¿es fiable este metodo?

[ADBLANCO]

Yo lo uso (a lo bestia) y me trabaja muy bién