remove_section ( string ; pos ; delimiter )

Name & Parameters: [color:red][big] remove_section ( string ; pos ; delimiter ) [/big]

Description: Will remove a section from the given string.

string = The string to be altered

pos = The section to remove

delimiter = The section definer

For the delimiter, it is recommended to use one character long delimiters, for FM returns unconsistent values. This isn't saying it won't work, just don't count on it.

Sample Input:

remove_section ( "this-is-not-so-cool" , 3 , "-" )

Results:

this-is-so-cool

Recursive: no

Formula:

Let ([

$cfstr = string;

$cfstr = Substitute ( $cfstr ; delimiter ; "¶" );

$cflen = Length (GetValue( $cfstr ; pos ));

$cfposition = Position ( "¶" & $cfstr ; "¶" ; 1 ; pos );

$cfstr = Replace ( $cfstr ; $cfposition ; $cflen+1 ; "" )

];

Substitute ( $cfstr ; "¶" ; delimiter )

) 

Required Functions:

Author(s) Julian L

Date: 11/20/07

Credits:

Disclaimer:

FM Forums does not endorse or warrantee these files are fit for any particular purpose. Do not post or distribute files without written approval from the copyright owner. All files are deemed public domain unless otherwise indictated. Please backup every file that you intend to modify.

Edited November 20, 200718 yr by Guest