http://www.scriptlogic.com/kixtart UDF: Replace()

Replace()
http://www.scriptlogic.com/kixtart/FunctionLibrary_FunctionList.aspx

18 April 2002	Replace()
Author	Michel Sijmons, original by Jeff Shahan.
Action	The function replace all subString in a String with another subString.
Syntax	Replace (SourceString, ChrToReplace, ReplacementChr)
Parameters	SourceString (Required / String) The text in which you want to replace some characters. ChrToReplace (Required / String) The string you want to replace. ReplacementChr (Required / String) The string you want to replace with.
Remarks	The function is case unaware.
Returns	A String with all subStrings change to a new subString.
Dependencies	None.
Examples	Dim $NewString $OldString = "There#Once#Was#A#Man" ? $OldString $NewString = Replace($OldString ,"#","\") ? $NewString ; the string is now "There\Once\Was\A\Man" $NewString = Replace($NewString ,"a","?") ? $NewString ; the string is now "There\Once\W?s\?\M?n"
Source	FUNCTION Replace ($sourcestring, $chrtoreplace, $replacementchr) $array=Split($sourcestring,$chrtoreplace,-1) FOR EACH $element IN $array $replace=$replace+$element+$replacementchr NEXT $replace=Substr($replace,1,Len($replace)-1) ENDFUNCTION ; - Replace -

original source of UDF topic. show actual FunctionLibrary list on Scriptlogic site
printer-friendly mirror of UDF topic on scripting@wanadoo.nl site