FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Duda con uso de TOLE para Word
Posts: 396
Joined: Tue Mar 18, 2008 09:41 PM
Duda con uso de TOLE para Word
Posted: Mon Jun 02, 2008 08:30 AM
Hola,

Cuando abro un documento word,
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?
Javier,

FWH 8.04 2008
Posts: 44162
Joined: Thu Oct 06, 2005 05:47 PM
Duda con uso de TOLE para Word
Posted: Mon Jun 02, 2008 09:31 PM
Javier,

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

Si usas Harbour tienes que anadir estas lineas al inicio del PRG:
#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
regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 396
Joined: Tue Mar 18, 2008 09:41 PM
Duda con uso de TOLE para Word
Posted: Tue Jun 03, 2008 11:20 AM

Gracias Master, :lol:

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?

Javier,

FWH 8.04 2008
Posts: 299
Joined: Mon Oct 22, 2007 03:03 PM
Duda con uso de TOLE para Word
Posted: Tue Jun 03, 2008 06:56 PM

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

Saludos



Angel, Valencia, Venezuela



xH .997 - FW 7.9 - BCC55 - WorkShop - MySql

Continue the discussion