Thanks. You're not using the FailTo attribute -- do you handle those types of failures in ReportPostStatus.cfm?
Tac ----- Original Message ----- From: "Robert Forsyth" <[EMAIL PROTECTED]> To: "inFusion Support List" <[EMAIL PROTECTED]> Sent: Thursday, May 09, 2002 6:35 PM Subject: RE: [iMS] Example script for making sure bad mail bounces back > Here is my complete tag call and code in the RCPT template and it seems to > be working: > > <cfx_iMSMail priority="0" kickpost="yes" > Query="getenews" > Queryfield="email" > QToken_CID="xidnum" > QToken_email_id="email" > QToken_TheStation="tstat" > QToken_MStation="mstat" > parsetokens="yes" > SMTPFROM="accbounces-<:CID:>@dcfind.com" > header_to="<:email_id:>" > header_from="#caller# Weather <webteam@#trim(get1.station)#.com>" > header_Precedence="bulk" > header_Received="from mail.dcfind.com [216.230.250.26] by > dcfindmail.soloserver" > header_reply="webteam@#trim(get1.station)#.com" > header_subject="#caller# eForecast for #dateformat(now(),"mm/dd/yy")#" > log="yes" > token_addheader_Return_path="accbounces-<:CID:>@dcfind.com" > body="#get1.text# > > ****************************************** > #trim(get1.adline)# > ****************************************** > > You are receiving this email because you have signed up for the > #caller# eForecast email list. > > ============================================================ > To be removed from future mailings, please unsubscribe at > http://www.<:MStation:>.com/usub.hrb?a=efore&b=<:cid:>&e=<:email_id:> > ============================================================ > eforecast sent #dateformat(now(),"mm/dd/yy")# at > #lcase(timeformat(now(),"h:mm tt"))#" > > > > > and the call in the RCPT template: > > <cfif findnocase("accbounces-",smtpname) neq 0> > <cftry> > <cfset bid="#mid(smtpname,find("-",smtpname)+1,20)#"> > <cfoutput> <inlog text="BAD BOUNCE [#smtpname# - #bid#]"></cfoutput> > <cfquery name="get1" datasource="XXXXXXXX" dbtype="ODBC">select TOP 1 > station,bouncecount,idnum,email from theusers where > idnum='#bid#'</cfquery> > <cfif get1.recordcount gt 0> > <cfif get1.bouncecount gt 9> > <cfquery name="writeuser" datasource="XXXXXXX" dbtype="ODBC">update > theusers set > > EFORECASTAM=0,EFORECASTPM=0,EFORECASTWKD=0,WXSEVERE=0,TROPICAL=0,consumer=0, > sports= 0,weather=0,enews=0, > > iteam=0,breaking=0,medical=0,programming=0,technology=0,newslink=0,bouncecou > nt=0 where idnum='#get1.idnum#' > </cfquery> > <cfset themsg="removed '" & "#trim(get1.email)#" & "' from " & > "#trim(get1.station)#"> > <cfx_iMSMail smtpto="[EMAIL PROTECTED]" smtpfrom="[EMAIL PROTECTED]" > header_to="[EMAIL PROTECTED]" header_from="[EMAIL PROTECTED]" > header_subject="Bounce Count Exceeded" body="#themsg#"> > <cfelse> > <cfquery name="up1" datasource="XXXXXXX" dbtype="ODBC">update theusers set > bouncecount = #get1.bouncecount# + 1</cfquery> > </cfif> > </cfif> > <cfcatch type="any"></cfcatch> > </cftry> > </cfif> > > hope this helps > ==^======================================================= This list server is Powered by iMS "The Swiss Army Knife of Mail Servers" -------------------------------------- To leave this list please complete the form at http://www.coolfusion.com/iMSSupport.cfm Need an iMS Developer license? Sign up for a free license here: http://www.coolfusion.com/iMSDevelopers.cfm List archives: http://www.mail-archive.com/infusion-email%40eoscape.com/ Note: You are subscribed as [email protected] ==^=======================================================
