topic-31893

horacio

Posts: 1364

Joined: Wed Jun 21, 2006 12:39 AM

Listar ocx
Posted: Mon Feb 01, 2016 12:54 PM

Colegas, hay alguna manera de obtener los ocx instalados en una máquina. Desde ya muy agradecido.

Saludos

karinha

Posts: 8515

Joined: Tue Dec 20, 2005 07:36 PM

Re: Listar ocx
Posted: Mon Feb 01, 2016 02:18 PM

Algo asi?

http://forums.fivetechsupport.com/viewtopic.php?f=6&t=14213&p=73288&hilit=ReportManX%2F3+DISP_E_MEMBERNOTFOUND%3A+EXECUTE#p73288

João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341

karinha

Posts: 8515

Joined: Tue Dec 20, 2005 07:36 PM

Re: Listar ocx
Posted: Mon Feb 01, 2016 02:25 PM

Ejiste algo asi en Fivewin for xHarbour?

Code (fw): Select all Collapse

*** Estou verficando a dll msvbvm60 
DECLARE LONG DllRegisterServer IN [MSVBVM60.DLL] 
LOCAL M.OK 
M.OK=.F. 
IF DllRegisterServer() = 0 
    messagebox('A DLL MSVBVM60 ESTA REGISTRADa !!!') 
    M.OK=.T. 
ELSE 
    messagebox('NÃO ESTA REGISTRADO !!!') 
 Run /N  regsvr32 nomedasuaDLL.dll 
ENDIF

João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341

Antonio Linares

Posts: 44158

Joined: Thu Oct 06, 2005 05:47 PM

Re: Listar ocx
Posted: Mon Feb 01, 2016 04:03 PM

Prueba asi:

REGISTERSERVER( "MSVBVM60.DLL" ) --> HRESULT

regards, saludos

Antonio Linares
www.fivetechsoft.com

Antonio Linares

Posts: 44158

Joined: Thu Oct 06, 2005 05:47 PM

Re: Listar ocx
Posted: Mon Feb 01, 2016 04:04 PM

Code (fw): Select all Collapse

LOCAL M.OK 
M.OK=.F. 
IF RegisterServer( "MSVBVM60.DLL" ) = 0 
    messagebox('A DLL MSVBVM60 ESTA REGISTRADa !!!') 
    M.OK=.T. 
ELSE 
    messagebox('NÃO ESTA REGISTRADO !!!') 
 Run /N  regsvr32 nomedasuaDLL.dll 
ENDIF

regards, saludos

Antonio Linares
www.fivetechsoft.com

horacio

Posts: 1364

Joined: Wed Jun 21, 2006 12:39 AM

Re: Listar ocx
Posted: Mon Feb 01, 2016 09:53 PM

Muchas gracias Karinha y Antonio. Pruebo y comento.

Saludos

FiveTech Support Forums

Continue the discussion