ActiveX y Word

[Patricio Avalos Aguirre]

Estimado

Estoy compilando el ejemplo fwh\samples\word y me mando error de memoria no se puede leer...blabla..

pero compilo los otros ejemplos y funcionan bien

Code: Select all  Expand view  RUN

#include "FiveWin.ch"

function Main()

   local oWnd, oActiveX

   DEFINE WINDOW oWnd TITLE "FiveWin ActiveX Support"

   oActiveX = TActiveX():New( oWnd, "Word.Application.8" )

   alert( oActivex:Classname )


   oWnd:oClient = oActiveX // To fill the entire window surface

   ACTIVATE WINDOW oWnd

return nil


ahora el nombre "Word.Application.8", depende de alguna version en especial?, ya que tengo office2003

Bueno en realidad lo que quiero hacer es enviar un documento y luego que lo impriman


saludos
Patricio

[Patricio Avalos Aguirre]

Baje el ejemplo que antonio puso en el post

http://fivetechsoft.com/forums/viewtopic.php?t=4404&postdays=0&postorder=asc&start=0

http://hyperupload.com/download/0287ba6816/pdf.zip.html

y me salio el mismo error

http://img457.imageshack.us/my.php?image=activexeo9.jpg

Ahora la pregunta, al utilizar activeX y cambien de version los usuarios, puede provocar que salga este error??


Saludos
Patricio

[Taiwan]

Hello

What's version of FWH and xHarbour?

Richard

[Rochinha]

Amiguinho

Tentas antes:

Code: Select all  Expand view  RUN

if IsActivex( "Word.Application.8" )
   cString := "Word.Application.8"
endif
if IsActivex( "Word.Application.9" )
   cString := "Word.Application.9"
endif
if IsActivex( "Word.Application.10" )
   cString := "Word.Application.10"
endif
if IsActivex( "Word.Application.11" )
   cString := "Word.Application.11"
endif
oActiveX = TActiveX():New( oWnd, cString )