Message 1 of 2
Ilogic rule for exporting DWFx that includes iProperties
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report
Hi guys, we are looking for some ilogic code that exports a DWFx file that includes the meta data / iProperties. Does anyone know if its possible? We know its possible with DWG files - when viewing a DWG file in Vault it has all the fields filled out (Description, subject, designer etc.). Anyone help would be greatly appreciated!
DWG in Vault - This is how we want the DWFx files to look like:
DWFx file in Vault - No Meta Data:
This is what I have so far to export the DWFx from jLane in this post:
i = MessageBox.Show ("Launch the viewer now?", "Title",MessageBoxButtons.YesNo) If i = vbYes Then : launchviewer = 1 : Else : launchviewer = 0 : End If path_and_name = ThisDoc.PathAndFileName (False) ' without extension DWFAddIn = ThisApplication.ApplicationAddIns.ItemById("{0AC6FD95-2F4D-42CE-8BE0-8AEA580399E4}") oDocument = ThisApplication.ActiveDocument oContext = ThisApplication.TransientObjects.CreateTranslationContext oContext.Type = IOMechanismEnum.kFileBrowseIOMechanism oOptions = ThisApplication.TransientObjects.CreateNameValueMap oDataMedium = ThisApplication.TransientObjects.CreateDataMedium If DWFAddIn.HasSaveCopyAsOptions (oDataMedium, oContext, oOptions) Then oOptions.Value("Launch_Viewer") = launchviewer oOptions.Value("Publish_All_Component_Props") = 1 oOptions.Value ("Publish_All_Phvsical Props") = 1 oOptions.Value("Publish_All_User_Defined_Properties_Props") = 1 oOptions.Value("Publish_All_Summary_Information_Props") = 1 oOptions.Value("Publish_All_Document_Summary_Information_Props") = 1 oOptions.Value("Publish_All_Design_Tracking_Properties_Props") = 1 oOptions.Value("Password") = 0 oOptions.Value("Publish_Mode") = DWFPublishModeEnum.kCompleteDWFPublish End If 'Set the destination file name oDataMedium.FileName = path_and_name & ".dwfx" 'Publish document. Call DWFAddIn.SaveCopyAs (oDocument, oContext, oOptions, oDataMedium) If launchviewer = 1 Then ThisDoc.Launch(path_and_name & ".dwfx")