Shorten filename and path

[Anonymous]

I'm using the "file name and path" from the drawing properties on our borders.

Is there a way i can shorten it so it misses the "C:Vault Workspace\Projects\" from the path?

[Owner2229]

Hi, try something like this:

Dim FileName As String
FileName = "C:\Vault Workspace\Projects\MyPart.ipt" 'write the specific iProperty code here
Dim FNP As Integer
FNP = InstrRev(FileName, "\", -1)
Dim oName As String
oName = Mid(FileName, FNP + 1)

[Anonymous]

So this needs to written as a rule, and then it will update <FILENAME AND PATH> that i have in a text box?

[MechMachineMan]

Yes, one of the easier ways is definitely to have it as a property in the file at whatever level you want it to come from.

Alternative code for if you just want the file name is:

oName = System.IO.Path.GetFileName(ThisApplication.ActiveDocument.FullFileName)

or to only remove a starting section of the file path:

path = "C:\Users\Desktop\Excel Use.txt"
npath = path.Replace("C:\Users", "")
MsgBox(npath)

[rossano_praderi · Accepted solution]

Hi Wane,

here attached you can find a sample of what MechMachine was saying.

My sample contain a short Ilogic rule, event trigger ("Before save"), one personalized Iproperty (as one of many options) and a modified definition of the titleblock.

The drawing was created with the release 2016.

Bregs

Rossano Praderi

[Anonymous]

Thanks every one, this example .idw is spot on!

[mguman]

I have done it for one drawing now but will this work with other unmodified drawings? I have multiple drawings where I have this same issue that needs to be changed. Will I have to add an iLogic rule and personalized iProperty for each drawing that needs the change? 

[rossano_praderi]

Hi @mguman

I'm not sure if I clearly understand all your requirements, I will suppose the answer to your question is "YES", you have to apply "this solution" to all of your files.

If you have to apply "this solution" to all your files, I would like to suggest you this post.

Otherwise I recommend you to open a new request with more details.

Bregs

Rossano Praderi