% club=request.querystring("club") offer=request.querystring("offer") fn=request.querystring("fn") sn=request.querystring("sn") am=request.querystring("am") dd=request.querystring("dd") mm=request.querystring("mm") yy=request.querystring("yy") sal=request.querystring("sal") pci=request.querystring("pci") pco=request.querystring("pco") tc=request.querystring("tc") ea=request.querystring("ea") gscase=request.querystring("gscase") benefits=request.querystring("benefits") campaign=request.querystring("campaign") campaign_id=request.querystring("campaign_id") am=request.form("e_mail") if club=2 then clubcss="gardeners" end if if club=3 then clubcss="homeowners" end if if club=7 then clubcss="travellers" end if sql="" sql=sql &"select * from tblRegClub" & " " sql=sql &"inner join tblRegBenefits on RegBenefitsClub = RegClubID" & " " sql=sql &"where RegClubID="& club&"" & " " set rs = adodbConn.Execute(sql) while not rs.EOF rs_RegClubName=rs("RegClubName") rs_RegClubBanner=rs("RegClubBanner") rs_RegClubUpperText=rs("RegClubUpperText") rs_RegClubTakenText=rs("RegClubTakenText") rs_RegClubLowerText=rs("RegClubLowerText") rs_RegClubCSSPath=rs("RegClubCSSPath") rs_RegClubNarrowCSSPath=rs("RegClubNarrowCSSPath") rs_RegBenefitsPostItPath=rs("RegBenefitsPostItPath") %> <% border=0 strReg08="" strReg08=strReg08 & "" strReg08=strReg08 & "
" strReg08=strReg08 & ""
cellString=cellString&"
| "
if not i mod 2=0 then
strReg08=strReg08&""&cellString&""
else
strReg08=strReg08&""&cellString&""
strReg08=strReg08&"