' Некий код

Dim MyObj As Object

Set MyObj = CreateObject("EventLogger.ajpEventLogger")
А это - после... В самом начале должен был быть текст...