Eventos de un ActiveX
Publicado por Cristina (1 intervención) el 21/10/2004 13:44:52
Hola, estoy creando una aplicacion Lotus que interactua con un programa propio de nuestra empresa, El programa genera eventos en el sistema y estamos intentando capturar estos eventos mediante código LotusScript realizando los siguiente:
Creamos Una página:
en la seccion global:
Dim miObjeto As Variant
y creamos una funcion global
Sub FuncionGlobal(Source As Variant)
'datos
End Sub
en la seccion de página, en PostOpen
Set miObjeto = CreateObject("MiApplicacion")
On Event OnEventAplicacion From miObjeto Call FuncionGlobal
Consigue instanciar bien la aplicacion, ejecutandose al iniciarse la página en Lotus Notes, pero la ejecucion queda parada en On Event
y da un error de Type.
Gracias.
Creamos Una página:
en la seccion global:
Dim miObjeto As Variant
y creamos una funcion global
Sub FuncionGlobal(Source As Variant)
'datos
End Sub
en la seccion de página, en PostOpen
Set miObjeto = CreateObject("MiApplicacion")
On Event OnEventAplicacion From miObjeto Call FuncionGlobal
Consigue instanciar bien la aplicacion, ejecutandose al iniciarse la página en Lotus Notes, pero la ejecucion queda parada en On Event
y da un error de Type.
Gracias.
Valora esta pregunta
0