| Server IP : 172.67.201.108 / Your IP : 216.73.216.11 Web Server : Apache/2.4.68 (Amazon Linux) OpenSSL/3.5.5 System : Linux ip-172-31-69-123.ec2.internal 6.1.176-223.369.amzn2023.x86_64 #1 SMP PREEMPT_DYNAMIC Fri Jul 24 13:34:27 UTC 2026 x86_64 User : ec2-user ( 1000) PHP Version : 8.4.23 Disable Function : NONE MySQL : OFF | cURL : ON | WGET : ON | Perl : ON | Python : OFF | Sudo : ON | Pkexec : ON Directory : /home/home2/cgny/nympadmin/ |
Upload File : |
<cfcontent type="text/html;charset=iso-8859-1">
<cfprocessingDirective pageencoding="iso-8859-1">
<cfset setEncoding("Form", "ISO-8859-15")>
<cfif DirectoryExists('/home2/cgny/www/listingsupload/#url.id#')>
<cfelse>
<cfdirectory action = "create" directory = "/home2/cgny/www/listingsupload/#url.id#" mode="777" >
</cfif>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<link rel="stylesheet" type="text/css" href="/bwwstyles1.css" media="all">
<CFSET CurrentDateTime = #CreateODBCDateTime(Now())#><cfif session.email eq ''><cfset Session.email = -1></cfif><cfif IsDefined("Cookie.email")><cfset Session.email = Cookie.email></cfif>
<cfcontent type="text/html;charset=iso-8859-1">
<cfprocessingDirective pageencoding="iso-8859-1">
<cfset setEncoding("Form", "ISO-8859-15")>
<cfinclude template="header.cfm">
<div id="content">
<div id="content-header">
</div>
<div class="container-fluid" style="margin-left:200px;">
<cfif parameterexists(Session.email) and (Session.email IS NOT -1) and (#getuser.accesslevel# eq 100)>
<cfquery name="getcolumn" datasource="#ds#">
select *
from ParentsListingsCatMain
where id = #url.id#
</cfquery>
<table width=600><tr><td style="padding:5px;" >
<div align="center"><font face=verdana size=+1><strong>Edit Category</strong></font>
<br>
<cfoutput>
<FORM action="editbestbetcategory2.cfm" method=post >
</cfoutput>
<br>
<cfoutput query="Getcolumn" maxrows = 1>
<input NAME="ID" SIZE="70" value="#getcolumn.id#" type="hidden">
<table cellspacing=5 cellpadding=5>
<tr>
<td style="padding:5px;" >
<b><font SIZE="-1" FACE="verdana" >Category Name:</font></b>
</td><td style="padding:5px;" >
<input NAME="name" SIZE="70" value="#getcolumn.catname#">
</td></tr>
<tr>
<td style="padding:5px;" >
<b><font SIZE="-1" FACE="verdana" >Print Category Name:</font></b>
</td><td style="padding:5px;" >
<input NAME="shortname" SIZE="70" value="#getcolumn.shortname#">
</td></tr>
<tr>
<td style="padding:5px;" >
<b><font SIZE="-1" FACE="verdana" >Category Description:</font></b>
</td><td style="padding:5px;" >
<textarea rows="10" cols="60" name="catdescription">#getcolumn.catdescription#</textarea>
</td></tr>
<tr>
<td style="padding:5px;" >
<b><font SIZE="-1" FACE="verdana" >Category Keywords:</font></b>
</td><td style="padding:5px;" >
<textarea rows="10" cols="60" name="catkeywords">#getcolumn.catkeywords#</textarea>
</td></tr>
<tr>
<td style="padding:5px;" >
<b><font SIZE="-1" FACE="verdana" >Hide:</font></b>
</td><td style="padding:5px;" >
<select name="hide">
<cfif #getcolumn.hide# eq 1>
<option value="1">Yes</option>
</cfif>
<option value="0">No</option>
<option value="1">Yes</option>
</select>
</td></tr>
</cfoutput>
<tr>
<td style="padding:5px;" >
<b><font SIZE="-1" FACE="verdana" >Master Category:</font></b>
</td><td style="padding:5px;" >
<select name="mastercat">
<cfif #getcolumn.mastercat# is not 0>
<cfquery name="Getmas" datasource="cityguide">
select catname
from pkmastersource
where id = #getcolumn.mastercat#
</cfquery>
<cfoutput>
<option value="#getcolumn.mastercat#">#getmas.catname#</option>
</cfoutput>
</cfif>
<cfquery name="Getmas2" datasource="cityguide">
select catname,id
from pkmastersource
order by catname
</cfquery>
<cfoutput query="Getmas2">
<option value="#id#">#catname#</option>
</cfoutput>
</select>
</td></tr>
<tr>
<td style="padding:5px;" >
<b><font SIZE="-1" FACE="verdana" >Master Category 2019:</font></b>
</td><td style="padding:5px;" >
<select name="mastercat2019">
<cfif #getcolumn.mastercat2019# is not 0>
<cfquery name="Getmas" datasource="cityguide">
select catname
from pkmastersource2011
where id = #getcolumn.mastercat#
</cfquery>
<cfoutput>
<option value="#getcolumn.mastercat#">#getmas.catname#</option>
</cfoutput>
<Cfelse>
<option value="0">Pick One</option>
</cfif>
<cfquery name="Getmas2" datasource="cityguide">
select catname,id
from pkmastersource2011
order by catname
</cfquery>
<cfoutput query="Getmas2">
<option value="#id#">#catname#</option>
</cfoutput>
</select>
</td></tr>
<tr>
<td style="padding:5px;" VALIGN=TOP colspan=2><b><font face="Arial" size="-1">Enhanced Listing:</font></b><Br />
<cfoutput>
<input type="hidden" name="copyedit" id="copyedit" value="#htmlEditFormat(getcolumn.enhancedlisting)#">
<script type="text/javascript">
// KTML4 Object
ktml_copyedit = new ktml("copyedit");
</script>
</cfoutput>
</td>
</tr>
</table>
<center><b><input type="submit" Value="Update Site"></b></center>
</center><br>
</form>
</td></tr></table>
<cffunction name="autoLink" returntype="string" access="public" output="false" hint="View, Helper, Turns all URLs and e-mail addresses into clickable links.">
<cfargument name="text" type="string" required="true" hint="The text to create links in.">
<cfargument name="link" type="string" required="false" default="all" hint="Whether to link URLs, email addresses or both. Possible values are: 'all' (default), 'URLs' and 'emailAddresses'.">
<!---
EXAMPLES:
#autoLink("Download Wheels from http://www.cfwheels.com/download")#
-> Download Wheels from <a href="http://www.cfwheels.com/download">http://www.cfwheels.com/download</a>
#autoLink("Email us at [email protected]")#
-> Email us at <a href="mailto:[email protected]">[email protected]</a>
RELATED:
* [capitalize capitalize()] (function)
* [excerpt excerpt()] (function)
* [highlight highlight()] (function)
* [pluralize pluralize()] (function)
* [simpleFormat simpleFormat()] (function)
* [singularize singularize()] (function)
* [stripLinks stripLinks()] (function)
* [stripTags stripTags()] (function)
* [titleize titleize()] (function)
* [truncate truncate()] (function)
--->
<cfscript>
var loc = {};
loc.urlRegex = "(?ix)([^(url=)|(href=)'""])(((https?)://([^:]+\:[^@]*@)?)([\d\w\-]+\.)?[\w\d\-\.]+\.(com|net|org|info|biz|tv|co\.uk|de|ro|it|site)(( / [\w\d\.\-@%\\\/:]* )+)?(\?[\w\d\?%,\.\/\##!@:=\+~_\-&]*(?<![\.]))?)";
loc.mailRegex = "(([^@\s]+)@((?:[-a-z0-9]+\.)+[a-z]{2,}))";
loc.returnValue = arguments.text;
if (arguments.link IS NOT "URLs")
loc.returnValue = REReplaceNoCase(loc.returnValue, loc.mailRegex, "<a href=""mailto:\1"">\1</a>", "all");
if (arguments.link IS NOT "emailAddresses")
loc.returnValue = loc.returnValue.ReplaceAll(loc.urlRegex, "$1<a href=""$2"">$2</a>");
</cfscript>
<cfreturn loc.returnValue>
</cffunction>
<cffunction name="excerpt" returntype="string" access="public" output="false" hint="View, Helper, Extracts an excerpt from text that matches the first instance of phrase.">
<cfargument name="text" type="string" required="true" hint="The text to extract an excerpt from.">
<cfargument name="phrase" type="string" required="true" hint="The phrase to extract.">
<cfargument name="radius" type="numeric" required="false" default="100" hint="Number of characters to extract surronding the phrase.">
<cfargument name="excerptString" type="string" required="false" default="..." hint="String to replace first and/or last characters with.">
<!---
EXAMPLES:
#excerpt(text="Wheels is a framework for ColdFusion", phrase="framework", radius=5)#
-> ...is a framework for ...
RELATED:
* [autoLink autoLink()] (function)
* [capitalize capitalize()] (function)
* [highlight highlight()] (function)
* [pluralize pluralize()] (function)
* [simpleFormat simpleFormat()] (function)
* [singularize singularize()] (function)
* [stripLinks stripLinks()] (function)
* [stripTags stripTags()] (function)
* [titleize titleize()] (function)
* [truncate truncate()] (function)
--->
<cfscript>
var loc = {};
loc.pos = FindNoCase(arguments.phrase, arguments.text, 1);
if (loc.pos != 0)
{
loc.excerptStringStart = arguments.excerptString;
loc.excerptStringEnd = arguments.excerptString;
loc.start = loc.pos - arguments.radius;
if (loc.start <= 0)
{
loc.start = 1;
loc.excerptStringStart = "";
}
loc.count = Len(arguments.phrase) + (arguments.radius*2);
if (loc.count > (Len(arguments.text)-loc.start))
loc.excerptStringEnd = "";
loc.returnValue = loc.excerptStringStart & Mid(arguments.text, loc.start, loc.count) & loc.excerptStringEnd;
}
else
{
loc.returnValue = "";
}
</cfscript>
<cfreturn loc.returnValue>
</cffunction>
<cffunction name="highlight" returntype="string" access="public" output="false" hint="View, Helper, Highlights the phrase(s) everywhere in the text if found by wrapping it in a strong tag (by default).">
<cfargument name="text" type="string" required="true">
<cfargument name="phrases" type="string" required="true">
<cfargument name="highlighter" type="string" required="false" default="<strong class=""highlight"">\1</strong>">
<!---
EXAMPLES:
#highlight(text="You searched for: Wheels", phrases="Wheels")#
-> You searched for: <strong class="highlight">Wheels</strong>
RELATED:
* [autoLink autoLink()] (function)
* [capitalize capitalize()] (function)
* [excerpt excerpt()] (function)
* [pluralize pluralize()] (function)
* [simpleFormat simpleFormat()] (function)
* [singularize singularize()] (function)
* [stripLinks stripLinks()] (function)
* [stripTags stripTags()] (function)
* [titleize titleize()] (function)
* [truncate truncate()] (function)
--->
<cfscript>
var loc = {};
loc.returnValue = arguments.text;
loc.iEnd = ListLen(arguments.phrases);
for (loc.i=1; loc.i LTE loc.iEnd; loc.i=loc.i+1)
{
loc.returnValue = REReplaceNoCase(loc.returnValue, "(#ListGetAt(arguments.phrases, loc.i)#)", arguments.highlighter, "all");
}
</cfscript>
<cfreturn loc.returnValue>
</cffunction>
<cffunction name="simpleFormat" returntype="string" access="public" output="false" hint="View, Helper, Replaces single newline characters with HTML break tags and double newline characters with HTML paragraph tags (properly closed to comply with XHTML standards).">
<cfargument name="text" type="string" required="true" hint="The text to format.">
<!---
EXAMPLES:
#simpleFormat(params.content)#
RELATED:
* [autoLink autoLink()] (function)
* [capitalize capitalize()] (function)
* [excerpt excerpt()] (function)
* [highlight highlight()] (function)
* [pluralize pluralize()] (function)
* [singularize singularize()] (function)
* [stripLinks stripLinks()] (function)
* [stripTags stripTags()] (function)
* [titleize titleize()] (function)
* [truncate truncate()] (function)
--->
<cfscript>
var loc = {};
loc.returnValue = Trim(arguments.text);
loc.returnValue = Replace(loc.returnValue, "#Chr(10)##Chr(10)#", "</p><p>", "all");
loc.returnValue = Replace(loc.returnValue, "#Chr(10)#", "<br />", "all");
if (loc.returnValue != "")
loc.returnValue = "<p>" & loc.returnValue & "</p>";
</cfscript>
<cfreturn loc.returnValue>
</cffunction>
<cffunction name="stripLinks" returntype="string" access="public" output="false" hint="View, Helper, Removes all links from the text (leaving just the link text).">
<cfargument name="text" type="string" required="true" hint="The text to remove links from.">
<!---
EXAMPLES:
#stripLinks("Wheels is a framework for <a href='http://www.adobe.com'>ColdFusion</a>")#
-> Wheels is a framework for ColdFusion
RELATED:
* [autoLink autoLink()] (function)
* [capitalize capitalize()] (function)
* [excerpt excerpt()] (function)
* [highlight highlight()] (function)
* [pluralize pluralize()] (function)
* [simpleFormat simpleFormat()] (function)
* [singularize singularize()] (function)
* [stripTags stripTags()] (function)
* [titleize titleize()] (function)
* [truncate truncate()] (function)
--->
<cfreturn REReplaceNoCase(arguments.text, "<a.*?>(.*?)</a>", "\1" , "all")>
</cffunction>
<cffunction name="stripTags" returntype="string" access="public" output="false" hint="View, Helper, Removes all tags from the text.">
<cfargument name="text" type="string" required="true" hint="The text to remove links from.">
<!---
EXAMPLES:
#stripTags("Wheels is a <b>framework</b> for <a href='http://www.adobe.com'>ColdFusion</a>")#
-> Wheels is a framework for ColdFusion
RELATED:
* [autoLink autoLink()] (function)
* [capitalize capitalize()] (function)
* [excerpt excerpt()] (function)
* [highlight highlight()] (function)
* [pluralize pluralize()] (function)
* [simpleFormat simpleFormat()] (function)
* [singularize singularize()] (function)
* [stripLinks stripLinks()] (function)
* [titleize titleize()] (function)
* [truncate truncate()] (function)
--->
<cfreturn REReplaceNoCase(arguments.text, "<[a-z].*?>(.*?)</[a-z]>", "\1" , "all")>
</cffunction>
<cffunction name="titleize" returntype="string" access="public" output="false" hint="View, Helper, Capitalizes all words in the text to create a nicer looking title.">
<cfargument name="text" type="string" required="true" hint="The text to turn into a title.">
<!---
EXAMPLES:
#titleize("Wheels is a framework for ColdFusion")#
-> Wheels Is A Framework For ColdFusion
RELATED:
* [autoLink autoLink()] (function)
* [capitalize capitalize()] (function)
* [excerpt excerpt()] (function)
* [highlight highlight()] (function)
* [pluralize pluralize()] (function)
* [simpleFormat simpleFormat()] (function)
* [singularize singularize()] (function)
* [stripLinks stripLinks()] (function)
* [stripTags stripTags()] (function)
* [truncate truncate()] (function)
--->
<cfscript>
var loc = {};
loc.returnValue = "";
loc.iEnd = ListLen(arguments.text, " ");
for (loc.i=1; loc.i LTE loc.iEnd; loc.i=loc.i+1)
{
loc.returnValue = ListAppend(loc.returnValue, capitalize(ListGetAt(arguments.text, loc.i, " ")), " ");
}
</cfscript>
<cfreturn loc.returnValue>
</cffunction>
<cffunction name="truncate" returntype="string" access="public" output="false" hint="View, Helper, Truncates text to the specified length and replaces the last characters with the specified truncate string (defaults to '...').">
<cfargument name="text" type="string" required="true" hint="The text to truncate.">
<cfargument name="length" type="numeric" required="false" default="30" hint="Length to truncate the text to.">
<cfargument name="truncateString" type="string" required="false" default="..." hint="String to replace the last characters with.">
<!---
EXAMPLES:
#truncate(text="Wheels is a framework for ColdFusion", length=20)#
-> Wheels is a frame...
#truncate(text="Wheels is a framework for ColdFusion", truncateString=" (more)")#
-> Wheels is a fra... (continued)
RELATED:
* [autoLink autoLink()] (function)
* [capitalize capitalize()] (function)
* [excerpt excerpt()] (function)
* [highlight highlight()] (function)
* [pluralize pluralize()] (function)
* [simpleFormat simpleFormat()] (function)
* [singularize singularize()] (function)
* [stripLinks stripLinks()] (function)
* [stripTags stripTags()] (function)
* [titleize titleize()] (function)
--->
<cfscript>
var loc = {};
if (Len(arguments.text) > arguments.length)
loc.returnValue = Left(arguments.text, arguments.length-Len(arguments.truncateString)) & arguments.truncateString;
else
loc.returnValue = arguments.text;
</cfscript>
<cfreturn loc.returnValue>
</cffunction>
<Cfquery name="Gets" dataSource="#ds#">
select * from directoryarticles
where id = #url.id#
</cfquery>
<cfif gets.region contains 'Manhattan'>
<Cfset #url.mag# = 'BAP'>
</Cfif>
<cfif gets.region contains 'Manahttan'>
<Cfset #url.mag# = 'BAP'>
</Cfif>
<cfif gets.region eq 'Westchester'>
<Cfset #url.mag# = 'WP'>
</Cfif>
<cfif gets.region contains 'Brooklyn'>
<Cfset #url.mag# = 'BP'>
</Cfif>
<cfif gets.region contains 'Queens'>
<Cfset #url.mag# = 'QP'>
</Cfif>
<cfif gets.region contains 'Rockland'>
<Cfset #url.mag# = 'RP'>
</Cfif>
<cfif gets.region contains 'Fairfield'>
<Cfset #url.mag# = 'FP'>
</Cfif>
<Cfset be = #dateformat(now(),'2025-mm-dd')#>
<cfquery name="getstuff" datasource="#ds#">
select issueguide.writeup,issueguide.id, issueguide.pkid, issueguide.editedby,issueguidecat.issue,issueguidecat.mags,issueguide.offer,issueguide.expirationdate,issueguidecat.issueguideid,ParentsListings.*,ParentsListingsCatMain.shortname as category
from issueguide inner join issueguidecat on issueguidecat.issueguideid = issueguide.id inner join ParentsListings on issueguide.pkid = ParentsListings.id inner join ParentsListingsCatMain on issueguide.catid = ParentsListingsCatMain.id
where
1=1
and ( issueguidecat.issue = '#dateformat(now(),'mmmm yyyy')#'
or issueguide.expirationdate > '#dateformat(now(),'yyyy-mm-dd')#'
or issueguidecat.issue = 'February 018'
)
and issueguide.writeup <> ''
and issueguide.catid in (#url.id#)
<cfif #gets.subcats# eq 1 or #url.id# eq 233 or #url.id# eq 234 or #url.id# eq 232>
group by ParentsListings.name
order by ParentsListings.name
<cfelse>
order by category,ParentsListings.name, issueguide.id desc
</cfif>
<!--- added --->
</cfquery>
<p>
<Cfoutput>
<cfset monthvar = '#dateformat(now(),'MMMM')# #dateformat(now(),'yyyy')#'>
<Cfset newblurb = '#rereplace(gets.blurb,'MONTHNAME','#monthvar#')#'>
#newblurb#
<br>
<br>
<h3 style="font-size:20px;"><B> Check the boxes to connect with these businesses</B></h3>
</Cfoutput>
<Cfoutput query="getstuff">
<cfif #gets.subcats# eq 0>
<Cfif #gets.catid# contains ','>
<Cfif #category# is not #getstuff.category[currentrow-1]#>
<Cfset outputcat = #rereplacenocase(category,'- Print Guide','','ALL')#>
<Cfset outputcat = #rereplacenocase(outputcat,'-Print Guide','','ALL')#>
<Cfset outputcat = #rereplacenocase(outputcat,'EDU - ','','ALL')#>
<Cfset outputcat = #rereplacenocase(outputcat,'- \(hidden\)','','ALL')#>
<Cfset outputcat = #rereplacenocase(outputcat,'Professionals -- ','','ALL')#>
<Cfset outputcat = #rereplacenocase(outputcat,'Professionals---','','ALL')#>
<Cfset outputcat = #rereplacenocase(outputcat,'print guide','','ALL')#>
<Cfset outputcat = #rereplacenocase(outputcat,'Professionals --','','ALL')#>
<Cfset outputcat = #rereplacenocase(outputcat,'\(hidden\)','','ALL')#>
<Cfset outputcat = #rereplacenocase(outputcat,'- PRINT','','ALL')#>
<Cfset outputcat = #rereplacenocase(outputcat,'-','','ALL')#>
<Cfset outputcat = #replace(outputcat,'CAMPS ','','ALL')#>
<cfif #url.id# eq 233 or #url.id# eq 234 or #url.id# eq 232>
<cfelse>
<h2>#outputcat#</h2>
</cfif>
<p>
</Cfif> </Cfif>
</cfif>
<cfif #gets.subcats# eq 1>
<cfif name is not name[currentrow-1]>
<a href="/bestbetsinfo.cfm?id=#pkid#"><cfif #publishedname# eq '' or #publishedname# eq ' ' or len(publishedname) lt 5><b>#ucase(name)#<br /></b><cfelse>
<strong>#replace(publishedname, chr(10), "<br />", "All")#</strong></cfif></a>
<cfif #address# is not ''>#address#, #city#<br /></cfif>
<cfif #phone# is not ''>#phone#<br /></cfif>
<cfif #locationmultiple# is not ''>
<Cfset newlocation = #replace(locationmultiple, "http://gymboreeclasses.com/scarsdaleny.site", "", "All")#>
<Cfset newlocation = #replace(newlocation, "http://bowlluckystrike.com/scarsdaleny.site", "", "All")#>
<Cfset newlocation = #replace(newlocation, "http://bowlluckystrike.com", "", "All")#>
<Cfset newlocation = #replace(newlocation, "http://chelseapiersct.com/camp", "", "All")#>
<Cfset newlocation = #replacenocase(newlocation, "http://chelseapiersct.com/camp", "", "All")#>
<Cfset newlocation = #replacenocase(newlocation, "http://facebook.com/bouncetrampolinesports", "", "All")#>
<Cfset newlocation = #replace(newlocation, "http://skyzone.com/mountsinai", "", "All")#>
<cfset newlocation = #autolink(newlocation)#>
<Cfset newlocation = #replace(newlocation, chr(10), "<br />", "All")#>
<Cfset loopme = #getlinks(newlocation)#>
<Cfset tome = #ArrayLen(loopme)#>
<cfset countlinks = 0>
<cfloop from="1" to="#tome#" index="i">
<Cfset newlocation = rereplacenocase(newlocation,'<a href="#loopme[i].a#">#loopme[i].a#</a>','','ALL')>
</cfloop>
<Cfset newlocation = rereplacenocase(newlocation,'<a href="http://">','<c href="http://"','ALL')>
<cfsavecontent variable="tester">
#paragraphformat(newlocation)#
</cfsavecontent>
<Cfset newlocation = #replace(tester, "<p><p>", "<p>", "All")#>
<Cfset newlocation = #replace(newlocation, "<br/> <br/> <br/>", "<br>", "All")#>
#newlocation#
</C>
<br /></cfif>
<cfif #showemail# eq 0 and #email# is not ''>Email <a href="mailto:#email#">#email#</a><br /></cfif>
<cfif #offer# is not ''>#offer#<br /></cfif>
<p>#writeup#<p>
</cfif>
<Cfelse>
<cfif #category# is not #getstuff.category[currentrow-1]# or name is not name[currentrow-1]>
<a href="/bestbetsinfo.cfm?id=#pkid#"><cfif #publishedname# eq '' or #publishedname# eq ' ' or len(publishedname) lt 5><b>#ucase(name)#<br /></b><cfelse>
<strong>#replace(publishedname, chr(10), "<br />", "All")#</strong></cfif></a>
<cfif #address# is not ''>#address#, #city#<br /></cfif>
<cfif #phone# is not ''>#phone#<br /></cfif>
<cfif #locationmultiple# is not ''>
<Cfset newlocation = #replace(locationmultiple, "http://gymboreeclasses.com/scarsdaleny.site", "", "All")#>
<Cfset newlocation = #replace(newlocation, "http://bowlluckystrike.com/scarsdaleny.site", "", "All")#>
<Cfset newlocation = #replace(newlocation, "http://bowlluckystrike.com", "", "All")#>
<Cfset newlocation = #replace(newlocation, "http://chelseapiersct.com/camp", "", "All")#>
<Cfset newlocation = #replacenocase(newlocation, "http://chelseapiersct.com/camp", "", "All")#>
<Cfset newlocation = #replacenocase(newlocation, "http://facebook.com/bouncetrampolinesports", "", "All")#>
<Cfset newlocation = #replace(newlocation, "http://skyzone.com/mountsinai", "", "All")#>
<cfset newlocation = #autolink(newlocation)#>
<Cfset newlocation = #replace(newlocation, chr(10), "<br />", "All")#>
<Cfset loopme = #getlinks(newlocation)#>
<Cfset tome = #ArrayLen(loopme)#>
<cfset countlinks = 0>
<cfloop from="1" to="#tome#" index="i">
<Cfset newlocation = rereplacenocase(newlocation,'<a href="#loopme[i].a#">#loopme[i].a#</a>','','ALL')>
</cfloop>
<Cfset newlocation = rereplacenocase(newlocation,'<a href="http://">','<c href="http://"','ALL')>
<cfsavecontent variable="tester">
#paragraphformat(newlocation)#
</cfsavecontent>
<Cfset newlocation = #replace(tester, "<p><p>", "<p>", "All")#>
<Cfset newlocation = #replace(newlocation, "<br/> <br/> <br/>", "<br>", "All")#>
#newlocation#
</C>
<br /></cfif>
<cfif #showemail# eq 0 and #email# is not ''>Email <a href="mailto:#email#">#email#</a><br /></cfif>
<cfif #offer# is not ''>#offer#<br /></cfif>
<p>#writeup#<p>
</cfif>
</cfif>
</Cfoutput>
<cfoutput><br>
#gets.bottomtext#
</cfoutput>
<!--- <Cfif #gets.region# eq 'Westchester' and parameterexists(url.issue) and (#url.issue# eq 'March 2016' or #url.issue# eq 'February 2016')>
<b>
<cfif #url.id# eq 39>
<b>RELATED:</b><br>
<a href="http://www.nymetroparents.com/westchester/article/Westchester-County-Camp-and-Summer-Program-Guide-Section-2Specialty-Camps">Find Specialty Camps in Westchester</a><br>
<a href="http://www.nymetroparents.com/westchester/article/Westchester-County-Camp-and-Summer-Program-Guide-Section-3Sleepaway-Camps-and-Camper-Outings">Find Sleepaway Camps, Outings, and Services for Campers in Westchester</a><br>
</cfif>
<cfif #url.id# eq 40>
<b>RELATED:</b><br>
<a href="http://www.nymetroparents.com/westchester/article/Westchester-County-Camp-and-Summer-Program-Guide-Section-1Day-Camps#.VOen1I2gc-M">Find Day Camps in Westchester</a><br>
<a href="http://www.nymetroparents.com/westchester/article/Westchester-County-Camp-and-Summer-Program-Guide-Section-3Sleepaway-Camps-and-Camper-Outings">Find Sleepaway Camps, Outings, and Services for Campers in Westchester</a><br>
</cfif>
<cfif #url.id# eq 41>
<b>RELATED:</b><br>
<a href="http://www.nymetroparents.com/westchester/article/Westchester-County-Camp-and-Summer-Program-Guide-Section-1Day-Camps#.VOen1I2gc-M">Find Day Camps in Westchester</a><br>
<a href="http://www.nymetroparents.com/westchester/article/Westchester-County-Camp-and-Summer-Program-Guide-Section-2Specialty-Camps">Find Specialty Camps in Westchester</a><br></b>
</cfif>
</Cfif>
--->
<cffunction name="getLinks" access="public" returntype="array" output="yes" hint="seperate Links from given HTML string, output as a array">
<cfargument name="html" hint="HTML String with links" required="yes">
<cfset local.startpos = 1>
<cfset local.list = ArrayNew(1)>
<cfloop condition="local.startpos GREATER THAN 0">
<cfset local.linkpos = reFindNoCase('<a\b[^>]*>(.*?)</a>',arguments.html,local.startpos,'true')>
<cfif val(local.linkpos.len[1])>
<cfset local.startpos = local.linkpos.len[1]+local.linkpos.pos[1]>
<cfset local.string = mid(arguments.html,local.linkpos.pos[1],local.linkpos.len[1])>
<cfset local.hrefpos = reFindNoCase('(http|ftp|https):\/\/[\w\-_]+(\.[\w\-_]+)+([\w\-\.,@?^=%&:/~\+##]*[\w\-\@?^=%&/~\+##])?',local.string,1,'true')>
<cfif val(local.hrefpos.pos[1])>
<cfset local.this.a = mid(local.string,local.hrefpos.pos[1],local.hrefpos.len[1])>
<cfset local.this.title = reReplacenocase(local.string,'<a\b[^>]*.>',"")>
<cfset local.this.title = reReplacenocase(local.this.title,'</a*>',"")>
<cfset ArrayAppend(local.list,local.this)>
<cfset StructDelete(local,'this')>
</cfif>
<cfelse>
<cfbreak>
</cfif>
</cfloop>
<cfreturn local.list>
</cffunction>
</cfif>
<cfinclude template="footer.cfm">