<?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 Error handling in Inventor Programming - iLogic, Macros, AddIns &amp; Apprentice</title>
    <link>https://forums.autodesk.com/t5/inventor-programming-ilogic/error-handling/m-p/12086064#M154907</link>
    <description>&lt;P&gt;Hi all,&lt;/P&gt;&lt;P&gt;&amp;nbsp;&lt;/P&gt;&lt;P&gt;I have the ilogic rule below to export flat pattern of sheet metal parts.&lt;/P&gt;&lt;P&gt;I have found it online and made some mods. Have been used it for months and just now spotted it don't work properly when in the assembly there are sheet metal parts with problems (multi body parts, or parts that cannot flatten). It looks the Ilogic rules stops. It doesn't export the parts with problems (as expected), but misses good parts as well.&lt;/P&gt;&lt;P&gt;I would like to modify so on error to keep going and at the end to show a txt file with the list of the problematic files.&lt;/P&gt;&lt;P&gt;&amp;nbsp;&lt;/P&gt;&lt;P&gt;&amp;nbsp;&lt;/P&gt;&lt;LI-CODE lang="general"&gt;Sub Main()
oPath = ThisDoc.Path
Dim oAsmDoc As AssemblyDocument = ThisDoc.Document
Dim AssyDef As AssemblyComponentDefinition 
AssyDef = oAsmDoc.ComponentDefinition
Dim oAsmName = oAsmDoc.DisplayName.Replace(".iam", "")
Dim New_Folder_Path As String = oPath &amp;amp; "\" &amp;amp; oAsmName &amp;amp; " - LASER"
My.Computer.FileSystem.CreateDirectory(New_Folder_Path) 


Dim oMaterial As String
ExpSettingQuestion = MessageBox.Show("Do you want to export Bend Lines?", "DXF Export Settings", MessageBoxButtons.YesNo)
For Each doc As Document In oAsmDoc.AllReferencedDocuments
If doc.SubType = "{9C464203-9BAE-11D3-8BAD-0060B0CE6BB4}" Then
	Dim RefOccs As ComponentOccurrencesEnumerator 
	RefOccs = AssyDef.Occurrences.AllReferencedOccurrences(doc)
		If RefOccs.Count &amp;gt;0 Then 	
Try
oMaterial = doc.ComponentDefinition.Material.Name
oThickness = doc.ComponentDefinition.Thickness.value*10
Material_Path = New_Folder_Path &amp;amp; "\" &amp;amp; oMaterial &amp;amp; " -  " &amp;amp; oThickness &amp;amp; "mm" 

Try
My.Computer.FileSystem.CreateDirectory(Material_Path)
Catch
End Try
If ExpSettingQuestion = vbYes  Then

Call Make_DXF(doc,oAsmDoc, Rev_Level, Material_Path,oThickness,oMaterial)
Else If ExpSettingQuestion = vbNo Then
	Call Make_DXF1(doc,oAsmDoc, Rev_Level, Material_Path,oThickness,oMaterial)
	End If
Catch
End Try
InventorVb.DocumentUpdate()
	iLogicVb.UpdateWhenDone = True
End If
End If

Next
MsgBox("DXF Export Complete",,"All Done")

End Sub

Sub Make_DXF(oDoc As Document,AsmDoc As Document, Rev_L As String, File_Location As String,oThickness As Double ,oMaterial As String)
'Get the ActiveLevelOfDetailRepresentation Name
doc = ThisDoc.Document
Dim oAssyDef As AssemblyComponentDefinition = doc.ComponentDefinition
Dim MyLOD_Name As String
MyLOD_Name = oAssyDef.RepresentationsManager.ActiveLevelOfDetailRepresentation.Name

If Not MyLOD_Name = "Master" Then
'activate master because only it can do the trick
    Call oAssyDef.RepresentationsManager.LevelOfDetailRepresentations.Item(1).Activate
End If
Dim oBOM As BOM = AsmDoc.ComponentDefinition.BOM
oBOM.PartsOnlyViewEnabled = True
Dim oBOMView As BOMView = oBOM.BOMViews.Item("Parts Only")

For Each oBOMRow As BOMRow In oBOMView.BOMRows
Dim rDoc As Document = oBOMRow.ComponentDefinitions.Item(1).Document
If rDoc.DisplayName = oDoc.DisplayName Then

Dim oQty As Integer = oBOMRow.TotalQuantity

ThisApplication.Documents.Open(oDoc.FullFileName, False)

Dim Part_Name As String = oDoc.DisplayName.Replace(".ipt", "")

Dim a As String = oDoc.PropertySets.Item("Design Tracking Properties").Item("Stock Number").Value

Dim oFilename As String = File_Location &amp;amp; "\" &amp;amp; Part_Name &amp;amp; " - " &amp;amp; oMaterial &amp;amp; " " &amp;amp; oThickness &amp;amp; "mm - " &amp;amp; oQty &amp;amp; " off.dxf"


ThisApplication.SilentOperation = True

Dim oCompDef As SheetMetalComponentDefinition = oDoc.ComponentDefinition

If oCompDef.HasFlatPattern = False Then
oCompDef.Unfold

oCompDef.FlatPattern.ExitEdit
End If

Dim optionList As List(Of String) = New List(Of String)()

			optionList.Add("AcadVersion=2004")
			optionList.Add("OuterProfileLayer=0")
			optionList.Add("InteriorProfilesLayer=0")
			optionList.Add("UnconsumedSketchesLayer=YELLOW")
			optionList.Add("UnconsumedSketchesLayerColor=255;255;0") 
			optionList.Add("BendUpLayer=YELLOW") 
			optionList.Add("BendUpLayerColor=255;255;0") 
			optionList.Add("BendDownLayer=YELLOW") 
			optionList.Add("BendDownLayerColor=255;255;0") 
			
			optionList.Add("MarkSurfaceUpLayer=YELLOW") 
			optionList.Add("MarkSurfaceUpLayerColor=255;255;0")
			optionList.Add("MarkSurfaceDownLayer=YELLOW") 
			optionList.Add("MarkSurfaceDownColor=255;255;0") 
			

			Dim sOut As String
			sOut = "FLAT PATTERN DXF?AcadVersion=2000" _
			+ "&amp;amp;InvisibleLayers=IV_TANGENT;IV_FEATURE_PROFILES;IV_ARC_CENTERS;IV_TOOL_CENTER;IV_TOOL_CENTER_DOWN;IV_FEATURE_PROFILES_DOWN"


			For Each opt In optionList
				sOut = sOut &amp;amp; "&amp;amp;" &amp;amp; opt
			Next
			sOut = sOut &amp;amp; "?OFILE"
			oCompDef.DataIO.WriteDataToFile(sOut, oFilename)

oCompDef.FlatPattern.ExitEdit
oDoc.Close
Exit For
End If
Next
oAssyDef.RepresentationsManager.LevelOfDetailRepresentations.Item(MyLOD_Name).Activate
End Sub

Sub Make_DXF1(oDoc As Document,AsmDoc As Document, Rev_L As String, File_Location As String,oThickness As Double ,oMaterial As String)

doc = ThisDoc.Document
Dim oAssyDef As AssemblyComponentDefinition = doc.ComponentDefinition
Dim MyLOD_Name As String
MyLOD_Name = oAssyDef.RepresentationsManager.ActiveLevelOfDetailRepresentation.Name

If Not MyLOD_Name = "Master" Then

    Call oAssyDef.RepresentationsManager.LevelOfDetailRepresentations.Item(1).Activate
End If
Dim oBOM As BOM = AsmDoc.ComponentDefinition.BOM
oBOM.PartsOnlyViewEnabled = True
Dim oBOMView As BOMView = oBOM.BOMViews.Item("Parts Only")

For Each oBOMRow As BOMRow In oBOMView.BOMRows
Dim rDoc As Document = oBOMRow.ComponentDefinitions.Item(1).Document
If rDoc.DisplayName = oDoc.DisplayName Then

Dim oQty As Integer = oBOMRow.TotalQuantity

ThisApplication.Documents.Open(oDoc.FullFileName, False)

Dim Part_Name As String = oDoc.DisplayName.Replace(".ipt", "")

Dim a As String = oDoc.PropertySets.Item("Design Tracking Properties").Item("Stock Number").Value

Dim oFilename As String = File_Location &amp;amp; "\" &amp;amp; Part_Name &amp;amp; " - " &amp;amp; oMaterial &amp;amp; " " &amp;amp; oThickness &amp;amp; "mm - " &amp;amp; oQty &amp;amp; " off.dxf"

ThisApplication.SilentOperation = True

Dim oCompDef As SheetMetalComponentDefinition = oDoc.ComponentDefinition

If oCompDef.HasFlatPattern = False Then
oCompDef.Unfold

oCompDef.FlatPattern.ExitEdit
End If

Dim optionList As List(Of String) = New List(Of String)()

			optionList.Add("AcadVersion=2004")
			optionList.Add("OuterProfileLayer=0")
			optionList.Add("InteriorProfilesLayer=0")
			optionList.Add("UnconsumedSketchesLayer=YELLOW")
			optionList.Add("UnconsumedSketchesLayerColor=255;255;0")
	
			optionList.Add("") 
			optionList.Add("") 
			

			Dim sOut As String
			sOut = "FLAT PATTERN DXF?AcadVersion=2000" _
			+ "&amp;amp;InvisibleLayers=IV_TANGENT;IV_FEATURE_PROFILES;IV_ARC_CENTERS;IV_BEND;IV_BEND_DOWN;IV_TOOL_CENTER;IV_TOOL_CENTER_DOWN;IV_FEATURE_PROFILES_DOWN"

			For Each opt In optionList
				sOut = sOut &amp;amp; "&amp;amp;" &amp;amp; opt
			Next
			sOut = sOut &amp;amp; "?OFILE"
			oCompDef.DataIO.WriteDataToFile(sOut, oFilename)
			

oCompDef.FlatPattern.ExitEdit
oDoc.Close
Exit For
End If
Next
oAssyDef.RepresentationsManager.LevelOfDetailRepresentations.Item(MyLOD_Name).Activate
End Sub&lt;/LI-CODE&gt;</description>
    <pubDate>Fri, 07 Jul 2023 11:48:21 GMT</pubDate>
    <dc:creator>aurel_e</dc:creator>
    <dc:date>2023-07-07T11:48:21Z</dc:date>
    <item>
      <title>Error handling</title>
      <link>https://forums.autodesk.com/t5/inventor-programming-ilogic/error-handling/m-p/12086064#M154907</link>
      <description>&lt;P&gt;Hi all,&lt;/P&gt;&lt;P&gt;&amp;nbsp;&lt;/P&gt;&lt;P&gt;I have the ilogic rule below to export flat pattern of sheet metal parts.&lt;/P&gt;&lt;P&gt;I have found it online and made some mods. Have been used it for months and just now spotted it don't work properly when in the assembly there are sheet metal parts with problems (multi body parts, or parts that cannot flatten). It looks the Ilogic rules stops. It doesn't export the parts with problems (as expected), but misses good parts as well.&lt;/P&gt;&lt;P&gt;I would like to modify so on error to keep going and at the end to show a txt file with the list of the problematic files.&lt;/P&gt;&lt;P&gt;&amp;nbsp;&lt;/P&gt;&lt;P&gt;&amp;nbsp;&lt;/P&gt;&lt;LI-CODE lang="general"&gt;Sub Main()
oPath = ThisDoc.Path
Dim oAsmDoc As AssemblyDocument = ThisDoc.Document
Dim AssyDef As AssemblyComponentDefinition 
AssyDef = oAsmDoc.ComponentDefinition
Dim oAsmName = oAsmDoc.DisplayName.Replace(".iam", "")
Dim New_Folder_Path As String = oPath &amp;amp; "\" &amp;amp; oAsmName &amp;amp; " - LASER"
My.Computer.FileSystem.CreateDirectory(New_Folder_Path) 


Dim oMaterial As String
ExpSettingQuestion = MessageBox.Show("Do you want to export Bend Lines?", "DXF Export Settings", MessageBoxButtons.YesNo)
For Each doc As Document In oAsmDoc.AllReferencedDocuments
If doc.SubType = "{9C464203-9BAE-11D3-8BAD-0060B0CE6BB4}" Then
	Dim RefOccs As ComponentOccurrencesEnumerator 
	RefOccs = AssyDef.Occurrences.AllReferencedOccurrences(doc)
		If RefOccs.Count &amp;gt;0 Then 	
Try
oMaterial = doc.ComponentDefinition.Material.Name
oThickness = doc.ComponentDefinition.Thickness.value*10
Material_Path = New_Folder_Path &amp;amp; "\" &amp;amp; oMaterial &amp;amp; " -  " &amp;amp; oThickness &amp;amp; "mm" 

Try
My.Computer.FileSystem.CreateDirectory(Material_Path)
Catch
End Try
If ExpSettingQuestion = vbYes  Then

Call Make_DXF(doc,oAsmDoc, Rev_Level, Material_Path,oThickness,oMaterial)
Else If ExpSettingQuestion = vbNo Then
	Call Make_DXF1(doc,oAsmDoc, Rev_Level, Material_Path,oThickness,oMaterial)
	End If
Catch
End Try
InventorVb.DocumentUpdate()
	iLogicVb.UpdateWhenDone = True
End If
End If

Next
MsgBox("DXF Export Complete",,"All Done")

End Sub

Sub Make_DXF(oDoc As Document,AsmDoc As Document, Rev_L As String, File_Location As String,oThickness As Double ,oMaterial As String)
'Get the ActiveLevelOfDetailRepresentation Name
doc = ThisDoc.Document
Dim oAssyDef As AssemblyComponentDefinition = doc.ComponentDefinition
Dim MyLOD_Name As String
MyLOD_Name = oAssyDef.RepresentationsManager.ActiveLevelOfDetailRepresentation.Name

If Not MyLOD_Name = "Master" Then
'activate master because only it can do the trick
    Call oAssyDef.RepresentationsManager.LevelOfDetailRepresentations.Item(1).Activate
End If
Dim oBOM As BOM = AsmDoc.ComponentDefinition.BOM
oBOM.PartsOnlyViewEnabled = True
Dim oBOMView As BOMView = oBOM.BOMViews.Item("Parts Only")

For Each oBOMRow As BOMRow In oBOMView.BOMRows
Dim rDoc As Document = oBOMRow.ComponentDefinitions.Item(1).Document
If rDoc.DisplayName = oDoc.DisplayName Then

Dim oQty As Integer = oBOMRow.TotalQuantity

ThisApplication.Documents.Open(oDoc.FullFileName, False)

Dim Part_Name As String = oDoc.DisplayName.Replace(".ipt", "")

Dim a As String = oDoc.PropertySets.Item("Design Tracking Properties").Item("Stock Number").Value

Dim oFilename As String = File_Location &amp;amp; "\" &amp;amp; Part_Name &amp;amp; " - " &amp;amp; oMaterial &amp;amp; " " &amp;amp; oThickness &amp;amp; "mm - " &amp;amp; oQty &amp;amp; " off.dxf"


ThisApplication.SilentOperation = True

Dim oCompDef As SheetMetalComponentDefinition = oDoc.ComponentDefinition

If oCompDef.HasFlatPattern = False Then
oCompDef.Unfold

oCompDef.FlatPattern.ExitEdit
End If

Dim optionList As List(Of String) = New List(Of String)()

			optionList.Add("AcadVersion=2004")
			optionList.Add("OuterProfileLayer=0")
			optionList.Add("InteriorProfilesLayer=0")
			optionList.Add("UnconsumedSketchesLayer=YELLOW")
			optionList.Add("UnconsumedSketchesLayerColor=255;255;0") 
			optionList.Add("BendUpLayer=YELLOW") 
			optionList.Add("BendUpLayerColor=255;255;0") 
			optionList.Add("BendDownLayer=YELLOW") 
			optionList.Add("BendDownLayerColor=255;255;0") 
			
			optionList.Add("MarkSurfaceUpLayer=YELLOW") 
			optionList.Add("MarkSurfaceUpLayerColor=255;255;0")
			optionList.Add("MarkSurfaceDownLayer=YELLOW") 
			optionList.Add("MarkSurfaceDownColor=255;255;0") 
			

			Dim sOut As String
			sOut = "FLAT PATTERN DXF?AcadVersion=2000" _
			+ "&amp;amp;InvisibleLayers=IV_TANGENT;IV_FEATURE_PROFILES;IV_ARC_CENTERS;IV_TOOL_CENTER;IV_TOOL_CENTER_DOWN;IV_FEATURE_PROFILES_DOWN"


			For Each opt In optionList
				sOut = sOut &amp;amp; "&amp;amp;" &amp;amp; opt
			Next
			sOut = sOut &amp;amp; "?OFILE"
			oCompDef.DataIO.WriteDataToFile(sOut, oFilename)

oCompDef.FlatPattern.ExitEdit
oDoc.Close
Exit For
End If
Next
oAssyDef.RepresentationsManager.LevelOfDetailRepresentations.Item(MyLOD_Name).Activate
End Sub

Sub Make_DXF1(oDoc As Document,AsmDoc As Document, Rev_L As String, File_Location As String,oThickness As Double ,oMaterial As String)

doc = ThisDoc.Document
Dim oAssyDef As AssemblyComponentDefinition = doc.ComponentDefinition
Dim MyLOD_Name As String
MyLOD_Name = oAssyDef.RepresentationsManager.ActiveLevelOfDetailRepresentation.Name

If Not MyLOD_Name = "Master" Then

    Call oAssyDef.RepresentationsManager.LevelOfDetailRepresentations.Item(1).Activate
End If
Dim oBOM As BOM = AsmDoc.ComponentDefinition.BOM
oBOM.PartsOnlyViewEnabled = True
Dim oBOMView As BOMView = oBOM.BOMViews.Item("Parts Only")

For Each oBOMRow As BOMRow In oBOMView.BOMRows
Dim rDoc As Document = oBOMRow.ComponentDefinitions.Item(1).Document
If rDoc.DisplayName = oDoc.DisplayName Then

Dim oQty As Integer = oBOMRow.TotalQuantity

ThisApplication.Documents.Open(oDoc.FullFileName, False)

Dim Part_Name As String = oDoc.DisplayName.Replace(".ipt", "")

Dim a As String = oDoc.PropertySets.Item("Design Tracking Properties").Item("Stock Number").Value

Dim oFilename As String = File_Location &amp;amp; "\" &amp;amp; Part_Name &amp;amp; " - " &amp;amp; oMaterial &amp;amp; " " &amp;amp; oThickness &amp;amp; "mm - " &amp;amp; oQty &amp;amp; " off.dxf"

ThisApplication.SilentOperation = True

Dim oCompDef As SheetMetalComponentDefinition = oDoc.ComponentDefinition

If oCompDef.HasFlatPattern = False Then
oCompDef.Unfold

oCompDef.FlatPattern.ExitEdit
End If

Dim optionList As List(Of String) = New List(Of String)()

			optionList.Add("AcadVersion=2004")
			optionList.Add("OuterProfileLayer=0")
			optionList.Add("InteriorProfilesLayer=0")
			optionList.Add("UnconsumedSketchesLayer=YELLOW")
			optionList.Add("UnconsumedSketchesLayerColor=255;255;0")
	
			optionList.Add("") 
			optionList.Add("") 
			

			Dim sOut As String
			sOut = "FLAT PATTERN DXF?AcadVersion=2000" _
			+ "&amp;amp;InvisibleLayers=IV_TANGENT;IV_FEATURE_PROFILES;IV_ARC_CENTERS;IV_BEND;IV_BEND_DOWN;IV_TOOL_CENTER;IV_TOOL_CENTER_DOWN;IV_FEATURE_PROFILES_DOWN"

			For Each opt In optionList
				sOut = sOut &amp;amp; "&amp;amp;" &amp;amp; opt
			Next
			sOut = sOut &amp;amp; "?OFILE"
			oCompDef.DataIO.WriteDataToFile(sOut, oFilename)
			

oCompDef.FlatPattern.ExitEdit
oDoc.Close
Exit For
End If
Next
oAssyDef.RepresentationsManager.LevelOfDetailRepresentations.Item(MyLOD_Name).Activate
End Sub&lt;/LI-CODE&gt;</description>
      <pubDate>Fri, 07 Jul 2023 11:48:21 GMT</pubDate>
      <guid>https://forums.autodesk.com/t5/inventor-programming-ilogic/error-handling/m-p/12086064#M154907</guid>
      <dc:creator>aurel_e</dc:creator>
      <dc:date>2023-07-07T11:48:21Z</dc:date>
    </item>
    <item>
      <title>Re: Error handling</title>
      <link>https://forums.autodesk.com/t5/inventor-programming-ilogic/error-handling/m-p/12086510#M154920</link>
      <description>&lt;P&gt;Hi&amp;nbsp;&lt;a href="https://forums.autodesk.com/t5/user/viewprofilepage/user-id/6128690"&gt;@aurel_e&lt;/a&gt;&amp;nbsp;&lt;BR /&gt;&lt;BR /&gt;I've re-factored your code and included some error trapping relevant to your process. I've taken out the loop through AllReferencedDocuments as it was adding a lot of work to what is already taking place in the BOM rows.. unless I am missing something there? I also couldn't see any reference to Rev_Level so I have left it out. Shouldn't be much bother to adapt the below code to include it, what ever it is. Anyway, hope this gets you on the right path:&lt;BR /&gt;&lt;BR /&gt;&lt;/P&gt;&lt;PRE&gt;    &lt;SPAN&gt;Sub&lt;/SPAN&gt; &lt;SPAN&gt;Main&lt;/SPAN&gt;()
        &lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;errReport&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;New&lt;/SPAN&gt; &lt;SPAN&gt;List&lt;/SPAN&gt;(&lt;SPAN&gt;Of&lt;/SPAN&gt; &lt;SPAN&gt;String&lt;/SPAN&gt;)
        &lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;oPath&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;Dim&lt;/SPAN&gt; &lt;SPAN&gt;doc&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;Document&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;oAsmDoc&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;AssemblyDocument&lt;/SPAN&gt; = &lt;SPAN&gt;Nothing&lt;/SPAN&gt;
        &lt;SPAN&gt;If&lt;/SPAN&gt; &lt;SPAN&gt;TypeOf&lt;/SPAN&gt; (&lt;SPAN&gt;doc&lt;/SPAN&gt;) &lt;SPAN&gt;Is&lt;/SPAN&gt; &lt;SPAN&gt;AssemblyDocument&lt;/SPAN&gt; &lt;SPAN&gt;Then&lt;/SPAN&gt;
            &lt;SPAN&gt;oAsmDoc&lt;/SPAN&gt; = &lt;SPAN&gt;CType&lt;/SPAN&gt;(&lt;SPAN&gt;doc&lt;/SPAN&gt;, &lt;SPAN&gt;AssemblyDocument&lt;/SPAN&gt;)&lt;BR /&gt;        Else&lt;BR /&gt;            Exit Sub
        &lt;SPAN&gt;End&lt;/SPAN&gt; &lt;SPAN&gt;If&lt;/SPAN&gt;
        &lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;oAssyDef&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;AssemblyComponentDefinition&lt;/SPAN&gt; = &lt;SPAN&gt;oAsmDoc&lt;/SPAN&gt;.&lt;SPAN&gt;ComponentDefinition&lt;/SPAN&gt;
        &lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;oAsmName&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;String&lt;/SPAN&gt; = &lt;SPAN&gt;System&lt;/SPAN&gt;.&lt;SPAN&gt;IO&lt;/SPAN&gt;.&lt;SPAN&gt;Path&lt;/SPAN&gt;.&lt;SPAN&gt;GetFileNameWithoutExtension&lt;/SPAN&gt;(&lt;SPAN&gt;oAsmDoc&lt;/SPAN&gt;.&lt;SPAN&gt;FullFileName&lt;/SPAN&gt;)

        &lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;New_Folder_Path&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;String&lt;/SPAN&gt; = &lt;SPAN&gt;System&lt;/SPAN&gt;.&lt;SPAN&gt;IO&lt;/SPAN&gt;.&lt;SPAN&gt;Path&lt;/SPAN&gt;.&lt;SPAN&gt;Combine&lt;/SPAN&gt;(&lt;SPAN&gt;oPath&lt;/SPAN&gt;, &lt;SPAN&gt;oAsmName&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;" - LASER"&lt;/SPAN&gt;)
        &lt;SPAN&gt;If&lt;/SPAN&gt; &lt;SPAN&gt;Not&lt;/SPAN&gt; &lt;SPAN&gt;System&lt;/SPAN&gt;.&lt;SPAN&gt;IO&lt;/SPAN&gt;.&lt;SPAN&gt;Directory&lt;/SPAN&gt;.&lt;SPAN&gt;Exists&lt;/SPAN&gt;(&lt;SPAN&gt;New_Folder_Path&lt;/SPAN&gt;) &lt;SPAN&gt;Then&lt;/SPAN&gt;
            &lt;SPAN&gt;Try&lt;/SPAN&gt;
                &lt;SPAN&gt;System&lt;/SPAN&gt;.&lt;SPAN&gt;IO&lt;/SPAN&gt;.&lt;SPAN&gt;Directory&lt;/SPAN&gt;.&lt;SPAN&gt;CreateDirectory&lt;/SPAN&gt;(&lt;SPAN&gt;New_Folder_Path&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;errReport&lt;/SPAN&gt;.&lt;SPAN&gt;Add&lt;/SPAN&gt;(&lt;SPAN&gt;"Cannot create the following directory: "&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;New_Folder_Path&lt;/SPAN&gt;)
                &lt;SPAN&gt;Exit&lt;/SPAN&gt; &lt;SPAN&gt;Sub&lt;/SPAN&gt;
            &lt;SPAN&gt;End&lt;/SPAN&gt; &lt;SPAN&gt;Try&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;ExpSettingQuestion&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;Boolean&lt;/SPAN&gt; = &lt;SPAN&gt;False&lt;/SPAN&gt;
        &lt;SPAN&gt;If&lt;/SPAN&gt; &lt;SPAN&gt;MessageBox&lt;/SPAN&gt;.&lt;SPAN&gt;Show&lt;/SPAN&gt;(&lt;SPAN&gt;"Do you want to export Bend Lines?"&lt;/SPAN&gt;, &lt;SPAN&gt;"DXF Export Settings"&lt;/SPAN&gt;, &lt;SPAN&gt;MessageBoxButtons&lt;/SPAN&gt;.&lt;SPAN&gt;YesNo&lt;/SPAN&gt;) = &lt;SPAN&gt;vbYes&lt;/SPAN&gt; &lt;SPAN&gt;Then&lt;/SPAN&gt;
            &lt;SPAN&gt;ExpSettingQuestion&lt;/SPAN&gt; = &lt;SPAN&gt;True&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;MyLOD_Name&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;String&lt;/SPAN&gt; = &lt;SPAN&gt;oAssyDef&lt;/SPAN&gt;.&lt;SPAN&gt;RepresentationsManager&lt;/SPAN&gt;.&lt;SPAN&gt;ActiveLevelOfDetailRepresentation&lt;/SPAN&gt;.&lt;SPAN&gt;Name&lt;/SPAN&gt;

        &lt;SPAN&gt;If&lt;/SPAN&gt; &lt;SPAN&gt;oAssyDef&lt;/SPAN&gt;.&lt;SPAN&gt;RepresentationsManager&lt;/SPAN&gt;.&lt;SPAN&gt;ActiveLevelOfDetailRepresentation&lt;/SPAN&gt;.&lt;SPAN&gt;LevelOfDetail&lt;/SPAN&gt; &amp;lt;&amp;gt; &lt;SPAN&gt;LevelOfDetailEnum&lt;/SPAN&gt;.&lt;SPAN&gt;kMasterLevelOfDetail&lt;/SPAN&gt; &lt;SPAN&gt;Then&lt;/SPAN&gt;
            &lt;SPAN&gt;oAssyDef&lt;/SPAN&gt;.&lt;SPAN&gt;RepresentationsManager&lt;/SPAN&gt;.&lt;SPAN&gt;LevelOfDetailRepresentations&lt;/SPAN&gt;(&lt;SPAN&gt;"Master"&lt;/SPAN&gt;).&lt;SPAN&gt;Activate&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;oBOM&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;BOM&lt;/SPAN&gt; = &lt;SPAN&gt;oAssyDef&lt;/SPAN&gt;.&lt;SPAN&gt;BOM&lt;/SPAN&gt;
        &lt;SPAN&gt;oBOM&lt;/SPAN&gt;.&lt;SPAN&gt;PartsOnlyViewEnabled&lt;/SPAN&gt; = &lt;SPAN&gt;True&lt;/SPAN&gt;
        &lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;oBOMView&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;BOMView&lt;/SPAN&gt; = &lt;SPAN&gt;oBOM&lt;/SPAN&gt;.&lt;SPAN&gt;BOMViews&lt;/SPAN&gt;.&lt;SPAN&gt;Item&lt;/SPAN&gt;(&lt;SPAN&gt;"Parts Only"&lt;/SPAN&gt;)

        &lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;oBOMRows&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;BOMRowsEnumerator&lt;/SPAN&gt; = &lt;SPAN&gt;oBOMView&lt;/SPAN&gt;.&lt;SPAN&gt;BOMRows&lt;/SPAN&gt;
        &lt;SPAN&gt;For&lt;/SPAN&gt; &lt;SPAN&gt;Each&lt;/SPAN&gt; &lt;SPAN&gt;oBOMRow&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;BOMRow&lt;/SPAN&gt; &lt;SPAN&gt;In&lt;/SPAN&gt; &lt;SPAN&gt;oBOMRows&lt;/SPAN&gt;
            &lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;rDoc&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;Document&lt;/SPAN&gt; = &lt;SPAN&gt;oBOMRow&lt;/SPAN&gt;.&lt;SPAN&gt;ComponentDefinitions&lt;/SPAN&gt;.&lt;SPAN&gt;Item&lt;/SPAN&gt;(1).&lt;SPAN&gt;Document&lt;/SPAN&gt;
            &lt;SPAN&gt;If&lt;/SPAN&gt; &lt;SPAN&gt;rDoc&lt;/SPAN&gt;.&lt;SPAN&gt;SubType&lt;/SPAN&gt; &amp;lt;&amp;gt; &lt;SPAN&gt;"{9C464203-9BAE-11D3-8BAD-0060B0CE6BB4}"&lt;/SPAN&gt; &lt;SPAN&gt;Then&lt;/SPAN&gt; &lt;SPAN&gt;Continue&lt;/SPAN&gt; &lt;SPAN&gt;For&lt;/SPAN&gt;

            &lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;oQty&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;Integer&lt;/SPAN&gt; = &lt;SPAN&gt;oBOMRow&lt;/SPAN&gt;.&lt;SPAN&gt;TotalQuantity&lt;/SPAN&gt;
            &lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;oMaterial&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;String&lt;/SPAN&gt; = &lt;SPAN&gt;rDoc&lt;/SPAN&gt;.&lt;SPAN&gt;ComponentDefinition&lt;/SPAN&gt;.&lt;SPAN&gt;Material&lt;/SPAN&gt;.&lt;SPAN&gt;Name&lt;/SPAN&gt;
            &lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;oThickness&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;Object&lt;/SPAN&gt; = &lt;SPAN&gt;rDoc&lt;/SPAN&gt;.&lt;SPAN&gt;ComponentDefinition&lt;/SPAN&gt;.&lt;SPAN&gt;Thickness&lt;/SPAN&gt;.&lt;SPAN&gt;value&lt;/SPAN&gt; * 10

            &lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;Part_Name&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;String&lt;/SPAN&gt; = &lt;SPAN&gt;System&lt;/SPAN&gt;.&lt;SPAN&gt;IO&lt;/SPAN&gt;.&lt;SPAN&gt;Path&lt;/SPAN&gt;.&lt;SPAN&gt;GetFileNameWithoutExtension&lt;/SPAN&gt;(&lt;SPAN&gt;rDoc&lt;/SPAN&gt;.&lt;SPAN&gt;FullFileName&lt;/SPAN&gt;)
            &lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;a&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;String&lt;/SPAN&gt; = &lt;SPAN&gt;rDoc&lt;/SPAN&gt;.&lt;SPAN&gt;PropertySets&lt;/SPAN&gt;.&lt;SPAN&gt;Item&lt;/SPAN&gt;(&lt;SPAN&gt;"Design Tracking Properties"&lt;/SPAN&gt;).&lt;SPAN&gt;Item&lt;/SPAN&gt;(&lt;SPAN&gt;"Stock Number"&lt;/SPAN&gt;).&lt;SPAN&gt;Value&lt;/SPAN&gt;
            &lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;filePath&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;String&lt;/SPAN&gt; = &lt;SPAN&gt;System&lt;/SPAN&gt;.&lt;SPAN&gt;IO&lt;/SPAN&gt;.&lt;SPAN&gt;Path&lt;/SPAN&gt;.&lt;SPAN&gt;Combine&lt;/SPAN&gt;(&lt;SPAN&gt;New_Folder_Path&lt;/SPAN&gt;, &lt;SPAN&gt;oMaterial&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;" -  "&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;oThickness&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;"mm"&lt;/SPAN&gt;)
			&lt;SPAN&gt;If&lt;/SPAN&gt; &lt;SPAN&gt;Not&lt;/SPAN&gt; &lt;SPAN&gt;System&lt;/SPAN&gt;.&lt;SPAN&gt;IO&lt;/SPAN&gt;.&lt;SPAN&gt;Directory&lt;/SPAN&gt;.&lt;SPAN&gt;Exists&lt;/SPAN&gt;(&lt;SPAN&gt;filePath&lt;/SPAN&gt;) &lt;SPAN&gt;Then&lt;/SPAN&gt; &lt;SPAN&gt;System&lt;/SPAN&gt;.&lt;SPAN&gt;IO&lt;/SPAN&gt;.&lt;SPAN&gt;Directory&lt;/SPAN&gt;.&lt;SPAN&gt;CreateDirectory&lt;/SPAN&gt;(&lt;SPAN&gt;filePath&lt;/SPAN&gt;)
            &lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;filename&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;String&lt;/SPAN&gt; = &lt;SPAN&gt;Part_Name&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;" - "&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;oMaterial&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;" "&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;oThickness&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;"mm - "&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;oQty&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;" off.dxf"&lt;/SPAN&gt;
            &lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;oFilename&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;String&lt;/SPAN&gt; = &lt;SPAN&gt;System&lt;/SPAN&gt;.&lt;SPAN&gt;IO&lt;/SPAN&gt;.&lt;SPAN&gt;Path&lt;/SPAN&gt;.&lt;SPAN&gt;Combine&lt;/SPAN&gt;(&lt;SPAN&gt;filePath&lt;/SPAN&gt;, &lt;SPAN&gt;filename&lt;/SPAN&gt;)

            &lt;SPAN&gt;Make_DXF&lt;/SPAN&gt;(&lt;SPAN&gt;rDoc&lt;/SPAN&gt;, &lt;SPAN&gt;oFilename&lt;/SPAN&gt;, &lt;SPAN&gt;ExpSettingQuestion&lt;/SPAN&gt;, &lt;SPAN&gt;errReport&lt;/SPAN&gt;)
        &lt;SPAN&gt;Next&lt;/SPAN&gt;

        &lt;SPAN&gt;oAssyDef&lt;/SPAN&gt;.&lt;SPAN&gt;RepresentationsManager&lt;/SPAN&gt;.&lt;SPAN&gt;LevelOfDetailRepresentations&lt;/SPAN&gt;.&lt;SPAN&gt;Item&lt;/SPAN&gt;(&lt;SPAN&gt;MyLOD_Name&lt;/SPAN&gt;).&lt;SPAN&gt;Activate&lt;/SPAN&gt;()

        &lt;SPAN&gt;If&lt;/SPAN&gt; &lt;SPAN&gt;Not&lt;/SPAN&gt; &lt;SPAN&gt;errReport&lt;/SPAN&gt;.&lt;SPAN&gt;Count&lt;/SPAN&gt; = 0 &lt;SPAN&gt;Then&lt;/SPAN&gt;
            &lt;SPAN&gt;System&lt;/SPAN&gt;.&lt;SPAN&gt;IO&lt;/SPAN&gt;.&lt;SPAN&gt;File&lt;/SPAN&gt;.&lt;SPAN&gt;WriteAllLines&lt;/SPAN&gt;(&lt;SPAN&gt;New_Folder_Path&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;"\"&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;oAsmName&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;" DXF Errors.txt"&lt;/SPAN&gt;, &lt;SPAN&gt;errReport&lt;/SPAN&gt;.&lt;SPAN&gt;ToArray&lt;/SPAN&gt;)
        &lt;SPAN&gt;End&lt;/SPAN&gt; &lt;SPAN&gt;If&lt;/SPAN&gt;

        &lt;SPAN&gt;MsgBox&lt;/SPAN&gt;(&lt;SPAN&gt;"DXF Export Complete"&lt;/SPAN&gt;,, &lt;SPAN&gt;"All Done"&lt;/SPAN&gt;)
    &lt;SPAN&gt;End&lt;/SPAN&gt; &lt;SPAN&gt;Sub&lt;/SPAN&gt;

    &lt;SPAN&gt;Sub&lt;/SPAN&gt; &lt;SPAN&gt;Make_DXF&lt;/SPAN&gt;(&lt;SPAN&gt;oDoc&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;PartDocument&lt;/SPAN&gt;, &lt;SPAN&gt;fullfilename&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;String&lt;/SPAN&gt;, &lt;SPAN&gt;ExpSettingQuestion&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;Boolean&lt;/SPAN&gt;, &lt;SPAN&gt;ByRef&lt;/SPAN&gt; &lt;SPAN&gt;errReport&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;List&lt;/SPAN&gt;(&lt;SPAN&gt;Of&lt;/SPAN&gt; &lt;SPAN&gt;String&lt;/SPAN&gt;))

        &lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;oCompDef&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;SheetMetalComponentDefinition&lt;/SPAN&gt; = &lt;SPAN&gt;oDoc&lt;/SPAN&gt;.&lt;SPAN&gt;ComponentDefinition&lt;/SPAN&gt;

        &lt;SPAN&gt;If&lt;/SPAN&gt; &lt;SPAN&gt;oCompDef&lt;/SPAN&gt;.&lt;SPAN&gt;HasFlatPattern&lt;/SPAN&gt; = &lt;SPAN&gt;False&lt;/SPAN&gt; &lt;SPAN&gt;Then&lt;/SPAN&gt;
            &lt;SPAN&gt;Try&lt;/SPAN&gt;
                &lt;SPAN&gt;oCompDef&lt;/SPAN&gt;.&lt;SPAN&gt;Unfold&lt;/SPAN&gt;()
                &lt;SPAN&gt;oCompDef&lt;/SPAN&gt;.&lt;SPAN&gt;FlatPattern&lt;/SPAN&gt;.&lt;SPAN&gt;ExitEdit&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;errReport&lt;/SPAN&gt;.&lt;SPAN&gt;Add&lt;/SPAN&gt;(&lt;SPAN&gt;"Cannot unfold the following file: "&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;System&lt;/SPAN&gt;.&lt;SPAN&gt;IO&lt;/SPAN&gt;.&lt;SPAN&gt;Path&lt;/SPAN&gt;.&lt;SPAN&gt;GetFileNameWithoutExtension&lt;/SPAN&gt;(&lt;SPAN&gt;fullfilename&lt;/SPAN&gt;))
                &lt;SPAN&gt;Exit&lt;/SPAN&gt; &lt;SPAN&gt;Sub&lt;/SPAN&gt;
            &lt;SPAN&gt;End&lt;/SPAN&gt; &lt;SPAN&gt;Try&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;options&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;New&lt;/SPAN&gt; &lt;SPAN&gt;List&lt;/SPAN&gt;(&lt;SPAN&gt;Of&lt;/SPAN&gt; &lt;SPAN&gt;String&lt;/SPAN&gt;)
        &lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;sOut&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;String&lt;/SPAN&gt; = &lt;SPAN&gt;""&lt;/SPAN&gt;
        &lt;SPAN&gt;If&lt;/SPAN&gt; &lt;SPAN&gt;ExpSettingQuestion&lt;/SPAN&gt; &lt;SPAN&gt;Then&lt;/SPAN&gt;
            &lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;optionList&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;List&lt;/SPAN&gt;(&lt;SPAN&gt;Of&lt;/SPAN&gt; &lt;SPAN&gt;String&lt;/SPAN&gt;) = &lt;SPAN&gt;New&lt;/SPAN&gt; &lt;SPAN&gt;List&lt;/SPAN&gt;(&lt;SPAN&gt;Of&lt;/SPAN&gt; &lt;SPAN&gt;String&lt;/SPAN&gt;) &lt;SPAN&gt;From&lt;/SPAN&gt; {
            &lt;SPAN&gt;"AcadVersion=2004"&lt;/SPAN&gt;,
            &lt;SPAN&gt;"OuterProfileLayer=0"&lt;/SPAN&gt;,
            &lt;SPAN&gt;"InteriorProfilesLayer=0"&lt;/SPAN&gt;,
            &lt;SPAN&gt;"UnconsumedSketchesLayer=YELLOW"&lt;/SPAN&gt;,
            &lt;SPAN&gt;"UnconsumedSketchesLayerColor=255;255;0"&lt;/SPAN&gt;,
            &lt;SPAN&gt;"BendUpLayer=YELLOW"&lt;/SPAN&gt;,
            &lt;SPAN&gt;"BendUpLayerColor=255;255;0"&lt;/SPAN&gt;,
            &lt;SPAN&gt;"BendDownLayer=YELLOW"&lt;/SPAN&gt;,
            &lt;SPAN&gt;"BendDownLayerColor=255;255;0"&lt;/SPAN&gt;,
            &lt;SPAN&gt;"MarkSurfaceUpLayer=YELLOW"&lt;/SPAN&gt;,
            &lt;SPAN&gt;"MarkSurfaceUpLayerColor=255;255;0"&lt;/SPAN&gt;,
            &lt;SPAN&gt;"MarkSurfaceDownLayer=YELLOW"&lt;/SPAN&gt;,
            &lt;SPAN&gt;"MarkSurfaceDownColor=255;255;0"&lt;/SPAN&gt;
        }

            &lt;SPAN&gt;options&lt;/SPAN&gt; = &lt;SPAN&gt;optionList&lt;/SPAN&gt;
            &lt;SPAN&gt;sOut&lt;/SPAN&gt; = &lt;SPAN&gt;"FLAT PATTERN DXF?AcadVersion=2000"&lt;/SPAN&gt; _
                    + &lt;SPAN&gt;"&amp;amp;InvisibleLayers=IV_TANGENT;IV_FEATURE_PROFILES;IV_ARC_CENTERS;IV_TOOL_CENTER;IV_TOOL_CENTER_DOWN;IV_FEATURE_PROFILES_DOWN"&lt;/SPAN&gt;
        &lt;SPAN&gt;Else&lt;/SPAN&gt;
            &lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;optionList&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;List&lt;/SPAN&gt;(&lt;SPAN&gt;Of&lt;/SPAN&gt; &lt;SPAN&gt;String&lt;/SPAN&gt;) = &lt;SPAN&gt;New&lt;/SPAN&gt; &lt;SPAN&gt;List&lt;/SPAN&gt;(&lt;SPAN&gt;Of&lt;/SPAN&gt; &lt;SPAN&gt;String&lt;/SPAN&gt;) &lt;SPAN&gt;From&lt;/SPAN&gt; {
                &lt;SPAN&gt;"AcadVersion=2004"&lt;/SPAN&gt;,
                &lt;SPAN&gt;"OuterProfileLayer=0"&lt;/SPAN&gt;,
                &lt;SPAN&gt;"InteriorProfilesLayer=0"&lt;/SPAN&gt;,
                &lt;SPAN&gt;"UnconsumedSketchesLayer=YELLOW"&lt;/SPAN&gt;,
                &lt;SPAN&gt;"UnconsumedSketchesLayerColor=255;255;0"&lt;/SPAN&gt;,
                &lt;SPAN&gt;""&lt;/SPAN&gt;,
                &lt;SPAN&gt;""&lt;/SPAN&gt;
            }

            &lt;SPAN&gt;options&lt;/SPAN&gt; = &lt;SPAN&gt;optionList&lt;/SPAN&gt;
            &lt;SPAN&gt;sOut&lt;/SPAN&gt; = &lt;SPAN&gt;"FLAT PATTERN DXF?AcadVersion=2000"&lt;/SPAN&gt; _
            + &lt;SPAN&gt;"&amp;amp;InvisibleLayers=IV_TANGENT;IV_FEATURE_PROFILES;IV_ARC_CENTERS;IV_BEND;IV_BEND_DOWN;IV_TOOL_CENTER;IV_TOOL_CENTER_DOWN;IV_FEATURE_PROFILES_DOWN"&lt;/SPAN&gt;

        &lt;SPAN&gt;End&lt;/SPAN&gt; &lt;SPAN&gt;If&lt;/SPAN&gt;

        &lt;SPAN&gt;For&lt;/SPAN&gt; &lt;SPAN&gt;Each&lt;/SPAN&gt; &lt;SPAN&gt;opt&lt;/SPAN&gt; &lt;SPAN&gt;In&lt;/SPAN&gt; &lt;SPAN&gt;options&lt;/SPAN&gt;
            &lt;SPAN&gt;sOut&lt;/SPAN&gt; = &lt;SPAN&gt;sOut&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;"&amp;amp;"&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;opt&lt;/SPAN&gt;
        &lt;SPAN&gt;Next&lt;/SPAN&gt;
        &lt;SPAN&gt;sOut&lt;/SPAN&gt; = &lt;SPAN&gt;sOut&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;"?OFILE"&lt;/SPAN&gt;

        &lt;SPAN&gt;Try&lt;/SPAN&gt;
            &lt;SPAN&gt;oCompDef&lt;/SPAN&gt;.&lt;SPAN&gt;DataIO&lt;/SPAN&gt;.&lt;SPAN&gt;WriteDataToFile&lt;/SPAN&gt;(&lt;SPAN&gt;sOut&lt;/SPAN&gt;, &lt;SPAN&gt;fullfilename&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;errReport&lt;/SPAN&gt;.&lt;SPAN&gt;Add&lt;/SPAN&gt;(&lt;SPAN&gt;"Cannot export the following file: "&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;System&lt;/SPAN&gt;.&lt;SPAN&gt;IO&lt;/SPAN&gt;.&lt;SPAN&gt;Path&lt;/SPAN&gt;.&lt;SPAN&gt;GetFileNameWithoutExtension&lt;/SPAN&gt;(&lt;SPAN&gt;fullfilename&lt;/SPAN&gt;) &amp;amp; &lt;SPAN&gt;vbCrLf&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;ex&lt;/SPAN&gt;.&lt;SPAN&gt;ToString&lt;/SPAN&gt;)
        &lt;SPAN&gt;End&lt;/SPAN&gt; &lt;SPAN&gt;Try&lt;/SPAN&gt;
    &lt;SPAN&gt;End&lt;/SPAN&gt; &lt;SPAN&gt;Sub&lt;/SPAN&gt;&lt;/PRE&gt;&lt;P&gt;Bear in mind this does not check if the dxf file already exists, and will instead overwrite it. You can do and If else statement around the dxf file name is so desired.&lt;BR /&gt;&lt;BR /&gt;&lt;BR /&gt;&lt;BR /&gt;&lt;BR /&gt;&lt;/P&gt;&lt;PRE&gt;&lt;SPAN&gt;If&lt;/SPAN&gt; &lt;SPAN&gt;System&lt;/SPAN&gt;.&lt;SPAN&gt;IO&lt;/SPAN&gt;.&lt;SPAN&gt;File&lt;/SPAN&gt;.&lt;SPAN&gt;Exists&lt;/SPAN&gt;(&lt;SPAN&gt;oFilename&lt;/SPAN&gt;) &lt;SPAN&gt;Then&lt;/SPAN&gt;
		&lt;SPAN&gt;'do something else&lt;/SPAN&gt;
	&lt;SPAN&gt;Else&lt;/SPAN&gt;
		&lt;SPAN&gt;'continue&lt;/SPAN&gt;
	&lt;SPAN&gt;End&lt;/SPAN&gt; &lt;SPAN&gt;If&lt;/SPAN&gt;&amp;nbsp;&lt;/PRE&gt;&lt;P&gt;&amp;nbsp;&lt;/P&gt;</description>
      <pubDate>Fri, 07 Jul 2023 14:43:24 GMT</pubDate>
      <guid>https://forums.autodesk.com/t5/inventor-programming-ilogic/error-handling/m-p/12086510#M154920</guid>
      <dc:creator>lmc.engineering</dc:creator>
      <dc:date>2023-07-07T14:43:24Z</dc:date>
    </item>
    <item>
      <title>Re: Error handling</title>
      <link>https://forums.autodesk.com/t5/inventor-programming-ilogic/error-handling/m-p/12087781#M154949</link>
      <description>&lt;P&gt;Thanks&amp;nbsp;&lt;a href="https://forums.autodesk.com/t5/user/viewprofilepage/user-id/3895633"&gt;@lmc.engineering&lt;/a&gt;&amp;nbsp;&lt;/P&gt;&lt;P&gt;It looks it solves the problem with the error.&lt;/P&gt;&lt;P&gt;&amp;nbsp;&lt;/P&gt;</description>
      <pubDate>Sat, 08 Jul 2023 09:00:56 GMT</pubDate>
      <guid>https://forums.autodesk.com/t5/inventor-programming-ilogic/error-handling/m-p/12087781#M154949</guid>
      <dc:creator>aurel_e</dc:creator>
      <dc:date>2023-07-08T09:00:56Z</dc:date>
    </item>
    <item>
      <title>Re: Error handling</title>
      <link>https://forums.autodesk.com/t5/inventor-programming-ilogic/error-handling/m-p/12087984#M154951</link>
      <description>&lt;P&gt;Hi&amp;nbsp;&lt;a href="https://forums.autodesk.com/t5/user/viewprofilepage/user-id/6128690"&gt;@aurel_e&lt;/a&gt;&amp;nbsp;&lt;BR /&gt;&lt;BR /&gt;I noticed your message asking about the Master LOD qty, and you may be aware that the BOM does not interact with the LOD's. In which case, if you want to do a part count based on part suppression you'll need to do a recursive count of all parts, then do exports based on these counts. The below will do that for you:&lt;BR /&gt;&lt;BR /&gt;&lt;/P&gt;&lt;PRE&gt;&lt;SPAN&gt;Sub&lt;/SPAN&gt; &lt;SPAN&gt;Main&lt;/SPAN&gt;()
&lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;errReport&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;New&lt;/SPAN&gt; &lt;SPAN&gt;List&lt;/SPAN&gt;(&lt;SPAN&gt;Of&lt;/SPAN&gt; &lt;SPAN&gt;String&lt;/SPAN&gt;)
&lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;oPath&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;Dim&lt;/SPAN&gt; &lt;SPAN&gt;doc&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;Document&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;oAsmDoc&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;AssemblyDocument&lt;/SPAN&gt; = &lt;SPAN&gt;Nothing&lt;/SPAN&gt;
&lt;SPAN&gt;If&lt;/SPAN&gt; &lt;SPAN&gt;TypeOf&lt;/SPAN&gt; (&lt;SPAN&gt;doc&lt;/SPAN&gt;) &lt;SPAN&gt;Is&lt;/SPAN&gt; &lt;SPAN&gt;AssemblyDocument&lt;/SPAN&gt; &lt;SPAN&gt;Then&lt;/SPAN&gt;
	&lt;SPAN&gt;oAsmDoc&lt;/SPAN&gt; = &lt;SPAN&gt;CType&lt;/SPAN&gt;(&lt;SPAN&gt;doc&lt;/SPAN&gt;, &lt;SPAN&gt;AssemblyDocument&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;oAssyDef&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;AssemblyComponentDefinition&lt;/SPAN&gt; = &lt;SPAN&gt;oAsmDoc&lt;/SPAN&gt;.&lt;SPAN&gt;ComponentDefinition&lt;/SPAN&gt;
&lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;oAsmName&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;String&lt;/SPAN&gt; = &lt;SPAN&gt;System&lt;/SPAN&gt;.&lt;SPAN&gt;IO&lt;/SPAN&gt;.&lt;SPAN&gt;Path&lt;/SPAN&gt;.&lt;SPAN&gt;GetFileNameWithoutExtension&lt;/SPAN&gt;(&lt;SPAN&gt;oAsmDoc&lt;/SPAN&gt;.&lt;SPAN&gt;FullFileName&lt;/SPAN&gt;)

&lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;New_Folder_Path&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;String&lt;/SPAN&gt; = &lt;SPAN&gt;System&lt;/SPAN&gt;.&lt;SPAN&gt;IO&lt;/SPAN&gt;.&lt;SPAN&gt;Path&lt;/SPAN&gt;.&lt;SPAN&gt;Combine&lt;/SPAN&gt;(&lt;SPAN&gt;oPath&lt;/SPAN&gt;, &lt;SPAN&gt;oAsmName&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;" - LASER"&lt;/SPAN&gt;)
&lt;SPAN&gt;If&lt;/SPAN&gt; &lt;SPAN&gt;Not&lt;/SPAN&gt; &lt;SPAN&gt;System&lt;/SPAN&gt;.&lt;SPAN&gt;IO&lt;/SPAN&gt;.&lt;SPAN&gt;Directory&lt;/SPAN&gt;.&lt;SPAN&gt;Exists&lt;/SPAN&gt;(&lt;SPAN&gt;New_Folder_Path&lt;/SPAN&gt;) &lt;SPAN&gt;Then&lt;/SPAN&gt;
	&lt;SPAN&gt;Try&lt;/SPAN&gt;
		&lt;SPAN&gt;System&lt;/SPAN&gt;.&lt;SPAN&gt;IO&lt;/SPAN&gt;.&lt;SPAN&gt;Directory&lt;/SPAN&gt;.&lt;SPAN&gt;CreateDirectory&lt;/SPAN&gt;(&lt;SPAN&gt;New_Folder_Path&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;MsgBox&lt;/SPAN&gt;(&lt;SPAN&gt;"Cannot create the following directory: "&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;New_Folder_Path&lt;/SPAN&gt;)
		&lt;SPAN&gt;Exit&lt;/SPAN&gt; &lt;SPAN&gt;Sub&lt;/SPAN&gt;
	&lt;SPAN&gt;End&lt;/SPAN&gt; &lt;SPAN&gt;Try&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;ExpSettingQuestion&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;Boolean&lt;/SPAN&gt; = &lt;SPAN&gt;False&lt;/SPAN&gt;
&lt;SPAN&gt;If&lt;/SPAN&gt; &lt;SPAN&gt;MessageBox&lt;/SPAN&gt;.&lt;SPAN&gt;Show&lt;/SPAN&gt;(&lt;SPAN&gt;"Do you want to export Bend Lines?"&lt;/SPAN&gt;, &lt;SPAN&gt;"DXF Export Settings"&lt;/SPAN&gt;, &lt;SPAN&gt;MessageBoxButtons&lt;/SPAN&gt;.&lt;SPAN&gt;YesNo&lt;/SPAN&gt;) = &lt;SPAN&gt;vbYes&lt;/SPAN&gt; &lt;SPAN&gt;Then&lt;/SPAN&gt;
	&lt;SPAN&gt;ExpSettingQuestion&lt;/SPAN&gt; = &lt;SPAN&gt;True&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;partTracker&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;New&lt;/SPAN&gt; &lt;SPAN&gt;Dictionary&lt;/SPAN&gt;(&lt;SPAN&gt;Of&lt;/SPAN&gt; &lt;SPAN&gt;Document&lt;/SPAN&gt;, &lt;SPAN&gt;PartTrackerData&lt;/SPAN&gt;)

&lt;SPAN&gt;RecursiveCount&lt;/SPAN&gt;(&lt;SPAN&gt;oAsmDoc&lt;/SPAN&gt;, &lt;SPAN&gt;partTracker&lt;/SPAN&gt;)

&lt;SPAN&gt;If&lt;/SPAN&gt; &lt;SPAN&gt;partTracker&lt;/SPAN&gt;.&lt;SPAN&gt;Count&lt;/SPAN&gt; = 0 &lt;SPAN&gt;Then&lt;/SPAN&gt;
	&lt;SPAN&gt;MsgBox&lt;/SPAN&gt;(&lt;SPAN&gt;"No sheet metal parts found"&lt;/SPAN&gt;, , &lt;SPAN&gt;"All Done"&lt;/SPAN&gt;)
	&lt;SPAN&gt;Exit&lt;/SPAN&gt; &lt;SPAN&gt;Sub&lt;/SPAN&gt;
&lt;SPAN&gt;End&lt;/SPAN&gt; &lt;SPAN&gt;If&lt;/SPAN&gt;

&lt;SPAN&gt;For&lt;/SPAN&gt; &lt;SPAN&gt;Each&lt;/SPAN&gt; &lt;SPAN&gt;part&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;KeyValuePair&lt;/SPAN&gt;(&lt;SPAN&gt;Of&lt;/SPAN&gt; &lt;SPAN&gt;Document&lt;/SPAN&gt;, &lt;SPAN&gt;PartTrackerData&lt;/SPAN&gt;) &lt;SPAN&gt;In&lt;/SPAN&gt; &lt;SPAN&gt;partTracker&lt;/SPAN&gt;
	&lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;ptdata&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;New&lt;/SPAN&gt; &lt;SPAN&gt;PartTrackerData&lt;/SPAN&gt;
	&lt;SPAN&gt;ptdata&lt;/SPAN&gt; = &lt;SPAN&gt;part&lt;/SPAN&gt;.&lt;SPAN&gt;Value&lt;/SPAN&gt;
	&lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;oQty&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;Integer&lt;/SPAN&gt; = &lt;SPAN&gt;ptdata&lt;/SPAN&gt;.&lt;SPAN&gt;qty&lt;/SPAN&gt;
	&lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;oMaterial&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;String&lt;/SPAN&gt; = &lt;SPAN&gt;ptdata&lt;/SPAN&gt;.&lt;SPAN&gt;material&lt;/SPAN&gt;
	&lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;oThickness&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;Object&lt;/SPAN&gt; = &lt;SPAN&gt;ptdata&lt;/SPAN&gt;.&lt;SPAN&gt;thickness&lt;/SPAN&gt;

	&lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;Part_Name&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;String&lt;/SPAN&gt; = &lt;SPAN&gt;System&lt;/SPAN&gt;.&lt;SPAN&gt;IO&lt;/SPAN&gt;.&lt;SPAN&gt;Path&lt;/SPAN&gt;.&lt;SPAN&gt;GetFileNameWithoutExtension&lt;/SPAN&gt;(&lt;SPAN&gt;part&lt;/SPAN&gt;.&lt;SPAN&gt;Key&lt;/SPAN&gt;.&lt;SPAN&gt;FullFileName&lt;/SPAN&gt;)
	&lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;a&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;String&lt;/SPAN&gt; = &lt;SPAN&gt;part&lt;/SPAN&gt;.&lt;SPAN&gt;Key&lt;/SPAN&gt;.&lt;SPAN&gt;PropertySets&lt;/SPAN&gt;.&lt;SPAN&gt;Item&lt;/SPAN&gt;(&lt;SPAN&gt;"Design Tracking Properties"&lt;/SPAN&gt;).&lt;SPAN&gt;Item&lt;/SPAN&gt;(&lt;SPAN&gt;"Stock Number"&lt;/SPAN&gt;).&lt;SPAN&gt;Value&lt;/SPAN&gt;
	&lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;filePath&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;String&lt;/SPAN&gt; = &lt;SPAN&gt;System&lt;/SPAN&gt;.&lt;SPAN&gt;IO&lt;/SPAN&gt;.&lt;SPAN&gt;Path&lt;/SPAN&gt;.&lt;SPAN&gt;Combine&lt;/SPAN&gt;(&lt;SPAN&gt;New_Folder_Path&lt;/SPAN&gt;, &lt;SPAN&gt;oMaterial&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;" -  "&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;oThickness&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;"mm"&lt;/SPAN&gt;)
	&lt;SPAN&gt;If&lt;/SPAN&gt; &lt;SPAN&gt;Not&lt;/SPAN&gt; &lt;SPAN&gt;System&lt;/SPAN&gt;.&lt;SPAN&gt;IO&lt;/SPAN&gt;.&lt;SPAN&gt;Directory&lt;/SPAN&gt;.&lt;SPAN&gt;Exists&lt;/SPAN&gt;(&lt;SPAN&gt;filePath&lt;/SPAN&gt;) &lt;SPAN&gt;Then&lt;/SPAN&gt; &lt;SPAN&gt;System&lt;/SPAN&gt;.&lt;SPAN&gt;IO&lt;/SPAN&gt;.&lt;SPAN&gt;Directory&lt;/SPAN&gt;.&lt;SPAN&gt;CreateDirectory&lt;/SPAN&gt;(&lt;SPAN&gt;filePath&lt;/SPAN&gt;)
	&lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;filename&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;String&lt;/SPAN&gt; = &lt;SPAN&gt;Part_Name&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;" - "&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;oMaterial&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;" "&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;oThickness&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;"mm - "&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;oQty&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;" off.dxf"&lt;/SPAN&gt;
	&lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;oFilename&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;String&lt;/SPAN&gt; = &lt;SPAN&gt;System&lt;/SPAN&gt;.&lt;SPAN&gt;IO&lt;/SPAN&gt;.&lt;SPAN&gt;Path&lt;/SPAN&gt;.&lt;SPAN&gt;Combine&lt;/SPAN&gt;(&lt;SPAN&gt;filePath&lt;/SPAN&gt;, &lt;SPAN&gt;filename&lt;/SPAN&gt;)

	&lt;SPAN&gt;Make_DXF&lt;/SPAN&gt;(&lt;SPAN&gt;part&lt;/SPAN&gt;.&lt;SPAN&gt;Key&lt;/SPAN&gt;, &lt;SPAN&gt;oFilename&lt;/SPAN&gt;, &lt;SPAN&gt;ExpSettingQuestion&lt;/SPAN&gt;, &lt;SPAN&gt;errReport&lt;/SPAN&gt;)
&lt;SPAN&gt;Next&lt;/SPAN&gt;

&lt;SPAN&gt;If&lt;/SPAN&gt; &lt;SPAN&gt;Not&lt;/SPAN&gt; &lt;SPAN&gt;errReport&lt;/SPAN&gt;.&lt;SPAN&gt;Count&lt;/SPAN&gt; = 0 &lt;SPAN&gt;Then&lt;/SPAN&gt;
	&lt;SPAN&gt;System&lt;/SPAN&gt;.&lt;SPAN&gt;IO&lt;/SPAN&gt;.&lt;SPAN&gt;File&lt;/SPAN&gt;.&lt;SPAN&gt;WriteAllLines&lt;/SPAN&gt;(&lt;SPAN&gt;New_Folder_Path&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;"\"&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;oAsmName&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;" DXF Errors.txt"&lt;/SPAN&gt;, &lt;SPAN&gt;errReport&lt;/SPAN&gt;.&lt;SPAN&gt;ToArray&lt;/SPAN&gt;)
&lt;SPAN&gt;End&lt;/SPAN&gt; &lt;SPAN&gt;If&lt;/SPAN&gt;

&lt;SPAN&gt;MsgBox&lt;/SPAN&gt;(&lt;SPAN&gt;"DXF Export Complete"&lt;/SPAN&gt;, , &lt;SPAN&gt;"All Done"&lt;/SPAN&gt;)
&lt;SPAN&gt;End&lt;/SPAN&gt; &lt;SPAN&gt;Sub&lt;/SPAN&gt;

&lt;SPAN&gt;Private&lt;/SPAN&gt; &lt;SPAN&gt;Sub&lt;/SPAN&gt; &lt;SPAN&gt;RecursiveCount&lt;/SPAN&gt;(&lt;SPAN&gt;doc&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;AssemblyDocument&lt;/SPAN&gt;, &lt;SPAN&gt;ByRef&lt;/SPAN&gt; &lt;SPAN&gt;partTracker&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;Dictionary&lt;/SPAN&gt;(&lt;SPAN&gt;Of&lt;/SPAN&gt; &lt;SPAN&gt;Document&lt;/SPAN&gt;, &lt;SPAN&gt;PartTrackerData&lt;/SPAN&gt;))
	&lt;SPAN&gt;For&lt;/SPAN&gt; &lt;SPAN&gt;Each&lt;/SPAN&gt; &lt;SPAN&gt;occ&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;ComponentOccurrence&lt;/SPAN&gt; &lt;SPAN&gt;In&lt;/SPAN&gt; &lt;SPAN&gt;doc&lt;/SPAN&gt;.&lt;SPAN&gt;ComponentDefinition&lt;/SPAN&gt;.&lt;SPAN&gt;Occurrences&lt;/SPAN&gt;
	
		&lt;SPAN&gt;If&lt;/SPAN&gt; &lt;SPAN&gt;occ&lt;/SPAN&gt;.&lt;SPAN&gt;Suppressed&lt;/SPAN&gt; &lt;SPAN&gt;Then&lt;/SPAN&gt; &lt;SPAN&gt;Continue&lt;/SPAN&gt; &lt;SPAN&gt;For&lt;/SPAN&gt;

		&lt;SPAN&gt;If&lt;/SPAN&gt; &lt;SPAN&gt;TypeOf&lt;/SPAN&gt; &lt;SPAN&gt;occ&lt;/SPAN&gt;.&lt;SPAN&gt;Definition&lt;/SPAN&gt; &lt;SPAN&gt;Is&lt;/SPAN&gt; &lt;SPAN&gt;VirtualComponentDefinition&lt;/SPAN&gt; &lt;SPAN&gt;Then&lt;/SPAN&gt; &lt;SPAN&gt;Continue&lt;/SPAN&gt; &lt;SPAN&gt;For&lt;/SPAN&gt;

		
		&lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;occdoc&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;Document&lt;/SPAN&gt; = &lt;SPAN&gt;occ&lt;/SPAN&gt;.&lt;SPAN&gt;Definition&lt;/SPAN&gt;.&lt;SPAN&gt;Document&lt;/SPAN&gt;
		&lt;SPAN&gt;If&lt;/SPAN&gt; &lt;SPAN&gt;TypeOf&lt;/SPAN&gt; &lt;SPAN&gt;occdoc&lt;/SPAN&gt; &lt;SPAN&gt;Is&lt;/SPAN&gt; &lt;SPAN&gt;PartDocument&lt;/SPAN&gt; &lt;SPAN&gt;Then&lt;/SPAN&gt;
			&lt;SPAN&gt;If&lt;/SPAN&gt; &lt;SPAN&gt;occdoc&lt;/SPAN&gt;.&lt;SPAN&gt;SubType&lt;/SPAN&gt; &amp;lt;&amp;gt; &lt;SPAN&gt;"{9C464203-9BAE-11D3-8BAD-0060B0CE6BB4}"&lt;/SPAN&gt; &lt;SPAN&gt;Then&lt;/SPAN&gt; &lt;SPAN&gt;Continue&lt;/SPAN&gt; &lt;SPAN&gt;For&lt;/SPAN&gt;
			&lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;ptData&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;New&lt;/SPAN&gt; &lt;SPAN&gt;PartTrackerData&lt;/SPAN&gt;

			&lt;SPAN&gt;If&lt;/SPAN&gt; &lt;SPAN&gt;partTracker&lt;/SPAN&gt;.&lt;SPAN&gt;ContainsKey&lt;/SPAN&gt;(&lt;SPAN&gt;occdoc&lt;/SPAN&gt;) &lt;SPAN&gt;Then&lt;/SPAN&gt;
				&lt;SPAN&gt;ptData&lt;/SPAN&gt; = &lt;SPAN&gt;partTracker&lt;/SPAN&gt;.&lt;SPAN&gt;Item&lt;/SPAN&gt;(&lt;SPAN&gt;occdoc&lt;/SPAN&gt;)
				&lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;count&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;Integer&lt;/SPAN&gt; = &lt;SPAN&gt;ptData&lt;/SPAN&gt;.&lt;SPAN&gt;qty&lt;/SPAN&gt;
				&lt;SPAN&gt;ptData&lt;/SPAN&gt;.&lt;SPAN&gt;qty&lt;/SPAN&gt; = &lt;SPAN&gt;count&lt;/SPAN&gt; + 1
				&lt;SPAN&gt;ptData&lt;/SPAN&gt;.&lt;SPAN&gt;thickness&lt;/SPAN&gt; = &lt;SPAN&gt;ptData&lt;/SPAN&gt;.&lt;SPAN&gt;thickness&lt;/SPAN&gt;
				&lt;SPAN&gt;ptData&lt;/SPAN&gt;.&lt;SPAN&gt;material&lt;/SPAN&gt; = &lt;SPAN&gt;ptData&lt;/SPAN&gt;.&lt;SPAN&gt;material&lt;/SPAN&gt;
				&lt;SPAN&gt;partTracker&lt;/SPAN&gt;.&lt;SPAN&gt;Item&lt;/SPAN&gt;(&lt;SPAN&gt;occdoc&lt;/SPAN&gt;) = &lt;SPAN&gt;ptData&lt;/SPAN&gt;
			&lt;SPAN&gt;Else&lt;/SPAN&gt;
				&lt;SPAN&gt;ptData&lt;/SPAN&gt;.&lt;SPAN&gt;qty&lt;/SPAN&gt; = 1
				&lt;SPAN&gt;ptData&lt;/SPAN&gt;.&lt;SPAN&gt;thickness&lt;/SPAN&gt; = &lt;SPAN&gt;occdoc&lt;/SPAN&gt;.&lt;SPAN&gt;ComponentDefinition&lt;/SPAN&gt;.&lt;SPAN&gt;Thickness&lt;/SPAN&gt;.&lt;SPAN&gt;value&lt;/SPAN&gt; * 10
				&lt;SPAN&gt;ptData&lt;/SPAN&gt;.&lt;SPAN&gt;material&lt;/SPAN&gt; = &lt;SPAN&gt;occdoc&lt;/SPAN&gt;.&lt;SPAN&gt;ComponentDefinition&lt;/SPAN&gt;.&lt;SPAN&gt;Material&lt;/SPAN&gt;.&lt;SPAN&gt;Name&lt;/SPAN&gt;
				&lt;SPAN&gt;partTracker&lt;/SPAN&gt;.&lt;SPAN&gt;Add&lt;/SPAN&gt;(&lt;SPAN&gt;occdoc&lt;/SPAN&gt;, &lt;SPAN&gt;ptData&lt;/SPAN&gt;)
			&lt;SPAN&gt;End&lt;/SPAN&gt; &lt;SPAN&gt;If&lt;/SPAN&gt;
		&lt;SPAN&gt;ElseIf&lt;/SPAN&gt; &lt;SPAN&gt;TypeOf&lt;/SPAN&gt; &lt;SPAN&gt;occdoc&lt;/SPAN&gt; &lt;SPAN&gt;Is&lt;/SPAN&gt; &lt;SPAN&gt;AssemblyDocument&lt;/SPAN&gt; &lt;SPAN&gt;Then&lt;/SPAN&gt;
			&lt;SPAN&gt;RecursiveCount&lt;/SPAN&gt;(&lt;SPAN&gt;occdoc&lt;/SPAN&gt;, &lt;SPAN&gt;partTracker&lt;/SPAN&gt;)
		&lt;SPAN&gt;End&lt;/SPAN&gt; &lt;SPAN&gt;If&lt;/SPAN&gt;
	&lt;SPAN&gt;Next&lt;/SPAN&gt;
&lt;SPAN&gt;End&lt;/SPAN&gt; &lt;SPAN&gt;Sub&lt;/SPAN&gt;

&lt;SPAN&gt;Public&lt;/SPAN&gt; &lt;SPAN&gt;Class&lt;/SPAN&gt; &lt;SPAN&gt;PartTrackerData&lt;/SPAN&gt;
	&lt;SPAN&gt;Public&lt;/SPAN&gt; &lt;SPAN&gt;qty&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;Integer&lt;/SPAN&gt;
	&lt;SPAN&gt;Public&lt;/SPAN&gt; &lt;SPAN&gt;material&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;String&lt;/SPAN&gt;
	&lt;SPAN&gt;Public&lt;/SPAN&gt; &lt;SPAN&gt;thickness&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;Double&lt;/SPAN&gt;
&lt;SPAN&gt;End&lt;/SPAN&gt; &lt;SPAN&gt;Class&lt;/SPAN&gt;

&lt;SPAN&gt;Sub&lt;/SPAN&gt; &lt;SPAN&gt;Make_DXF&lt;/SPAN&gt;(&lt;SPAN&gt;odoc&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;PartDocument&lt;/SPAN&gt;, &lt;SPAN&gt;fullfilename&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;String&lt;/SPAN&gt;, &lt;SPAN&gt;ExpSettingQuestion&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;Boolean&lt;/SPAN&gt;, &lt;SPAN&gt;ByRef&lt;/SPAN&gt; &lt;SPAN&gt;errReport&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;List&lt;/SPAN&gt;(&lt;SPAN&gt;Of&lt;/SPAN&gt; &lt;SPAN&gt;String&lt;/SPAN&gt;))
	&lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;oCompDef&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;SheetMetalComponentDefinition&lt;/SPAN&gt; = &lt;SPAN&gt;odoc&lt;/SPAN&gt;.&lt;SPAN&gt;ComponentDefinition&lt;/SPAN&gt;

	&lt;SPAN&gt;If&lt;/SPAN&gt; &lt;SPAN&gt;oCompDef&lt;/SPAN&gt;.&lt;SPAN&gt;HasFlatPattern&lt;/SPAN&gt; = &lt;SPAN&gt;False&lt;/SPAN&gt; &lt;SPAN&gt;Then&lt;/SPAN&gt;
		&lt;SPAN&gt;Try&lt;/SPAN&gt;
			&lt;SPAN&gt;oCompDef&lt;/SPAN&gt;.&lt;SPAN&gt;Unfold&lt;/SPAN&gt;()
			&lt;SPAN&gt;oCompDef&lt;/SPAN&gt;.&lt;SPAN&gt;FlatPattern&lt;/SPAN&gt;.&lt;SPAN&gt;ExitEdit&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;errReport&lt;/SPAN&gt;.&lt;SPAN&gt;Add&lt;/SPAN&gt;(&lt;SPAN&gt;"Cannot unfold the following file: "&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;System&lt;/SPAN&gt;.&lt;SPAN&gt;IO&lt;/SPAN&gt;.&lt;SPAN&gt;Path&lt;/SPAN&gt;.&lt;SPAN&gt;GetFileNameWithoutExtension&lt;/SPAN&gt;(&lt;SPAN&gt;fullfilename&lt;/SPAN&gt;))
			&lt;SPAN&gt;Exit&lt;/SPAN&gt; &lt;SPAN&gt;Sub&lt;/SPAN&gt;
		&lt;SPAN&gt;End&lt;/SPAN&gt; &lt;SPAN&gt;Try&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;options&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;New&lt;/SPAN&gt; &lt;SPAN&gt;List&lt;/SPAN&gt;(&lt;SPAN&gt;Of&lt;/SPAN&gt; &lt;SPAN&gt;String&lt;/SPAN&gt;)
	&lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;sOut&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;String&lt;/SPAN&gt; = &lt;SPAN&gt;""&lt;/SPAN&gt;
	&lt;SPAN&gt;If&lt;/SPAN&gt; &lt;SPAN&gt;ExpSettingQuestion&lt;/SPAN&gt; &lt;SPAN&gt;Then&lt;/SPAN&gt;
		&lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;optionList&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;List&lt;/SPAN&gt;(&lt;SPAN&gt;Of&lt;/SPAN&gt; &lt;SPAN&gt;String&lt;/SPAN&gt;) = &lt;SPAN&gt;New&lt;/SPAN&gt; &lt;SPAN&gt;List&lt;/SPAN&gt;(&lt;SPAN&gt;Of&lt;/SPAN&gt; &lt;SPAN&gt;String&lt;/SPAN&gt;) &lt;SPAN&gt;From&lt;/SPAN&gt; {
		&lt;SPAN&gt;"AcadVersion=2004"&lt;/SPAN&gt;,
		&lt;SPAN&gt;"OuterProfileLayer=0"&lt;/SPAN&gt;,
		&lt;SPAN&gt;"InteriorProfilesLayer=0"&lt;/SPAN&gt;,
		&lt;SPAN&gt;"UnconsumedSketchesLayer=YELLOW"&lt;/SPAN&gt;,
		&lt;SPAN&gt;"UnconsumedSketchesLayerColor=255;255;0"&lt;/SPAN&gt;,
		&lt;SPAN&gt;"BendUpLayer=YELLOW"&lt;/SPAN&gt;,
		&lt;SPAN&gt;"BendUpLayerColor=255;255;0"&lt;/SPAN&gt;,
		&lt;SPAN&gt;"BendDownLayer=YELLOW"&lt;/SPAN&gt;,
		&lt;SPAN&gt;"BendDownLayerColor=255;255;0"&lt;/SPAN&gt;,
		&lt;SPAN&gt;"MarkSurfaceUpLayer=YELLOW"&lt;/SPAN&gt;,
		&lt;SPAN&gt;"MarkSurfaceUpLayerColor=255;255;0"&lt;/SPAN&gt;,
		&lt;SPAN&gt;"MarkSurfaceDownLayer=YELLOW"&lt;/SPAN&gt;,
		&lt;SPAN&gt;"MarkSurfaceDownColor=255;255;0"&lt;/SPAN&gt;
		}

		&lt;SPAN&gt;options&lt;/SPAN&gt; = &lt;SPAN&gt;optionList&lt;/SPAN&gt;
		&lt;SPAN&gt;sOut&lt;/SPAN&gt; = &lt;SPAN&gt;"FLAT PATTERN DXF?AcadVersion=2000"&lt;/SPAN&gt; _
		+ &lt;SPAN&gt;"&amp;amp;InvisibleLayers=IV_TANGENT;IV_FEATURE_PROFILES;IV_ARC_CENTERS;IV_TOOL_CENTER;IV_TOOL_CENTER_DOWN;IV_FEATURE_PROFILES_DOWN"&lt;/SPAN&gt;
	&lt;SPAN&gt;Else&lt;/SPAN&gt;
		&lt;SPAN&gt;Dim&lt;/SPAN&gt; &lt;SPAN&gt;optionList&lt;/SPAN&gt; &lt;SPAN&gt;As&lt;/SPAN&gt; &lt;SPAN&gt;List&lt;/SPAN&gt;(&lt;SPAN&gt;Of&lt;/SPAN&gt; &lt;SPAN&gt;String&lt;/SPAN&gt;) = &lt;SPAN&gt;New&lt;/SPAN&gt; &lt;SPAN&gt;List&lt;/SPAN&gt;(&lt;SPAN&gt;Of&lt;/SPAN&gt; &lt;SPAN&gt;String&lt;/SPAN&gt;) &lt;SPAN&gt;From&lt;/SPAN&gt; {
		&lt;SPAN&gt;"AcadVersion=2004"&lt;/SPAN&gt;,
		&lt;SPAN&gt;"OuterProfileLayer=0"&lt;/SPAN&gt;,
		&lt;SPAN&gt;"InteriorProfilesLayer=0"&lt;/SPAN&gt;,
		&lt;SPAN&gt;"UnconsumedSketchesLayer=YELLOW"&lt;/SPAN&gt;,
		&lt;SPAN&gt;"UnconsumedSketchesLayerColor=255;255;0"&lt;/SPAN&gt;,
		&lt;SPAN&gt;""&lt;/SPAN&gt;,
		&lt;SPAN&gt;""&lt;/SPAN&gt;
		}

		&lt;SPAN&gt;options&lt;/SPAN&gt; = &lt;SPAN&gt;optionList&lt;/SPAN&gt;
		&lt;SPAN&gt;sOut&lt;/SPAN&gt; = &lt;SPAN&gt;"FLAT PATTERN DXF?AcadVersion=2000"&lt;/SPAN&gt; _
		+ &lt;SPAN&gt;"&amp;amp;InvisibleLayers=IV_TANGENT;IV_FEATURE_PROFILES;IV_ARC_CENTERS;IV_BEND;IV_BEND_DOWN;IV_TOOL_CENTER;IV_TOOL_CENTER_DOWN;IV_FEATURE_PROFILES_DOWN"&lt;/SPAN&gt;

	&lt;SPAN&gt;End&lt;/SPAN&gt; &lt;SPAN&gt;If&lt;/SPAN&gt;

	&lt;SPAN&gt;For&lt;/SPAN&gt; &lt;SPAN&gt;Each&lt;/SPAN&gt; &lt;SPAN&gt;opt&lt;/SPAN&gt; &lt;SPAN&gt;In&lt;/SPAN&gt; &lt;SPAN&gt;options&lt;/SPAN&gt;
		&lt;SPAN&gt;sOut&lt;/SPAN&gt; = &lt;SPAN&gt;sOut&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;"&amp;amp;"&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;opt&lt;/SPAN&gt;
	&lt;SPAN&gt;Next&lt;/SPAN&gt;
	&lt;SPAN&gt;sOut&lt;/SPAN&gt; = &lt;SPAN&gt;sOut&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;"?OFILE"&lt;/SPAN&gt;

	&lt;SPAN&gt;Try&lt;/SPAN&gt;
		&lt;SPAN&gt;oCompDef&lt;/SPAN&gt;.&lt;SPAN&gt;DataIO&lt;/SPAN&gt;.&lt;SPAN&gt;WriteDataToFile&lt;/SPAN&gt;(&lt;SPAN&gt;sOut&lt;/SPAN&gt;, &lt;SPAN&gt;fullfilename&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;errReport&lt;/SPAN&gt;.&lt;SPAN&gt;Add&lt;/SPAN&gt;(&lt;SPAN&gt;"Cannot export the following file: "&lt;/SPAN&gt; &amp;amp; &lt;SPAN&gt;System&lt;/SPAN&gt;.&lt;SPAN&gt;IO&lt;/SPAN&gt;.&lt;SPAN&gt;Path&lt;/SPAN&gt;.&lt;SPAN&gt;GetFileNameWithoutExtension&lt;/SPAN&gt;(&lt;SPAN&gt;fullfilename&lt;/SPAN&gt;))
	&lt;SPAN&gt;End&lt;/SPAN&gt; &lt;SPAN&gt;Try&lt;/SPAN&gt;
&lt;SPAN&gt;End&lt;/SPAN&gt; &lt;SPAN&gt;Sub&lt;/SPAN&gt;&amp;nbsp;&amp;nbsp;&lt;/PRE&gt;&lt;P&gt;&amp;nbsp;&lt;/P&gt;</description>
      <pubDate>Sat, 08 Jul 2023 11:11:20 GMT</pubDate>
      <guid>https://forums.autodesk.com/t5/inventor-programming-ilogic/error-handling/m-p/12087984#M154951</guid>
      <dc:creator>lmc.engineering</dc:creator>
      <dc:date>2023-07-08T11:11:20Z</dc:date>
    </item>
  </channel>
</rss>

