FoxPro/Visual FoxPro - oppen office

 
Vista:

oppen office

Publicado por pulga (10 intervenciones) el 09/03/2007 12:51:54
estoy trabajando la generacion de informes con fox y word, hasta ahora todo bien, pero tengo que hacerlo funcionar con open office, será que si se puede? como?
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:oppen office

Publicado por Plinio (7841 intervenciones) el 09/03/2007 14:26:18
- Todo depende de la herramientas que uses, si tienes una licencia (puedes probar el demo) de xfrx este permite salida a documentos de OPEN OFFICE
http://www.eqeus.com/files/XFRXDevGuide120.htm#_Toc143577546

- Open Office acepta automatizacion
http://www.tedroche.com/Present/VFPOOoAutomation.htm
http://kosh.datateamsys.com/~danny/OOo/VisualFoxPro-OOo/LibOOo-2003-11-17-01.prg

A mi me llama la atencion este software, lamentablemente no he podido sacar tiempo para aprenderlo.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
sin imagen de perfil

RE:oppen office

Publicado por Ernesto Hernandez (4623 intervenciones) el 09/03/2007 19:26:44
Como accesar open office

local array laNoArgs[1]
local loSManager, loSDesktop, loStarDoc, loReflection, loPropertyValue, loCursor
loSManager = createobject( "Com.Sun.Star.ServiceManager.1" )
loSDesktop = loSManager.createInstance( "com.sun.star.frame.Desktop" )
comarray( loSDesktop, 10 )
loReflection = loSManager.createInstance( "com.sun.star.reflection.CoreReflection" )
comarray( loReflection, 10 )
loPropertyValue = createStruct( @loReflection, "com.sun.star.beans.PropertyValue" )
laNoArgs[1] = loPropertyValue
laNoArgs[1].name = "ReadOnly"
laNoArgs[1].value = .F.
loStarDoc = loSDesktop.LoadComponentFromUrl( "staroffice.factory:swriter", "_blank", 0, @laNoargs )
loCursor = loStarDoc.text.CreateTextCursor()
loStarDoc.text.InsertString( loCursor, "HELLO FROM VFP", .f. )
Function createStruct( toReflection, tcTypeName )
local loPropertyValue, loTemp

loPropertyValue = createobject( "relation" )

toReflection.forName( tcTypeName ).createobject( @loPropertyValue )

return ( loPropertyValue )
endproc

Suerte
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar