<!---Added to prevent an error if check box is empty--->
<cfparam name="cat_id" type="numeric" default="21">
<!---<cfparam name="FORM.allst" default="no">
--->
<cfparam name="FORM.allst" default="">
<cfparam name="FORM.all" default="no">
<cfparam name="FORM.toAddress" default="">
<cfparam name="FORM.subject" default="Request A Quote For Mailing List">
<cfparam name="FORM.messageBody" default="">
 
<!---Get all US states that are active--->
<cfquery name="allStates" datasource="#request.dsn#" username="#request.un#" password="#request.pw#">
SELECT	statename
FROM	states
WHERE	IsActive = 1
		AND CountryID = 1
</cfquery>
    <div class='featurebox_left'>
 
<!---Added captcha test here--->
 
<cffunction name="makeRandomString" returnType="string" output="false">
   <cfset var chars = "23456789ABCDEFHJKMNPRS">
   <cfset var length = randRange(2,4)>
   <cfset var result = "">
   <cfset var i = "">
   <cfset var char = "">
 
   <cfscript>
   for(i=1; i <= length; i++) {
      char = mid(chars, randRange(1, len(chars)),1);
      result&=char;
   }
   </cfscript>
 
   <cfreturn result>
</cffunction>
 
<cfset showForm = true>
 
<cfparam name="form.captcha" default="">
<cfparam name="form.captchaHash" default="">
 
<cfif isDefined("form.send")>
   <cfset errors = "">
 
   <cfif hash(ucase(form.captcha)) neq form.captchaHash>
      <cfset errors = errors & "You Did Not Enter The Right Text Below.">
   </cfif>
 
   <cfif errors is "">
      <!--- do something here --->
      <cfset showForm = false>
   </cfif>
 
</cfif>
 
<cfif showForm>
 
   <cfset captcha = makeRandomString()>
   <cfset captchaHash = hash(captcha)>
   <cfoutput>
<!---End captcha test--->
 <!--- Provide simple form for recipient and message --->
 
 <cfform action="#cgi.script_name#" method="post">
 
 <table width="100%"  border="0" align="center" cellpadding="2"cellspacing="2">
 <!--- Table row: Input for Email Address --->
 <tr>
 <td>&nbsp;</td>
 <td>
<!--- Display Error Message--->
    <cfif isDefined("errors")>
   <img src="graphics/warning.png" hspace="5" vspace="5" align="absmiddle" /><strong>#errors#</strong>
   </cfif></td>
 </tr>
 <tr>
 <th valign="top">Email:</th>
 <td>
     <cfinput type="text"
     name="toAddress"
     value="#FORM.toAddress#"
     message="You must provide an email address (example@gmail.com)"
     validateat="onSubmit,onServer"
     validate="email"
     required="yes"
     size="50"> </td>
 </tr>
 
 <!--- Table row: Input for E-mail Subject --->
 <tr>
 <th valign="top">Subject:</th>
 <td>
     <cfinput type="text"
     name="subject"
     value="#FORM.subject#"
     required="yes"
     size="50" maxlength="100"
     message="You must provide a subject for the email. (Maximum 100 characters)"> </td>
 </tr>
 
 <!--- Table row: Input for actual Message Text --->
 <tr>
 <th valign="top">Your Message:</th>
 <td>
     <cftextarea name="messageBody"
     cols="50"
     rows="5"
     wrap="hard"
     required="yes"
     value="#form.messageBody#"
     maxlength="1000"
     message="You must provide a message body. (Maximum 1000 characters)" /> </td>
 </tr>
    <!---Table row: check box for all states --->
 <tr>
 <td><!---Howdy #session.name#---></td>
 <td valign="top">
 
<!---<cfinput type="checkbox" name="all" checked="no"> All 50 States--->
<cfinput type="checkbox"
name="all"
checked="#form.all#" value="yes"> All 50 States
</td>
 </tr>
<tr>
  <td>&nbsp;</td>
  <td>
 <cfloop query="allstates">
 <input type="checkbox"
 name="allst" checked="<cfif
listFind(form.allst,allstates.statename)>no<cfelse>yes</cfif>"
 value="#allstates.statename#"> #allstates.statename#<br />
 </cfloop>
  </td>
</tr>
  <!--- Table row: Input for captcha text --->
<tr>
  <td valign="top">&nbsp;</td>
  <td>Enter Text Below:&nbsp;
      <cfinput type="text"
      name="captcha"
      required="yes"
      size="10"
      message="Please type the letters and numbers below.">
      </td>
</tr>
 <!--- Table row: Display Captcha Image --->
<tr>
<td>&nbsp;</td>
     <td>
     <cfimage action="captcha" width="300" height="75" text="#captcha#">
     <cfinput type="hidden"
     name="captchaHash"
     value="#captchaHash#">     </td>
 
</tr>
 <!--- Table row: Submit button to send message --->
 <tr>
 <td valign="top">&nbsp;</td>
 <td>
     <cfinput type="submit"
     name="send"
     validate="submitonce"
     value="Send Message Now"> </td>
 </tr>
 <tr>
   <td colspan="2" valign="top">&nbsp;</td>
   </tr>
 </table>
 </cfform>
    </cfoutput>
 
<cfelse>
<!---Go to here if captcha is correct--->
 
  <!--- We do not want ColdFusion to suppress whitespace here --->
  <cfprocessingdirective suppressWhitespace="No">
 
<!--- Send the mail message, based on form input --->
<cfmail
 subject="#FORM.subject#" type="html"
 from='#FORM.toAddress#'
 to="webmaster@firefightingnews.com"
 bcc="mcconaghey@vzw.blackberry.net"
  replyto="#FORM.toAddress#"
>
<b>This is a message from request a quote from our fire department mailing list page on FireFightingNews.com:</b>
<p></p>
#FORM.messageBody#
<p></p>
<cfif #FORM.all# EQ "no">
Not all 50 states
<cfelse>
All 50 States
</cfif>
<p></p>
#FORM.allst#
<br />
</cfmail>
 
  </cfprocessingdirective>
 
 <!--- Display "success" message to user --->
<cfinclude template="email_ok.cfm">
 
</cfif>
</div>