Page 2 of 2
Re: Objeto OLE
Posted: Sat May 27, 2017 5:23 am
by Antonio Linares
Prueba asi:
Controlador:=CreateOLEObject('DataLinkLibrary.IController')
Controlador:Nuevo()
Re: Objeto OLE
Posted: Mon May 29, 2017 3:29 pm
by Jorge Jaurena
Buen dia Antonio.
Disculpa que siga insistiendo con este tema pero no tengo informacion de como tratar con una libreria de clases utilizando Harbour y FWH, la ayuda con respecto a OLE es muy breve y no tengo el OLE.C como para orientarme un poco mas.
No se si deberia encarar esto por otro lado que no sea utilizarla como obejto OLE.
Si podes orientarme un poco te lo agradeceria mucho.
Jorge Jaurena
Re: Objeto OLE
Posted: Mon May 29, 2017 3:56 pm
by cnavarro
Busca en el repositorio de Harbour ( hbwinole.h, olecore.c, oleauto.prg, etc. y los ejemplos )
Re: Objeto OLE
Posted: Mon May 29, 2017 5:18 pm
by Antonio Linares
Jorge,
Has podido probar esto ?
Controlador:=CreateOLEObject('DataLinkLibrary.IController')
Controlador:Nuevo()
Re: Objeto OLE
Posted: Mon May 29, 2017 8:01 pm
by Jorge Jaurena
Si Antonio, y me da este error
Application
===========
Path and name: E:\CEM-44\CEM44DLL.EXE (32 bits)
Size: 1,292,288 bytes
Time from start: 0 hours 0 mins 0 secs
Error occurred at: 29/05/2017, 16:59:48
Error description: Error BASE/1004 No exported method: NUEVO
Args:
[ 1] = N 47054892
El autor de la dll me indica que la misma esta hecha en .NET Framework, no se si esto marcara alguna diferencia.
Gracias
Jorge Jaurena
Re: Objeto OLE
Posted: Mon May 29, 2017 9:15 pm
by thefull
Buenas
¿ La DLL es de pago o tiene version demo ?
Tal y como te comenta Antonio, la cosa es muy simple, a no ser que el tema del .NET este dado guerra.
Please, ¿ puedes poner un ejemplo simple en VB que funcione ?
Es relativamente muy simple pasarlo a VBScript y probarlo directamente en el sistema a ver si funciona.
A partir de ahí , usarlo con Harbour debería ser muy muy simple
Saludos
Re: Objeto OLE
Posted: Mon May 29, 2017 10:03 pm
by Antonio Linares
Prueba a usar win_oleCreateObject() en vez de CreateOLEObject()
Re: Objeto OLE
Posted: Mon May 29, 2017 10:48 pm
by Jorge Jaurena
Antonio, probe pero el enlazador me dice esto:
E:\CEM-44\TRABAJO DLL>ILINK32.EXE -Gn -aa -Tpe -s @l.bc
Turbo Incremental Link 5.00 Copyright (c) 1997, 2000 Borland
Error: Unresolved external '_HB_FUN_WIN_OLECREATEOBJECT' referenced from E:\CEM-44\TRABAJO DLL\OBJ\INICIO.OBJ
Re: Objeto OLE
Posted: Mon May 29, 2017 10:59 pm
by Jorge Jaurena
Funciono!!!
Probe una sugerencia de Rafa,
Controlador:=CreateObject("DataLinkLibrary.IController")
A partir de ahi funciono perfecto.
Muchas gracias Antonio y Rafa.
Jorge Jaurena