06-14-2016
07:25 AM
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report
06-14-2016
07:25 AM
Hi yordi.verbraak,
I didn't understand if you were doing this with iLogic or some other method, but here is an ilogic example.
More ilogic examples here:
I hope this helps.
Best of luck to you in all of your Inventor pursuits,
Curtis
http://inventortrenches.blogspot.com
Dim strName As String
Dim strArray() As String
strName = ThisDoc.Document.FullFileName
strArray = Split(strName, "\")
'show full file path
MessageBox.Show("Full file path : " & vbLf & strName, "iLogic")
'show each member of the string array
i=0
For intCount = LBound(strArray) To UBound(strArray)
MessageBox.Show("Array member " & i & ": " & vbLf & strArray(i), "iLogic")
i=i+1
Next
'show the project number folder
'assumes that it is the folder that contains the file
'therefore we use the upperbound of the array minus 1
j = UBound(strArray)-1
MessageBox.Show("The project folder: " & vbLf & strArray(j), "iLogic")