TextLinkAds | The Leader in Text Link Search Engine Optimization

Cold Fusion Installation Instructions

Signup and Site Submission Required to fully install plugin.

This code is compatible with Cold Fusion 8 and higher. You must create a blank file named 'local_56409.json' in the same directory as this script. It MUST be writable by the web server. On unix you would CHMOD 666 the file. On Windows you will need to access your custom control panel to set the permissions or contact your hosting company.

Package Info

Other code is available thanks to Joshua Cyr

Version 2.0.1

Ad Code

<CFSET local_file_name = 'local_56409.json'>
<CFSET inventory_key = 'XXXXXXJOINtextlinkadsFORKEYXXXXXX'>
<CFSET local_directory = Getdirectoryfrompath(GetBasetemplatepath())>
<CFSET local_filename = local_directory & local_file_name>


<CFIF not fileExists(local_filename)>
    <CFFILE action="write" file="#local_filename#" output="" mode="666">
    <CFIF not fileExists(local_filename)>
        <CFTHROW message="Script Error: Unable to find local xml file, #local_filename#">
    </CFIF>
</CFIF>

<CFFILE action="read" file="#local_filename#" variable="localdoc">

<CFDIRECTORY action="list" directory="#local_directory#" filter="#local_file_name#" name="LocalFileDetails">

<CFIF (LEN(localdoc) LTE 3) OR (DateCompare(LocalFileDetails.dateLastModified, DateAdd("h", -1, Now())) EQ -1)>
    <CFHTTP url="http://www.text-link-ads.com/xml.php?k=#inventory_key#&l=coldfusion-tla-2.0.1&f=json" method="GET" timeout="10"></CFHTTP>
    <CFSET remotedoc = cfhttp.FileContent>
    <CFIF LEN(remotedoc) LTE 3>
        <CFSET remotedoc = localdoc>
    </CFIF>
    <CFFILE action="write" file="#local_filename#" output="#remotedoc#">
    <CFSET localdoc = remotedoc>
</CFIF>

<CFIF IsJSON(localdoc)>
    <CFSET links = DeserializeJSON(localdoc)>
    <CFSET numItems = ArrayLen(links)>
    <CFIF numItems GTE 1>
        <ul>
        <CFLOOP index="i" from="1" to="#numItems#">
            <CFSET beforeText = links[i]['BeforeText']>
            <CFSET afterText = links[i]['AfterText']>
            <CFIF len(beforeText) GT 0>
                <CFSET beforeText = "#beforeText# ">
            </CFIF>
            <CFIF len(afterText) GT 0>
                <CFSET afterText = " #afterText#">
            </CFIF>
            <CFOUTPUT><li>#beforeText#<a href="#links[i]['URL']#">#links[i]['Text']#</a>#afterText#</li></CFOUTPUT>
        </CFLOOP>
        </ul>
    </CFIF>
</CFIF>