Coldfish test
May 28
This is a test of Coldfish in BlogCFC on Bludragon JX 7.0x.
--UPDATE-- I never did get Coldfish working with BlueDragon. However the code below may be useful to someone. It might even be a hidden cf_gem.
2 <cfargument name="string" type="any" required="true" hint="String to clean"/>
3 <cfset var pattern = "<[^>]*>">
4 <cfreturn REReplaceNoCase(arguments.string, pattern, "" , "ALL")>
5</cffunction>
2# PCASE #
3# receive a string of data in any case and return the string #
4# in proper case format #
5# return data string #
6######################################################################## --->
7<cffunction name="PCase" access="public" output="false" returntype="String" hint="receive a string of data in any case and return the string in proper case format">
8 <cfargument name="string" default="" required="true" hint="string to alter">
9 <cfscript>
10 var listlen = listlen(arguments.string," ");
11 var return_string = '';
12 var pos = 0;
13 for (pos=1;pos lte listlen;pos=pos+1) {
14 if lenn(ListGetAt(arguments.string,pos," ")) gt "1") {
15 return_string = return_string & Ucase(left(ListGetAt(arguments.string,pos," "), 1)) & LCase(right(ListGetAt(arguments.string,pos," "), len(ListGetAt(arguments.string,pos," "))-1)) & " ";
16 } else {
17 return_string = return_string & Ucase(left(ListGetAt(arguments.string,pos," "), 1)) & " ";
18 }
19 }
20 return Trim(return_string);
21 </cfscript>
22</cffunction>




