FileMaker Pro Custom Functions

This function doesn't loop if you have more than one link. I propose:

//HTMLurl (text;target)

Let( [ FS=Position(text;"*";1;1) ; SS=Position(text;"*";1;2) ; URL=Middle(text;FS+1;SS-FS-1);

A= Substitute( text; Middle(text;FS;SS-FS+1) ; "<a href='http://"& URL & "' target='_" &target& "'>"& URL &"</a>" ) ];

If( PatternCount ( text ; "*" ) ≥ 2; HTMLurl( A; target ); text)

)

// transforms all text in between 'star' (exemple: *mydomain.com* ) with the URL link. No need to write the http:// first
// target is to choose if you want to open in self ; blank ; top or new window
// by Patryck 2010

Patryck, Barcelona
January 17, 2011 8:51am

This function fails if there's an extra closing bracket. "]".

Eric.Matthews, SJSU.edu
August 12, 2011 11:47am

This fixes infinite recursion from mismatched brackets:

Let ( [
@textToCode = textToCode
; @openSquarePos = Position ( @textToCode ; "[" ; 1 ; 1 )
; @closeSquarePos = Position ( @textToCode ; "]" ; @openSquarePos;1 )
// Search from "@openSquarePos;1" not "1;1" Eric.Matthews sjsu.edu

; @afterOpenSquare = Right ( @textToCode ; Length ( @textToCode ) - @openSquarePos )
; @url = Left ( @afterOpenSquare ; @closeSquarePos - @openSquarePos - 1 )
; @encodedUrl = "<a href=\"" & @url & "\">" & @url & "</a>"
; @subbed = Substitute ( @textToCode ; "[" & @url & "]" ; @encodedUrl )
];

Case
( // @openSquarePos and @closeSquarePos" determine completion. Eric.Matthews sjsu.edu
not(@openSquarePos and @closeSquarePos);
@subbed;
EncodeURL_CF ( @subbed )
) // End Case

) // End Let

Eric.Matthews, SJSU.edu
August 12, 2011 12:20pm