Hi, you will find more information here: http://wiki.services.openoffice.org/wiki/Documentation/DevGuide/OfficeDev/Document_Events
OPTION EXPLICIT Sub setDocEvent() Dim oDoc as Object Dim mEvt(1) as New com.sun.star.beans.PropertyValue oDoc = ThisComponent mEvt(0).Name = "EventType" mEvt(0).Value= "Script" mEvt(1).Name = "Script" mEvt(1).Value ="vnd.sun.star.script:Standard.Module7.test?language=Basic&location=application" oDoc.getEvents().replaceByName("OnPrepareUnload", mEvt()) End Sub Regards Oliver -- GnuPG key 0xCFD04A45: 8822 057F 4956 46D3 352C 1A06 4E2C AB40 CFD0 4A45
signature.asc
Description: OpenPGP digital signature