Имеется ActiveX exe на VB. В нём реализована бизнес логика. Классы ActiveX генерят события(RaiseEvent). При установке и клиентской части и ActiveX на одной машине всё работает, но ежели ActiveX установить на сервер возникает проблема. Если объект объявлен как Withevents возникает ошибка Permission denide. Ежели Withevents убрать, всё работает.
Private tColNet As colNet
Private WithEvents m_Noti As Notification
Private Sub Form_Load()
Set tColNet = New srvVBNet.colNet 'Здесь работает
Set m_Noti = New srvVBNet.Notification 'А здесь НЕ работает :-((((
End Sub