FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour ActiveX y Word
Posts: 1074
Joined: Fri Oct 07, 2005 01:56 PM
ActiveX y Word
Posted: Fri Dec 15, 2006 08:50 PM
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

#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
Saludos
Patricio

__________________________________________________________________
Version: Harbour 3.2.0dev (r1307082134),Compiler: Borland C++ 5.8.2 (32-bit)
PCode version: 0.3, FWH 13.2
http://www.sialm.cl
Posts: 1074
Joined: Fri Oct 07, 2005 01:56 PM
ActiveX y Word
Posted: Fri Dec 15, 2006 09:34 PM
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
Saludos
Patricio

__________________________________________________________________
Version: Harbour 3.2.0dev (r1307082134),Compiler: Borland C++ 5.8.2 (32-bit)
PCode version: 0.3, FWH 13.2
http://www.sialm.cl
Posts: 218
Joined: Fri Oct 07, 2005 01:55 AM
ActiveX y Word
Posted: Sat Dec 16, 2006 03:20 AM

Hello

What's version of FWH and xHarbour?

Richard

Posts: 310
Joined: Sun Jan 08, 2006 10:09 PM
ActiveX y Word
Posted: Sat Dec 16, 2006 04:18 AM
Amiguinho

Tentas antes:

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 )

Continue the discussion