OnSaveDocument : save copy

[Anonymous]

Hi,

I have this problem, I would like to use onsavedocument event only for save as copy:

How can I find if I'm saving the file or I'm saving a copy?

Private Sub mobjApplicationEvents_OnSaveDocument(ByVal DocumentObject As Inventor.Document, ByVal BeforeOrAfter As Inventor.EventTimingEnum, ByVal Context As Inventor.NameValueMap, ByRef HandlingCode As Inventor.HandlingCodeEnum) Handles mobjApplicationEvents.OnSaveDocument

.....

????

.....

EndSub

Could someone help me?

Thanks

Massimo

[Anonymous · Accepted solution]

Solved with:

Dim invtSaveAsFlag As Boolean
' per intercettare il salva copia
Private Sub aainvtFileEvents_OnFileSaveAsDialog(FileTypes() As String, ByVal, SaveCopyAs As Boolean, ByVal ParentHWND As Long, FileName As String, HandlingCode As Inventor.HandlingCodeEnum) handles mobjFileevents.OnFileSaveAsDialog

invtSaveAsFlag = True

End Sub