FiveTech Support Forums

FiveWin / Harbour / xBase community
Board indexActive topicsAll discussionsLogin (GitHub)
Board index FiveWin para Harbour/xHarbour Abrir hoja Excel con password
Kleyber
Posts: 581
Joined: Tue Oct 11, 2005 11:28 AM
Abrir hoja Excel con password
Posted: Fri May 22, 2009 10:56 PM
Hola,

Estoy intentando abrir una hoja Excel y que tiene una password, pero me da un error. Estoy haciendo asi:

Code (fw): Select all Collapse
oExcel := TOleAuto():New( "Excel.Application" )
if Ole2TxtError() # "S_OK"
   MsgInfo("EXCEL n茫o est谩 instalado nesta m谩quina."+CRLF+"Imposs铆vel gerar planilha","ATEN脟脙O")
   return nil
endif
oExcel:Workbooks:Open( cDirXLS+cArquivoX, , , ,"1111" )


Que hago mal?

Gracias,
Kleyber Derick



FWH / xHb / xDevStudio / SQLLIB
Kleyber
Posts: 581
Joined: Tue Oct 11, 2005 11:28 AM
Re: Abrir hoja Excel con password
Posted: Sat May 23, 2009 12:01 AM

Mirando la sintaxis del comando tengo:

Open(FileName, UpdateLinks, ReadOnly, Format, Password, WriteResPassword, ;
IgnoreReadOnlyRecommended, Origin, Delimiter, Editable, Notify, Converter, AddToMRU)

Entonces debria funcionar... Algun tip sobre esto?

Saludos,

Kleyber Derick



FWH / xHb / xDevStudio / SQLLIB
Ricardo Ramirez E.
Posts: 161
Joined: Wed Jan 25, 2006 10:45 AM
Re: Abrir hoja Excel con password
Posted: Sat May 23, 2009 07:25 PM

Kleyber.. no ser谩 que deveras tambien, indicar el password para el parametro WriteResPassword ?

Saludos

Ricardo R.

xHarbour 1.1.0 Simplex , Microsoft Visual Studio 2008, Bcc55, Fwh Build. 9.01
Kleyber
Posts: 581
Joined: Tue Oct 11, 2005 11:28 AM
Re: Abrir hoja Excel con password
Posted: Sun May 24, 2009 01:25 AM

Ricardo,

Ya lo he solucionado. La verdad es que faltaba una funci贸n de Ole. La puse y ahora funcion贸 perfectamente.

Gracias y Saludos,

Kleyber Derick



FWH / xHb / xDevStudio / SQLLIB
Dioni
Posts: 37
Joined: Tue May 12, 2009 08:45 PM
Re: Abrir hoja Excel con password
Posted: Sun May 24, 2009 12:15 PM

Hola Kleyber, Podrias compartir tu solucion con un ejemplo ?
podrias ayudarnos para los que empesamos recien en el tema. Gracias de antemano.
Saludos Dionicio...

Kleyber
Posts: 581
Joined: Tue Oct 11, 2005 11:28 AM
Re: Abrir hoja Excel con password
Posted: Sun May 24, 2009 02:17 PM

Hola Dionicio,

Lo que pasa es que uso una versi贸n antigua de xHarbour (1.1.0) y la versi贸n 8.02 de FWH. En la clase TOleauto no existia la funci贸n OleDefaultArg() que se debe usar el en OPEN, asi:

oExcel:Workbooks:Open( cDirXLS+cArquivoX,OleDefaultArg() ,OleDefaultArg() ,OleDefaultArg() ,"1111" )

Lo que hice fue coger una versi贸n reciente de Win32Ole.prg, puse en mi proyecto y asi funcion贸 perfectamente.

Saludos,

Kleyber Derick



FWH / xHb / xDevStudio / SQLLIB

Continue the discussion

Static archive 路 New replies & topics via GitHub Discussions