Un recurso que encontré en la red hace mucho tiempo de como se pueden registrar componentes ActiveX, ya sean OCX o DLL (no DLL Win32).
El método en cuestión muestra el uso de las funciones DllRegisterServer() y DllUnregisterServer(). Estas funciones tienen la peculiaridad a la hora de ser declaradas de que no apuntan a una librería concreta como origen de la función si no hacia el componente que queremos registrar.
Este ejemplo muestra como registrar o eliminar del registro el componente "ComCtl32.OCX":
-
'KPD-Team 1999
-
'URL: http://www.allapi.net/
-
'E-Mail: KPDTeam@Allapi.net
-
-
Declare Function DllRegisterServer Lib "ComCtl32.OCX" () As Long
-
Declare Function DllUnregisterServer Lib "ComCtl32.OCX" () As Long
-
-
Const ERROR_SUCCESS = &H0
-
-
' Para instalar el componente del sistema utilizar esta función:
-
If DllRegisterServer = ERROR_SUCCESS Then
-
MsgBox "El componente ha sido instalado satisfactoriamente."
-
-
Else
-
MsgBox "Error al registrar el componente."
-
-
End If
-
-
' Para desinstalar el componente del sistema utilizar esta función:
-
If DllUnregisterServer = ERROR_SUCCESS Then
-
MsgBox "El componente ha sido desinstalado satisfactoriamente."
-
-
Else
-
MsgBox "El componente no ha podido ser eliminado del registro."
-
-
End If
