<?xml version="1.0" encoding="UTF-8"?>
<rss xmlns:content="http://purl.org/rss/1.0/modules/content/" xmlns:dc="http://purl.org/dc/elements/1.1/" xmlns:rdf="http://www.w3.org/1999/02/22-rdf-syntax-ns#" xmlns:taxo="http://purl.org/rss/1.0/modules/taxonomy/" version="2.0">
  <channel>
    <title>topic Re: Export PDF and STP in one rule in Inventor Programming - iLogic, Macros, AddIns &amp; Apprentice</title>
    <link>https://forums.autodesk.com/t5/inventor-programming-ilogic/export-pdf-and-stp-in-one-rule/m-p/12821830#M168166</link>
    <description>&lt;P&gt;Hi, here code to export to STEP&lt;BR /&gt;&lt;BR /&gt;&lt;BR /&gt;&lt;BR /&gt;sub main()&lt;/P&gt;&lt;P&gt;path_and_name = ThisDoc.PathAndFileName(False) ' without extension&lt;/P&gt;&lt;P&gt;oDataMedium = ThisApplication.TransientObjects.CreateDataMedium&lt;/P&gt;&lt;P&gt;'Set the destination file name&lt;BR /&gt;oDataMedium.FileName = path_and_name &amp;amp; ".stp"&lt;/P&gt;&lt;P&gt;'Publish document.&lt;BR /&gt;ThisDoc.Document.SaveAs(oDataMedium.FileName , True)&lt;/P&gt;&lt;P&gt;end sub&lt;/P&gt;</description>
    <pubDate>Thu, 06 Jun 2024 02:54:18 GMT</pubDate>
    <dc:creator>MANOLO007565</dc:creator>
    <dc:date>2024-06-06T02:54:18Z</dc:date>
    <item>
      <title>Export PDF and STP in one rule</title>
      <link>https://forums.autodesk.com/t5/inventor-programming-ilogic/export-pdf-and-stp-in-one-rule/m-p/11266524#M139832</link>
      <description>&lt;P&gt;I have a piece of code that exports a file from the .idw to a STP. I was wondering if that code could be adapted to export both a .stp and .pdf? Is this possible?&lt;/P&gt;&lt;P&gt;&amp;nbsp;&lt;/P&gt;&lt;P&gt;Here's the code: Export to STP&lt;/P&gt;&lt;P&gt;&amp;nbsp;&lt;/P&gt;&lt;P&gt;Dim doc As DrawingDocument = ThisDoc.Document&lt;/P&gt;&lt;P&gt;Dim sheet As Sheet = doc.ActiveSheet&lt;/P&gt;&lt;P&gt;Dim view As DrawingView = sheet.DrawingViews.Item(1)&lt;/P&gt;&lt;P&gt;Dim partDoc As PartDocument = view.ReferencedDocumentDescriptor.ReferencedDocument&lt;/P&gt;&lt;P&gt;&amp;nbsp;&lt;/P&gt;&lt;P&gt;' Get current location of this file&lt;/P&gt;&lt;P&gt;Dim ExportPath As String = ThisDoc.Path&lt;/P&gt;&lt;P&gt;&amp;nbsp;&lt;/P&gt;&lt;P&gt;' Check that this file has been saved and actually exists on disk&lt;/P&gt;&lt;P&gt;If String.IsNullOrEmpty(ExportPath) Then&lt;/P&gt;&lt;P&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; MsgBox("This file has not yet been saved and doesn't exist on disk!" _&lt;/P&gt;&lt;P&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; &amp;amp; vbLf &amp;amp; "Please save it first", 64, "Lord iLogic")&lt;/P&gt;&lt;P&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; Return&lt;/P&gt;&lt;P&gt;End If&lt;/P&gt;&lt;P&gt;&amp;nbsp;&lt;/P&gt;&lt;P&gt;Dim drawingNumber = iProperties.Value("Custom", "Drawing Number")&lt;/P&gt;&lt;P&gt;&amp;nbsp;&lt;/P&gt;&lt;P&gt;Dim dialog As Inventor.FileDialog&lt;/P&gt;&lt;P&gt;ThisApplication.CreateFileDialog(dialog)&lt;/P&gt;&lt;P&gt;&amp;nbsp;&lt;/P&gt;&lt;P&gt;dialog.InitialDirectory = ExportPath&lt;/P&gt;&lt;P&gt;dialog.FileName = drawingNumber&lt;/P&gt;&lt;P&gt;dialog.DialogTitle = "Save"&lt;/P&gt;&lt;P&gt;dialog.Filter = "Step files(*.stp)|*.stp|All Files (*.*)|*.*"&lt;/P&gt;&lt;P&gt;dialog.CancelError = True&lt;/P&gt;&lt;P&gt;Try&lt;/P&gt;&lt;P&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; dialog.ShowSave()&lt;/P&gt;&lt;P&gt;Catch ex As Exception&lt;/P&gt;&lt;P&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; Return&lt;/P&gt;&lt;P&gt;End Try&lt;/P&gt;&lt;P&gt;&amp;nbsp;&lt;/P&gt;&lt;P&gt;' Get the STEP translator Add-In.&lt;/P&gt;&lt;P&gt;Dim oSTEPTranslator As TranslatorAddIn = ThisApplication.ApplicationAddIns.ItemById("{90AF7F40-0C01-11D5-8E83-0010B541CD80}")&lt;/P&gt;&lt;P&gt;Dim oContext As TranslationContext = ThisApplication.TransientObjects.CreateTranslationContext&lt;/P&gt;&lt;P&gt;Dim oOptions As NameValueMap = ThisApplication.TransientObjects.CreateNameValueMap&lt;/P&gt;&lt;P&gt;&amp;nbsp;&lt;/P&gt;&lt;P&gt;If oSTEPTranslator.HasSaveCopyAsOptions(partDoc, oContext, oOptions) Then&lt;/P&gt;&lt;P&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; ' Set application protocol.&lt;/P&gt;&lt;P&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; ' 2 = AP 203 - Configuration Controlled Design&lt;/P&gt;&lt;P&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; ' 3 = AP 214 - Automotive Design&lt;/P&gt;&lt;P&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; oOptions.Value("ApplicationProtocolType") = 3&lt;/P&gt;&lt;P&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; ' Other options...&lt;/P&gt;&lt;P&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; 'oOptions.Value("Author") = ""&lt;/P&gt;&lt;P&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; 'oOptions.Value("Authorization") = ""&lt;/P&gt;&lt;P&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; 'oOptions.Value("Description") = ""&lt;/P&gt;&lt;P&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; 'oOptions.Value("Organization") = ""&lt;/P&gt;&lt;P&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; oContext.Type = IOMechanismEnum.kFileBrowseIOMechanism&lt;/P&gt;&lt;P&gt;&amp;nbsp;&lt;/P&gt;&lt;P&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; Dim oData As DataMedium = ThisApplication.TransientObjects.CreateDataMedium&lt;/P&gt;&lt;P&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; oData.FileName = dialog.FileName&lt;/P&gt;&lt;P&gt;&amp;nbsp;&lt;/P&gt;&lt;P&gt;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; oSTEPTranslator.SaveCopyAs(partDoc, oContext, oOptions, oData)&lt;/P&gt;&lt;P&gt;End If&lt;/P&gt;</description>
      <pubDate>Wed, 29 Jun 2022 12:55:17 GMT</pubDate>
      <guid>https://forums.autodesk.com/t5/inventor-programming-ilogic/export-pdf-and-stp-in-one-rule/m-p/11266524#M139832</guid>
      <dc:creator>donnie.morris</dc:creator>
      <dc:date>2022-06-29T12:55:17Z</dc:date>
    </item>
    <item>
      <title>Re: Export PDF and STP in one rule</title>
      <link>https://forums.autodesk.com/t5/inventor-programming-ilogic/export-pdf-and-stp-in-one-rule/m-p/11267359#M139836</link>
      <description>&lt;P&gt;Sure, after you export to .stp, export to pdf. There's an example in the API docs: &lt;A href="https://help.autodesk.com/view/INVNTOR/2019/ENU/?guid=GUID-CD4C38D2-FD05-4A2F-9FA7-C5EC5F845753" target="_blank" rel="noopener"&gt;Export to PDF&lt;/A&gt;&lt;/P&gt;&lt;P&gt;&amp;nbsp;&lt;/P&gt;&lt;P&gt;Some of the things in that code you've already done to get the .stp so you won't need to duplicate them for the pdf.&lt;/P&gt;</description>
      <pubDate>Wed, 29 Jun 2022 18:12:12 GMT</pubDate>
      <guid>https://forums.autodesk.com/t5/inventor-programming-ilogic/export-pdf-and-stp-in-one-rule/m-p/11267359#M139836</guid>
      <dc:creator>Zach.Stauffer</dc:creator>
      <dc:date>2022-06-29T18:12:12Z</dc:date>
    </item>
    <item>
      <title>Re: Export PDF and STP in one rule</title>
      <link>https://forums.autodesk.com/t5/inventor-programming-ilogic/export-pdf-and-stp-in-one-rule/m-p/11267470#M139838</link>
      <description>&lt;P&gt;I can get the code to create both the .stp and .pdf; however, the .pdf is not created in the selected directory, it defaults to the same directory as the .idw file.&lt;/P&gt;&lt;P&gt;&amp;nbsp;&lt;/P&gt;&lt;P&gt;Any help would be greatly appreciated.&lt;/P&gt;&lt;P&gt;&amp;nbsp;&lt;/P&gt;&lt;PRE&gt;&lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;doc&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;DrawingDocument&lt;/SPAN&gt; = &lt;SPAN&gt;ThisDoc&lt;/SPAN&gt;.&lt;SPAN&gt;Document&lt;/SPAN&gt;
&lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;sheet&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;Sheet&lt;/SPAN&gt; = &lt;SPAN&gt;doc&lt;/SPAN&gt;.&lt;SPAN&gt;ActiveSheet&lt;/SPAN&gt;
&lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;view&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;DrawingView&lt;/SPAN&gt; = &lt;SPAN&gt;sheet&lt;/SPAN&gt;.&lt;SPAN&gt;DrawingViews&lt;/SPAN&gt;.&lt;SPAN&gt;Item&lt;/SPAN&gt;(1)
&lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;partDoc&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;PartDocument&lt;/SPAN&gt; = &lt;SPAN&gt;view&lt;/SPAN&gt;.&lt;SPAN&gt;ReferencedDocumentDescriptor&lt;/SPAN&gt;.&lt;SPAN&gt;ReferencedDocument&lt;/SPAN&gt;

&lt;SPAN&gt;' Get current location of this file&lt;/SPAN&gt;
&lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;ExportPath&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;String&lt;/SPAN&gt; = &lt;SPAN&gt;ThisDoc&lt;/SPAN&gt;.&lt;SPAN&gt;Path&lt;/SPAN&gt;

&lt;SPAN&gt;' Check that this file has been saved and actually exists on disk&lt;/SPAN&gt;
&lt;SPAN&gt;If&lt;/SPAN&gt; &lt;SPAN&gt;String&lt;/SPAN&gt;.&lt;SPAN&gt;IsNullOrEmpty&lt;/SPAN&gt;(&lt;SPAN&gt;ExportPath&lt;/SPAN&gt;) &lt;SPAN&gt;Then&lt;/SPAN&gt;
	&lt;SPAN&gt;MsgBox&lt;/SPAN&gt;(&lt;SPAN&gt;"This file has not yet been saved and doesn't exist on disk!"&lt;/SPAN&gt; _
	&amp;amp; &lt;SPAN&gt;vbLf&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;"Please save it first"&lt;/SPAN&gt;, 64, &lt;SPAN&gt;"Lord iLogic"&lt;/SPAN&gt;)
	&lt;SPAN&gt;Return&lt;/SPAN&gt;
&lt;SPAN&gt;End&lt;/SPAN&gt; &lt;SPAN&gt;If&lt;/SPAN&gt;

&lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;drawingNumber&lt;/SPAN&gt; = &lt;SPAN&gt;iProperties&lt;/SPAN&gt;.&lt;SPAN&gt;Value&lt;/SPAN&gt;(&lt;SPAN&gt;"Custom"&lt;/SPAN&gt;, &lt;SPAN&gt;"Drawing Number"&lt;/SPAN&gt;)

&lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;dialog&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;Inventor&lt;/SPAN&gt;.&lt;SPAN&gt;FileDialog&lt;/SPAN&gt;
&lt;SPAN&gt;ThisApplication&lt;/SPAN&gt;.&lt;SPAN&gt;CreateFileDialog&lt;/SPAN&gt;(&lt;SPAN&gt;dialog&lt;/SPAN&gt;)

&lt;SPAN&gt;dialog&lt;/SPAN&gt;.&lt;SPAN&gt;InitialDirectory&lt;/SPAN&gt; = &lt;SPAN&gt;ExportPath&lt;/SPAN&gt;
&lt;SPAN&gt;dialog&lt;/SPAN&gt;.&lt;SPAN&gt;FileName&lt;/SPAN&gt; = &lt;SPAN&gt;drawingNumber&lt;/SPAN&gt;
&lt;SPAN&gt;dialog&lt;/SPAN&gt;.&lt;SPAN&gt;DialogTitle&lt;/SPAN&gt; = &lt;SPAN&gt;"Save"&lt;/SPAN&gt;
&lt;SPAN&gt;dialog&lt;/SPAN&gt;.&lt;SPAN&gt;Filter&lt;/SPAN&gt; = &lt;SPAN&gt;"Step files(*.stp)|*.stp|All Files (*.*)|*.*"&lt;/SPAN&gt;
&lt;SPAN&gt;dialog&lt;/SPAN&gt;.&lt;SPAN&gt;CancelError&lt;/SPAN&gt; = &lt;SPAN&gt;True&lt;/SPAN&gt;
&lt;SPAN&gt;Try&lt;/SPAN&gt;
	&lt;SPAN&gt;dialog&lt;/SPAN&gt;.&lt;SPAN&gt;ShowSave&lt;/SPAN&gt;()
&lt;SPAN&gt;Catch&lt;/SPAN&gt; &lt;SPAN&gt;ex&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;Exception&lt;/SPAN&gt;
	&lt;SPAN&gt;Return&lt;/SPAN&gt;
&lt;SPAN&gt;End&lt;/SPAN&gt; &lt;SPAN&gt;Try&lt;/SPAN&gt;

&lt;SPAN&gt;' Get the STEP translator Add-In.&lt;/SPAN&gt;
&lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;oSTEPTranslator&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;TranslatorAddIn&lt;/SPAN&gt; = &lt;SPAN&gt;ThisApplication&lt;/SPAN&gt;.&lt;SPAN&gt;ApplicationAddIns&lt;/SPAN&gt;.&lt;SPAN&gt;ItemById&lt;/SPAN&gt;(&lt;SPAN&gt;"{90AF7F40-0C01-11D5-8E83-0010B541CD80}"&lt;/SPAN&gt;)
&lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;oContext&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;TranslationContext&lt;/SPAN&gt; = &lt;SPAN&gt;ThisApplication&lt;/SPAN&gt;.&lt;SPAN&gt;TransientObjects&lt;/SPAN&gt;.&lt;SPAN&gt;CreateTranslationContext&lt;/SPAN&gt;
&lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;oOptions&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;NameValueMap&lt;/SPAN&gt; = &lt;SPAN&gt;ThisApplication&lt;/SPAN&gt;.&lt;SPAN&gt;TransientObjects&lt;/SPAN&gt;.&lt;SPAN&gt;CreateNameValueMap&lt;/SPAN&gt;

&lt;SPAN&gt;If&lt;/SPAN&gt; &lt;SPAN&gt;oSTEPTranslator&lt;/SPAN&gt;.&lt;SPAN&gt;HasSaveCopyAsOptions&lt;/SPAN&gt;(&lt;SPAN&gt;partDoc&lt;/SPAN&gt;, &lt;SPAN&gt;oContext&lt;/SPAN&gt;, &lt;SPAN&gt;oOptions&lt;/SPAN&gt;) &lt;SPAN&gt;Then&lt;/SPAN&gt;
	&lt;SPAN&gt;' Set application protocol.&lt;/SPAN&gt;
	&lt;SPAN&gt;' 2 = AP 203 - Configuration Controlled Design&lt;/SPAN&gt;
	&lt;SPAN&gt;' 3 = AP 214 - Automotive Design&lt;/SPAN&gt;
	&lt;SPAN&gt;oOptions&lt;/SPAN&gt;.&lt;SPAN&gt;Value&lt;/SPAN&gt;(&lt;SPAN&gt;"ApplicationProtocolType"&lt;/SPAN&gt;) = 3
	&lt;SPAN&gt;' Other options...&lt;/SPAN&gt;
	&lt;SPAN&gt;'oOptions.Value("Author") = ""&lt;/SPAN&gt;
	&lt;SPAN&gt;'oOptions.Value("Authorization") = ""&lt;/SPAN&gt;
	&lt;SPAN&gt;'oOptions.Value("Description") = ""&lt;/SPAN&gt;
	&lt;SPAN&gt;'oOptions.Value("Organization") = ""&lt;/SPAN&gt;
	&lt;SPAN&gt;oContext&lt;/SPAN&gt;.&lt;SPAN&gt;Type&lt;/SPAN&gt; = &lt;SPAN&gt;IOMechanismEnum&lt;/SPAN&gt;.&lt;SPAN&gt;kFileBrowseIOMechanism&lt;/SPAN&gt;

	&lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;oData&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;DataMedium&lt;/SPAN&gt; = &lt;SPAN&gt;ThisApplication&lt;/SPAN&gt;.&lt;SPAN&gt;TransientObjects&lt;/SPAN&gt;.&lt;SPAN&gt;CreateDataMedium&lt;/SPAN&gt;
	&lt;SPAN&gt;oData&lt;/SPAN&gt;.&lt;SPAN&gt;FileName&lt;/SPAN&gt; = &lt;SPAN&gt;dialog&lt;/SPAN&gt;.&lt;SPAN&gt;FileName&lt;/SPAN&gt;

	&lt;SPAN&gt;oSTEPTranslator&lt;/SPAN&gt;.&lt;SPAN&gt;SaveCopyAs&lt;/SPAN&gt;(&lt;SPAN&gt;partDoc&lt;/SPAN&gt;, &lt;SPAN&gt;oContext&lt;/SPAN&gt;, &lt;SPAN&gt;oOptions&lt;/SPAN&gt;, &lt;SPAN&gt;oData&lt;/SPAN&gt;)
&lt;SPAN&gt;End&lt;/SPAN&gt; &lt;SPAN&gt;If&lt;/SPAN&gt; 


&lt;SPAN&gt;oFileName&lt;/SPAN&gt; = &lt;SPAN&gt;iProperties&lt;/SPAN&gt;.&lt;SPAN&gt;Value&lt;/SPAN&gt;(&lt;SPAN&gt;"Custom"&lt;/SPAN&gt;, &lt;SPAN&gt;"Drawing Number"&lt;/SPAN&gt;)

&lt;SPAN&gt;' Define the filename of the file to be exported&lt;/SPAN&gt;
&lt;SPAN&gt;' In this Case it Is a PDF file extension&lt;/SPAN&gt;
&lt;SPAN&gt;ExportFilename&lt;/SPAN&gt; = &lt;SPAN&gt;oFileName&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;".pdf"&lt;/SPAN&gt;

&lt;SPAN&gt;oPDFAddIn&lt;/SPAN&gt; = &lt;SPAN&gt;ThisApplication&lt;/SPAN&gt;.&lt;SPAN&gt;ApplicationAddIns&lt;/SPAN&gt;.&lt;SPAN&gt;ItemById&lt;/SPAN&gt; _
(&lt;SPAN&gt;"{0AC6FD96-2F4D-42CE-8BE0-8AEA580399E4}"&lt;/SPAN&gt;)
&lt;SPAN&gt;oDocument&lt;/SPAN&gt; = &lt;SPAN&gt;ThisApplication&lt;/SPAN&gt;.&lt;SPAN&gt;ActiveDocument&lt;/SPAN&gt;
&lt;SPAN&gt;oContext&lt;/SPAN&gt; = &lt;SPAN&gt;ThisApplication&lt;/SPAN&gt;.&lt;SPAN&gt;TransientObjects&lt;/SPAN&gt;.&lt;SPAN&gt;CreateTranslationContext&lt;/SPAN&gt;
&lt;SPAN&gt;oContext&lt;/SPAN&gt;.&lt;SPAN&gt;Type&lt;/SPAN&gt; = &lt;SPAN&gt;IOMechanismEnum&lt;/SPAN&gt;.&lt;SPAN&gt;kFileBrowseIOMechanism&lt;/SPAN&gt;
&lt;SPAN&gt;oOptions&lt;/SPAN&gt; = &lt;SPAN&gt;ThisApplication&lt;/SPAN&gt;.&lt;SPAN&gt;TransientObjects&lt;/SPAN&gt;.&lt;SPAN&gt;CreateNameValueMap&lt;/SPAN&gt;
&lt;SPAN&gt;oDataMedium&lt;/SPAN&gt; = &lt;SPAN&gt;ThisApplication&lt;/SPAN&gt;.&lt;SPAN&gt;TransientObjects&lt;/SPAN&gt;.&lt;SPAN&gt;CreateDataMedium&lt;/SPAN&gt;

&lt;SPAN&gt;'set PDF Options&lt;/SPAN&gt;
&lt;SPAN&gt;oOptions&lt;/SPAN&gt;.&lt;SPAN&gt;Value&lt;/SPAN&gt;(&lt;SPAN&gt;"All_Color_AS_Black"&lt;/SPAN&gt;) = 1
&lt;SPAN&gt;oOptions&lt;/SPAN&gt;.&lt;SPAN&gt;Value&lt;/SPAN&gt;(&lt;SPAN&gt;"Remove_Line_Weights"&lt;/SPAN&gt;) = 1
&lt;SPAN&gt;oOptions&lt;/SPAN&gt;.&lt;SPAN&gt;Value&lt;/SPAN&gt;(&lt;SPAN&gt;"Vector_Resolution"&lt;/SPAN&gt;) = 400
&lt;SPAN&gt;oOptions&lt;/SPAN&gt;.&lt;SPAN&gt;Value&lt;/SPAN&gt;(&lt;SPAN&gt;"Sheet_Range"&lt;/SPAN&gt;) = &lt;SPAN&gt;Inventor&lt;/SPAN&gt;.&lt;SPAN&gt;PrintRangeEnum&lt;/SPAN&gt;.&lt;SPAN&gt;kPrintAllSheets&lt;/SPAN&gt;

&lt;SPAN&gt;'Set the PDF target file name&lt;/SPAN&gt;
&lt;SPAN&gt;oDataMedium&lt;/SPAN&gt;.&lt;SPAN&gt;FileName&lt;/SPAN&gt; = &lt;SPAN&gt;ExportPath&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;ExportFilename&lt;/SPAN&gt;

&lt;SPAN&gt;Try&lt;/SPAN&gt; 
	&lt;SPAN&gt;'Publish document&lt;/SPAN&gt;
	&lt;SPAN&gt;oPDFAddIn&lt;/SPAN&gt;.&lt;SPAN&gt;SaveCopyAs&lt;/SPAN&gt;(&lt;SPAN&gt;oDocument&lt;/SPAN&gt;, &lt;SPAN&gt;oContext&lt;/SPAN&gt;, &lt;SPAN&gt;oOptions&lt;/SPAN&gt;, &lt;SPAN&gt;oDataMedium&lt;/SPAN&gt;)
&lt;SPAN&gt;Catch&lt;/SPAN&gt;
	&lt;SPAN&gt;MessageBox&lt;/SPAN&gt;.&lt;SPAN&gt;Show&lt;/SPAN&gt;(&lt;SPAN&gt;"Error writing out PDF"&lt;/SPAN&gt;, &lt;SPAN&gt;"iLogic"&lt;/SPAN&gt;)
	&lt;SPAN&gt;bError&lt;/SPAN&gt; = &lt;SPAN&gt;True&lt;/SPAN&gt;
&lt;SPAN&gt;End&lt;/SPAN&gt; &lt;SPAN&gt;Try&lt;/SPAN&gt;

&lt;SPAN&gt;If&lt;/SPAN&gt; &lt;SPAN&gt;bError&lt;/SPAN&gt; &amp;lt;&amp;gt; &lt;SPAN&gt;True&lt;/SPAN&gt; &lt;SPAN&gt;Then&lt;/SPAN&gt;
	&lt;SPAN&gt;'Ask user If they want To open (launch) the file we just exported...&lt;/SPAN&gt;
	&lt;SPAN&gt;oMessage&lt;/SPAN&gt; = &lt;SPAN&gt;"File exported: "&lt;/SPAN&gt; &amp;amp; _
			&lt;SPAN&gt;ExportPath&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;ExportFilename&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;vbLf&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;vbLf&lt;/SPAN&gt; &amp;amp; _
			&lt;SPAN&gt;"Do you want to open the PDF Now?"&lt;/SPAN&gt;
			
	&lt;SPAN&gt;oQuestion&lt;/SPAN&gt; = &lt;SPAN&gt;MessageBox&lt;/SPAN&gt;.&lt;SPAN&gt;Show&lt;/SPAN&gt;(&lt;SPAN&gt;oMessage&lt;/SPAN&gt;, _
	&lt;SPAN&gt;"Lord iLogic - File Exported"&lt;/SPAN&gt;,&lt;SPAN&gt;MessageBoxButtons&lt;/SPAN&gt;.&lt;SPAN&gt;YesNo&lt;/SPAN&gt;)
	
	&lt;SPAN&gt;If&lt;/SPAN&gt; &lt;SPAN&gt;oQuestion&lt;/SPAN&gt; = &lt;SPAN&gt;vbYes&lt;/SPAN&gt; &lt;SPAN&gt;Then&lt;/SPAN&gt;
		&lt;SPAN&gt;ThisDoc&lt;/SPAN&gt;.&lt;SPAN&gt;Launch&lt;/SPAN&gt;(&lt;SPAN&gt;ExportPath&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;ExportFilename&lt;/SPAN&gt;)
	&lt;SPAN&gt;End&lt;/SPAN&gt; &lt;SPAN&gt;If&lt;/SPAN&gt;

&lt;SPAN&gt;End&lt;/SPAN&gt; &lt;SPAN&gt;If&lt;/SPAN&gt;

&lt;/PRE&gt;</description>
      <pubDate>Wed, 29 Jun 2022 18:59:59 GMT</pubDate>
      <guid>https://forums.autodesk.com/t5/inventor-programming-ilogic/export-pdf-and-stp-in-one-rule/m-p/11267470#M139838</guid>
      <dc:creator>donnie.morris</dc:creator>
      <dc:date>2022-06-29T18:59:59Z</dc:date>
    </item>
    <item>
      <title>Re: Export PDF and STP in one rule</title>
      <link>https://forums.autodesk.com/t5/inventor-programming-ilogic/export-pdf-and-stp-in-one-rule/m-p/11267528#M139839</link>
      <description>&lt;P&gt;If you want both the .stp and the .pdf file in the same directory and with the same filename (except for extension), you can still use the result from the first FileDialog you use. You just have to change the extension of the save file, which is fairly easy to do. In your PDF section, instead of&lt;/P&gt;&lt;PRE&gt;&lt;SPAN&gt;'Set the PDF target file name&lt;/SPAN&gt;
&lt;SPAN&gt;oDataMedium&lt;/SPAN&gt;.&lt;SPAN&gt;FileName&lt;/SPAN&gt; = &lt;SPAN&gt;ExportPath&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;ExportFilename&lt;/SPAN&gt;&lt;/PRE&gt;&lt;P&gt;use this:&lt;/P&gt;&lt;LI-CODE lang="general"&gt;'Set the PDF target file name
oDataMedium.FileName = System.IO.Path.GetFileNameWithoutExtension(dialog.FileName)&amp;amp;".pdf"&lt;/LI-CODE&gt;&lt;P&gt;&amp;nbsp;&lt;/P&gt;</description>
      <pubDate>Wed, 29 Jun 2022 19:22:50 GMT</pubDate>
      <guid>https://forums.autodesk.com/t5/inventor-programming-ilogic/export-pdf-and-stp-in-one-rule/m-p/11267528#M139839</guid>
      <dc:creator>Zach.Stauffer</dc:creator>
      <dc:date>2022-06-29T19:22:50Z</dc:date>
    </item>
    <item>
      <title>Re: Export PDF and STP in one rule</title>
      <link>https://forums.autodesk.com/t5/inventor-programming-ilogic/export-pdf-and-stp-in-one-rule/m-p/11268023#M139847</link>
      <description>&lt;P&gt;So this rule looks at .idw files that contain an .ipt in order to create the .stp file. Can the rule be written for an .idw &amp;nbsp;that only contains .iam files.&lt;/P&gt;&lt;P&gt;&amp;nbsp;&lt;/P&gt;&lt;P&gt;I’m looking for a rule that will create .stp files for all .ipt files contained in the .iam used.&lt;/P&gt;&lt;P&gt;I’m not sure I’m asking the question correctly.&lt;/P&gt;</description>
      <pubDate>Thu, 30 Jun 2022 01:13:46 GMT</pubDate>
      <guid>https://forums.autodesk.com/t5/inventor-programming-ilogic/export-pdf-and-stp-in-one-rule/m-p/11268023#M139847</guid>
      <dc:creator>donnie.morris</dc:creator>
      <dc:date>2022-06-30T01:13:46Z</dc:date>
    </item>
    <item>
      <title>Re: Export PDF and STP in one rule</title>
      <link>https://forums.autodesk.com/t5/inventor-programming-ilogic/export-pdf-and-stp-in-one-rule/m-p/11268902#M139870</link>
      <description>&lt;P&gt;The rule can be written for an .idw with an assembly, or it can be written for an assembly itself. Which do you need?&lt;/P&gt;</description>
      <pubDate>Thu, 30 Jun 2022 11:54:54 GMT</pubDate>
      <guid>https://forums.autodesk.com/t5/inventor-programming-ilogic/export-pdf-and-stp-in-one-rule/m-p/11268902#M139870</guid>
      <dc:creator>Zach.Stauffer</dc:creator>
      <dc:date>2022-06-30T11:54:54Z</dc:date>
    </item>
    <item>
      <title>Re: Export PDF and STP in one rule</title>
      <link>https://forums.autodesk.com/t5/inventor-programming-ilogic/export-pdf-and-stp-in-one-rule/m-p/11269063#M139875</link>
      <description>I would like the rule to work from the .idw file.&lt;BR /&gt;</description>
      <pubDate>Thu, 30 Jun 2022 12:58:39 GMT</pubDate>
      <guid>https://forums.autodesk.com/t5/inventor-programming-ilogic/export-pdf-and-stp-in-one-rule/m-p/11269063#M139875</guid>
      <dc:creator>donnie.morris</dc:creator>
      <dc:date>2022-06-30T12:58:39Z</dc:date>
    </item>
    <item>
      <title>Re: Export PDF and STP in one rule</title>
      <link>https://forums.autodesk.com/t5/inventor-programming-ilogic/export-pdf-and-stp-in-one-rule/m-p/11269163#M139876</link>
      <description>&lt;P&gt;This rule assumes view #1 (normally the first view you placed) has the assembly you want to export .stp files from. It also assumes there are only parts, no subassemblies.&lt;/P&gt;&lt;LI-CODE lang="general"&gt;Imports System.Windows.Forms

Dim doc As DrawingDocument = ThisDoc.Document
Dim sheet As Sheet = doc.ActiveSheet
Dim view As DrawingView = sheet.DrawingViews.Item(1)
Dim assembyDoc As AssemblyDocument = view.ReferencedDocumentDescriptor.ReferencedDocument

' Get current location of this file
Dim ExportPath As String = ThisDoc.Path

' Check that this file has been saved and actually exists on disk
If String.IsNullOrEmpty(ExportPath) Then
	MsgBox("This file has not yet been saved and doesn't exist on disk!")
	Return
End If

Dim dialog = New FolderBrowserDialog()

dialog.SelectedPath = ExportPath

If dialog.ShowDialog() = DialogResult.OK Then
	For Each occurrence As ComponentOccurrence In assembyDoc.ComponentDefinition.Occurrences
		If (occurrence.DefinitionDocumentType = kPartDocumentObject) Then
			Dim partDoc As PartDocument = occurrence.Definition.Document
			
			' Get the STEP translator Add-In.
			Dim stepTranslator As TranslatorAddIn = ThisApplication.ApplicationAddIns.ItemById("{90AF7F40-0C01-11D5-8E83-0010B541CD80}")
			Dim translatorContext As TranslationContext = ThisApplication.TransientObjects.CreateTranslationContext
			Dim translatorOptions As NameValueMap = ThisApplication.TransientObjects.CreateNameValueMap

			If stepTranslator.HasSaveCopyAsOptions(partDoc, translatorContext, translatorOptions) Then
				translatorOptions.Value("ApplicationProtocolType") = 3
				translatorContext.Type = IOMechanismEnum.kFileBrowseIOMechanism

				Dim translatorData As DataMedium = ThisApplication.TransientObjects.CreateDataMedium
				translatorData.FileName = dialog.SelectedPath &amp;amp; "\" &amp;amp; System.IO.Path.ChangeExtension(partDoc.DisplayName, ".stp")

				stepTranslator.SaveCopyAs(partDoc, translatorContext, translatorOptions, translatorData)
			End If 
		End If
	Next
	
	
End If


&lt;/LI-CODE&gt;</description>
      <pubDate>Thu, 30 Jun 2022 13:32:50 GMT</pubDate>
      <guid>https://forums.autodesk.com/t5/inventor-programming-ilogic/export-pdf-and-stp-in-one-rule/m-p/11269163#M139876</guid>
      <dc:creator>Zach.Stauffer</dc:creator>
      <dc:date>2022-06-30T13:32:50Z</dc:date>
    </item>
    <item>
      <title>Re: Export PDF and STP in one rule</title>
      <link>https://forums.autodesk.com/t5/inventor-programming-ilogic/export-pdf-and-stp-in-one-rule/m-p/11269729#M139884</link>
      <description>&lt;P&gt;Is there a way to make the view selectable instead of defaulting to View 1?&lt;/P&gt;</description>
      <pubDate>Thu, 30 Jun 2022 17:05:39 GMT</pubDate>
      <guid>https://forums.autodesk.com/t5/inventor-programming-ilogic/export-pdf-and-stp-in-one-rule/m-p/11269729#M139884</guid>
      <dc:creator>donnie.morris</dc:creator>
      <dc:date>2022-06-30T17:05:39Z</dc:date>
    </item>
    <item>
      <title>Re: Export PDF and STP in one rule</title>
      <link>https://forums.autodesk.com/t5/inventor-programming-ilogic/export-pdf-and-stp-in-one-rule/m-p/11269801#M139885</link>
      <description>&lt;P&gt;Just change the first part to allow a view selection:&lt;/P&gt;&lt;P&gt;&amp;nbsp;&lt;/P&gt;&lt;LI-CODE lang="general"&gt;Dim view As DrawingView = ThisApplication.CommandManager.Pick(SelectionFilterEnum.kDrawingViewFilter, "Select View")&lt;/LI-CODE&gt;</description>
      <pubDate>Thu, 30 Jun 2022 17:39:28 GMT</pubDate>
      <guid>https://forums.autodesk.com/t5/inventor-programming-ilogic/export-pdf-and-stp-in-one-rule/m-p/11269801#M139885</guid>
      <dc:creator>Zach.Stauffer</dc:creator>
      <dc:date>2022-06-30T17:39:28Z</dc:date>
    </item>
    <item>
      <title>Re: Export PDF and STP in one rule</title>
      <link>https://forums.autodesk.com/t5/inventor-programming-ilogic/export-pdf-and-stp-in-one-rule/m-p/12821830#M168166</link>
      <description>&lt;P&gt;Hi, here code to export to STEP&lt;BR /&gt;&lt;BR /&gt;&lt;BR /&gt;&lt;BR /&gt;sub main()&lt;/P&gt;&lt;P&gt;path_and_name = ThisDoc.PathAndFileName(False) ' without extension&lt;/P&gt;&lt;P&gt;oDataMedium = ThisApplication.TransientObjects.CreateDataMedium&lt;/P&gt;&lt;P&gt;'Set the destination file name&lt;BR /&gt;oDataMedium.FileName = path_and_name &amp;amp; ".stp"&lt;/P&gt;&lt;P&gt;'Publish document.&lt;BR /&gt;ThisDoc.Document.SaveAs(oDataMedium.FileName , True)&lt;/P&gt;&lt;P&gt;end sub&lt;/P&gt;</description>
      <pubDate>Thu, 06 Jun 2024 02:54:18 GMT</pubDate>
      <guid>https://forums.autodesk.com/t5/inventor-programming-ilogic/export-pdf-and-stp-in-one-rule/m-p/12821830#M168166</guid>
      <dc:creator>MANOLO007565</dc:creator>
      <dc:date>2024-06-06T02:54:18Z</dc:date>
    </item>
  </channel>
</rss>

