Un oggetto EXE ActiveX espone una classe COM con eventi (PippoAux.Connector)
ritornata come valore di ritorno di un metodo GetConnector di un'altra classe COM ActiveX del componente (PippoAux.AppConnector)
Durante la chiamata del client per ottenere la classe esce errore di run-time 430
Dim WithEvents pc As PippoAux.Connector
Private Sub Command1_Click()
Dim pcloc As Object
Dim pcc As PippoAux.AppConnector
Set pcc = New PippoAux.AppConnector
Set pcloc = pcc.Connect()
Set pc = pcloc ' HERE ERROR 430
pc.SayHello
Set pcc = Nothing
End Sub
Sembra sia necessario rimuovere l'aggiornamento tornando alla versione precedente di oleaut32.dll (8/10/2006)
Così viene ripristinato il funzionamento corretto
Un oggetto EXE ActiveX espone una classe COM con eventi (PippoAux.Connector) ritornata come valore di ritorno di un metodo GetConnector di un'altra classe COM ActiveX del componente (PippoAux.AppConnector)
Durante la chiamata del client per ottenere la classe esce errore di run-time 430 Dim WithEvents pc As PippoAux.Connector
Private Sub Command1_Click() Dim pcloc As Object Dim pcc As PippoAux.AppConnector Set pcc = New PippoAux.AppConnector Set pcloc = pcc.Connect() Set pc = pcloc ' HERE ERROR 430 pc.SayHello Set pcc = Nothing End Sub
Sembra sia necessario rimuovere l'aggiornamento tornando alla versione precedente di oleaut32.dll (8/10/2006) Così viene ripristinato il funzionamento corretto