getPathPart ( Pathname ; Number )

Parses pathname for each part

Average rating: 4.6 (28 votes) Log in to vote

Roger Biel
2Geckos Consulting, LLC
www.2geckos.com

Sample input:

C:/Users/Roger/WebWizDirect/Knozall/ ; 1
C:/Users/Roger/WebWizDirect/Knozall/MyTest.txt ; 2
C:/Users/Roger/WebWizDirect/Knozall/MyTest.txt ; 1
C:/Users/Roger/WebWizDirect/Knozall/MyTest.txt ; 99

Sample output:

Knozall
WebWizDirect
MyTest.txt
txt

Function definition: (Copy & paste into FileMaker's Edit Custom Function window)

/*  getPathPart( Pathname ; Number )
The pipe bar must be used to identify  the next field and must end in a pipe bar
great for passing data between tables 

-1 returns Path only
99 returns file extenstion
*/

Let( [
extenstion = Right( Pathname ; Length ( Pathname ) - Position ( Pathname ; "."; 1 ; PatternCount ( Pathname ; "."))) ;
part = If( Number < 1 ; 1 ; Number ) ;
Pathname = Substitute ( Pathname  & "/"  ; "//"; "/" ) ;
part = PatternCount( Pathname ; "/" ) - part + 1  ;

                  // Test for no filename
Begin = If( Middle ( Pathname ; Length( Pathname ) - 4 ; 1 ) = "." ; Position( Pathname ; "/"; 1; part - 1 ) +  1 ; 0  ) ;
             // Begin = Position( Pathname ; "/"; 1; part - 1 ) +  1;

End = Position( Pathname ; "/"; 1  ; part ) - Begin
];

Case( Number > 98 ; extenstion ;
Number < 1 ;  Substitute ( Pathname ; Middle( Pathname ; begin;  end)  & "/" ; "" )  ;
Middle( Pathname ; begin;  end)

)
)

Option number
0: Returns parent folder
1: Returns the target file or folder name
2-3-4-ect: Returns each part of the pathname
-1: returns Path only
99: returns file extenstion

Comments

Note: these functions are not guaranteed or supported by BrianDunning.com. Please contact the individual developer with any questions or problems.

getPathPart ( Pathname ; Number )

Comments

Support this website.

Support this website.