Inventor iLogic, Macros, AddIns & Apprentice Forum. Share your knowledge, ask questions, and explore popular Inventor topics related to programming, creating add-ins, macros, working with the API or creating iLogic tools.
Auto-suggest helps you quickly narrow down your search results by suggesting possible matches as you type.
Showing results for
Show only
|
Search instead for
Did you mean:
This page has been translated for your convenience with an automatic translation service. This is not an official translation and may contain errors and inaccurate translations. Autodesk does not warrant, either expressly or implied, the accuracy, reliability or completeness of the information translated by the machine translation service and will not be liable for damages or losses caused by the trust placed in the translation service.Translate
export part iproperties description value while in the drawing document????
I have a title block property that feeds off of the model property description. I want to export that to an .txt file is this possible without opening the part itself. Please help as I am a newbie to this I am not sure how. Below is what I have started with but I know its not correct unless I have the part open. I am wonder if I can avoid opening the part and or can I extract it from the title block definition. Sorry I am newb to VBA but learning fast. Really stuck on this one PLEASE PLEASE HELP. Thanks
Sub SinglePart()
Dim oDrawingDoc As DrawingDocument
Set oDrawingDoc = ThisApplication.ActiveDocument
Dim oPartdoc As PartDocument
Set oPartdoc = ThisApplication.ActivePart (HELP!)
Dim oPartDesc As Property
Set oPartDesc = oPartdoc.PropertySets.Item("Design Tracking Properties").Item("Description")
Set fs1 = CreateObject("Scripting.FileSystemObject")
Set a1 = fs1.CreateTextFile("c:\autosave\bomgen\bomgenAI.txt", True)
a1.WriteLine (oPartDesc.Value)
a1.Close
export part iproperties description value while in the drawing document????
I have a title block property that feeds off of the model property description. I want to export that to an .txt file is this possible without opening the part itself. Please help as I am a newbie to this I am not sure how. Below is what I have started with but I know its not correct unless I have the part open. I am wonder if I can avoid opening the part and or can I extract it from the title block definition. Sorry I am newb to VBA but learning fast. Really stuck on this one PLEASE PLEASE HELP. Thanks
Sub SinglePart()
Dim oDrawingDoc As DrawingDocument
Set oDrawingDoc = ThisApplication.ActiveDocument
Dim oPartdoc As PartDocument
Set oPartdoc = ThisApplication.ActivePart (HELP!)
Dim oPartDesc As Property
Set oPartDesc = oPartdoc.PropertySets.Item("Design Tracking Properties").Item("Description")
Set fs1 = CreateObject("Scripting.FileSystemObject")
Set a1 = fs1.CreateTextFile("c:\autosave\bomgen\bomgenAI.txt", True)
a1.WriteLine (oPartDesc.Value)
a1.Close
use following code for getting property without opening file
Dim servercom As New Inventor.ApprenticeServerComponent
Dim serverDoc As Inventor.ApprenticeServerDocument
serverDoc = servercom.Open("C:\Cylindrical.ipt")
Dim count As Integer = serverDoc.PropertySets.Count
Dim i As Integer = 0
For i = 1 To count
Dim Propset As PropertySet = serverDoc.PropertySets(i)
Next
use following code for getting property without opening file
Dim servercom As New Inventor.ApprenticeServerComponent
Dim serverDoc As Inventor.ApprenticeServerDocument
serverDoc = servercom.Open("C:\Cylindrical.ipt")
Dim count As Integer = serverDoc.PropertySets.Count
Dim i As Integer = 0
For i = 1 To count
Dim Propset As PropertySet = serverDoc.PropertySets(i)
Next
THANK YOU SO MUCH with a little tweaks I got this to grab the property I wanted. I hate to ask but since I am a newbie I have to. Is there a way to grab the full part file path inside of the drawing if so how? I would also like to grab a sheet property specifically the sheet number property and how would I achieve that. Thanks again and I appreciate all the help you can give me.
THANK YOU SO MUCH with a little tweaks I got this to grab the property I wanted. I hate to ask but since I am a newbie I have to. Is there a way to grab the full part file path inside of the drawing if so how? I would also like to grab a sheet property specifically the sheet number property and how would I achieve that. Thanks again and I appreciate all the help you can give me.
