of page Dim gs_processPage ' path for login processing Dim i ' misc. iteration/count variable Dim go_rsCountries 'SMP 1-26-02 recordset to hold list of countries for pull down menu ' Input validation constants Dim gb_errFlag Dim gs_errMsg ' input fields... Dim gi_candidateLevel Dim gs_firstName Dim gs_lastName Dim gs_country Dim gs_workPhone Dim gs_email Dim gi_examYear Dim gs_registered Dim gi_comments Dim gi_surveyresults Dim gs_format Dim gs_radiochoice Dim gs_textchoice Dim gs_selectchoice Dim gs_checkchoice ' Date check Dim gdt_nowDate Dim gdt_nowTime Dim gdt_beginTime Dim gdt_endTime function EmailSurveyData ( gi_candidateLevel, gs_format, gs_email ) dim strSubject dim strMessage dim objMail strSubject = "Trial wCC page1" strMessage = "Trial wCC page 1 request received on " & date() & Chr(10) & Chr(10) & _ "Contact info..." & Chr(10) & Chr(10) & _ "candidate level: " & gi_candidateLevel & Chr(10) & _ "format: " & gs_format &Chr(10) &_ "email: " & gs_email & Chr(10) & Chr(10) ' send backup Set objMail = CreateObject("CDONTS.Newmail") objMail.MailFormat = 0 ' prevent unnecessary line breaks by sending object in MIME format objMail.Send gs_email, consts_EMAIL_FORM_RECEIVER, strSubject & " - backup", strMessage Set objMail = Nothing end function function EmailXMLData (gi_comments, ls_spResults, gs_firstName, gs_lastName, gi_candidateLevel, gi_examYear, gs_country, gs_workPhone, gs_email) dim strSubject dim strMessage dim objMail gi_comments = gi_comments & Chr(10) & ls_spResults strSubject = "Trial Sans Card - XML" strMessage = "<?xml version=""1.0""?>" & Chr(10) & _ "<trial_sans_card_request>" & Chr(10) & _ " <contact_info>" & Chr(10) & _ " <level>" & gi_candidateLevel & "</level>" & Chr(10) & _ " <first_name><![CDATA[" & gs_firstName & "]]></first_name>" & Chr(10) & _ " <last_name><![CDATA[" & gs_lastName & "]]></last_name>" & Chr(10) & _ " <country><![CDATA[" &gs_country & "]]></country>" & Chr(10) & _ " <email><![CDATA[" & gs_email & "]]></email>" & Chr(10) & _ " <exam_year><![CDATA[" & gi_examYear & "]]></exam_year>" & Chr(10) & _ " <comments><![CDATA[" & gi_comments & "]]></comments>" & Chr(10) & _ " <submit_date><![CDATA[" & now & "]]></submit_date>" & Chr(10) & _ " </contact_info>" & Chr(10) & _ "</trial_sans_card_request>" Set objMail = CreateObject("CDONTS.Newmail") objMail.MailFormat = 0 ' prevent unnecessary line breaks by sending object in MIME format objMail.Send gs_email, consts_EMAIL_FORM_RECEIVER, strSubject, strMessage Set objMail = Nothing end function function EmailCustComf (gs_email, gs_firstName) 'CBR 8/26/04 the above code is not working, but Larry has a different email he wants sent 'sendEmail gs_email, consts_EMAIL_NAME_TIPS_NEWS,"NONE", constas_EMAIL_TAGS_TIPS_NEWS,"DEFAULT" 'sendEmail gs_email, "trial sans cart","NONE", constas_EMAIL_TAGS_TIPS_NEWS,"DEFAULT" sendEmail gs_email, "trial sans cart", gs_firstName, "(^name^)" ,"DEFAULT" end function ' ************************************** ' Initialize page-scoped variables ' ************************************** gs_PageTitle = "CFA Exam Prep - Free Offer" gb_errFlag = false gs_errMsg = "Please fix the following errors:" ' AG 22-JUL-2002: Redirect depending on time ' study_plan.asp should run weekdays from 8:30 am to 5:30 pm. ' study_plan1.asp should run weekdays from 5:30 pm to 8:30 am, and from 5:30 ' pm Friday through 8:30 am Monday. gdt_nowDate = Date gdt_nowTime = Time gdt_beginTime = TimeValue("8:30:00 AM") gdt_endTime= TimeValue("5:30:00 PM") dim boLarryWantsItOn boLarryWantsItOn = "False" if (Request.QueryString("next") = "") and (boLarryWantsItOn = "True") then if Weekday(gdt_nowDate, vbSunday) = 1 OR Weekday(gdt_nowDate, vbSunday) = 7 then response.redirect "study_plan1.asp?" & request.querystring end if if gdt_nowTime < gdt_beginTime OR gdt_nowTime > gdt_endTime then response.redirect "study_plan1.asp?" & request.querystring end if end if if Request.QueryString("drpCandidateLevel") = "" then if session("candidate_level") = "" then gi_candidateLevel = 0 else gi_candidateLevel = session("candidate_level") end if else gi_candidateLevel = Request.QueryString("drpCandidateLevel") session("candidate_level") = Request.QueryString("drpCandidateLevel") end if if Request.QueryString("format-ps") = "" then gs_format = "" else gs_format = Request.QueryString("format-ps") end if if Request.QueryString("radiochoice") = "" then gs_radiochoice = "" else gs_radiochoice = Request.QueryString("radiochoice") end if if Request.QueryString("textchoice") = "" then gs_radiochoice = "" else gs_radiochoice = Request.QueryString("textchoice") end if if Request.QueryString("selectchoice") = "" then gs_radiochoice = "" else gs_radiochoice = Request.QueryString("selectchoice") end if if Request.QueryString("checkchoice") = "" then gs_radiochoice = "" else gs_radiochoice = Request.QueryString("checkchoice") end if if Request.QueryString("country") = "" then gs_country = "USA" ' default else gs_country = Request.QueryString("country") end if 'gs_firstName = Request.QueryString("first_name") 'gs_lastName = Request.QueryString("last_name") 'gs_workPhone = Request.QueryString("work_phone") gs_email = Request.QueryString("email") 'gi_examYear = Request.QueryString("exam_year") 'gi_examYear = 2005 'gs_registered = Request.QueryString("enrolled") 'gi_comments = "" 'gi_surveyresults = "" 'SMP 1-26-02 get list of countries for pull down menu (pull from db) 'set go_rsCountries = getCountries 'get list of countries from db ' ************************************** ' Input Validation ' ************************************** if Request.QueryString("next") = "Continue to Shipping" then ' ************************************** ' Input validation ' ************************************** if Request.QueryString("drpCandidateLevel") = "" then gs_errMsg = gs_errMsg & consts_ERROR_EMPTY_PREFIX & consts_CANDIDATE_LEVEL_LABEL gi_candidateLevel = Request.QueryString("drpCandidateLevel") gb_errFlag = true end if 'if gs_firstName = "" then ' gs_errMsg = gs_errMsg & consts_ERROR_EMPTY_PREFIX & consts_FIRST_NAME_LABEL ' gb_errFlag = true 'end if 'if gs_lastName = "" then ' gs_errMsg = gs_errMsg & consts_ERROR_EMPTY_PREFIX & consts_LAST_NAME_LABEL ' gb_errFlag = true 'end if 'if gs_country = "" then ' gs_errMsg = gs_errMsg & consts_ERROR_EMPTY_PREFIX & consts_COUNTRY_LABEL ' gb_errFlag = true 'end if if gs_format = "" then gs_errMsg = gs_errMsg & consts_ERROR_EMPTY_PREFIX & consts_FORMAT_LABEL gb_errFlag = true end if if gs_email = "" then gs_errMsg = gs_errMsg & consts_ERROR_EMPTY_PREFIX & consts_EMAIL_LABEL gb_errFlag = true else if isValidEmail(gs_email) = consti_FALSE then gs_errMsg = gs_errMsg & consts_ERROR_INVALID_PREFIX & consts_EMAIL_LABEL gb_errFlag = true end if end if if not gb_errFlag then dim RedirectTarget RedirectTarget = "https://www.allenresources.com/o/trial-2.asp" 'CBR 8/25/04 Restoryboarding the study plan pages 'Much of this code used to be in study_plan_confirm if isNotInEmailList(gs_email) = consti_TRUE then addToMailingList gs_email end if ' ************************************** ' Send notice w/ survey data to sales dpt. ' ************************************** 'EmailSurveyData gi_candidateLevel, gs_format, gs_email ' ************************************** ' Compose and send XML contact info email to generic address ' ************************************** 'EmailXMLData gi_comments, gi_surveyresults, gs_firstName, gs_lastName, gi_candidateLevel, gi_examYear, gs_country, gs_workPhone, gs_email ' ************************************** ' Send confirmation to customer ' ************************************** 'EmailCustComf gs_email, gs_firstName 'CBR 8/24/04 added contact loging so we can send Lighthouse sales info 'logContact gs_firstName, gs_lastName, gs_workPhone, gs_country, gi_candidateLevel, gs_registered 'redirect to confirmation page response.redirect RedirectTarget & "?" & request.querystring 'response.write "Redirecting to... " & RedirectTarget & "?" & request.querystring & "" end if end if %>  <script language="JavaScript">  </script> <style type="text/css">  </style> <table width="100%" bgcolor="#FFFFFF" class="text" valign="top"> <tr > <td colspan="2">  </td> </tr> <tr> <td colspan="2">   </td> </tr> <tr> <td valign="top" width="70%" bordercolor="#CCCCCC">  <% if gb_errFlag then response.write "" & gs_errMsg & "" end if %>  <form method="get" action="trial.asp" onSubmit="return study_plan_Validator(this)" target="_self" name="study_plan"> <table width="639" border="0" cellpadding="3" class="text"> <tr valign="top"> <td width="629"> <div align="left"> <table width="100%" height="82" border="0" cellpadding="3" cellspacing="0" class="text"> <tr class="style8"> <td colspan="3" align="right"> Try Allen for FREE...Offer ends Friday! To receive your free trial, complete the simple sign-up process. </td> <td width="173" rowspan="5" align="right" valign="top">Your email address is safe. We will not disclose your email address to third parties. Questions? Call 1-401-667-0487 M-F 9am-5pm EST <img src="../images/free7.gif" alt="CFA Exam Prep" width="101" height="25" align="top"></td> </tr> <tr class="style8"> <td width="130" align="right" valign="middle"> Your CFA Exam Level</td> <td width="146" align="left"> <input type="radio" name="drpCandidateLevel" value="1-June" <% if gi_candidatelevel = 1 then response.write " checked" %> /> I - June 2006 <input type="radio" name="drpCandidateLevel" value="2" <% if gi_candidatelevel = 2 then response.write " checked" %> /> II - June 2006 <input type="radio" name="drpCandidateLevel" value="3" <% if gi_candidatelevel = 3 then response.write " checked" %> /> III - June 2006 </td> <td width="148" align="left"> </td> </tr> <tr class="style8"> <td align="right" valign="bottom"><div align="right" class="style15"> <div align="right" style="font-family: Arial, Helvetica, sans-serif">Email Address </div> </div></td> <td colspan="2"> <input type="text" size="30" name="email" max="20" <% if gs_email <> "" then response.write " value = '" & gs_email & "' " %> /> </td> </tr> <tr class="style8"> <td width="130" align="right" valign="middle"> <div align="right" class="style15"> <div align="right" style="font-family: Arial, Helvetica, sans-serif">Choose Your System from the options numbered below.</div> </div> </td> <td colspan="2"> <input type="radio" name="format-ps" value="1&2" <% if gs_format = "DVD" then response.write " checked" %> > 1 & 2 - $495 <input type="radio" name="format-ps" value="1&4-DVD" <% if gs_format = "CD-ROM" then response.write " checked" %> > 1 & 4 - DVD video format - $550 <input type="radio" name="format-ps" value="1&4-CD" <% if gs_format = "DVD" then response.write " checked" %> > 1 & 4 - CD-ROM video format - $550 <input type="radio" name="format-ps" value="Kahuna-DVD" <% if gs_format = "CD-ROM" then response.write " checked" %> > The Big Kahuna, (1 - 6, DVD format) - $695 <input type="radio" name="format-ps" value="Kahuna-CDROM" <% if gs_format = "CD-ROM" then response.write " checked" %> > The Big Kahuna, (1 - 6, CD-ROM format) - $695 <input type="radio" name="format-ps" value="Friend-DVD" <% if gs_format = "CD-ROM" then response.write " checked" %> > You & A Friend, (Two sets of 1 - 6, DVD format) - $995 <input type="radio" name="format-ps" value="Friend-CDROM" <% if gs_format = "CD-ROM" then response.write " checked" %> > You & A Friend, (Two sets of 1 - 6 CD-ROM format) - $995</td> </tr>     </table> Free Trial Options: (click on any of the links below for product information) <ol class="style8"> <li> The CD version of <a href="javascript:popUpWin('popups/tb.asp', 600, 600);">TestBank Software</a> (over 7,443, 4,218, or 3,000 CFA exam questions for Levels I, II, and III, respectively).</li> <li class="style10"> The complete, final version of the <a href="javascript:popUpWin('popups/rh.asp', 600, 600);">Written Reading Highlights</a> (1,194, 1,156, or 978 pages for Levels I, II, and III respectively). Delivered to you in PDF format, giving you access to every page. </li> <li class="style10"> The complete, final version of the <a href="javascript:popUpWin('popups/fqm.asp', 600, 600);">LOS Flash QuizMaster</a> (720, 718, or 644 pages for Levels I, II, and III respectively). Delivered to you in PDF format, giving you access to every page. </li> <li class="style10"> The complete <a href="javascript:popUpWin('popups/videos.asp', 600, 600);">Core Blue Chip Video Seminar Series</a> (46, 45, or 25 hours for Levels I, II, and III respectively). Delivered in DVD or CD-ROM format. </li> <li class="style10"> The complete <a href="javascript:popUpWin('popups/audio.asp', 600, 600);">Core Audio Seminar Series</a> online (27, 22, or 24 hours for Levels I, II, and III respectively). Upon purchase, you may download the mp3 files and burn them to CDs. </li> <li class="style10"> The complete <a href="javascript:popUpWin('popups/problem_videos.asp', 600, 600);">Problem Solving Video Seminar Series</a> (21 hours. Level I only. Problem Solving is included in Core Blue Chip Videos for Levels II and III). Delivered in DVD or CD-ROM format. </li> </ol> <input type="submit" value="Continue to Shipping" name="next"> <img src="../images/free7.gif" alt="CFA Exam Prep" width="101" height="25" align="top"></div> </td> </tr> </table> </form>  </td> </tr> </table> <!-- #include file="includes\global_linkless_footer2

<%@ Language=VBScript %> <% Option Explicit 'Redirecting all trials to the new trial page. The rest of this page is not used anymore 'response.redirect "https://www.allenresources.com/trials/insidertbo/trialg1.php" response.redirect "waiver.php" ' ************************************** ' Name: Study Plan Request ' File Name: study_plan.asp ' Description: allows users to request study plan ' Author: Andrew Gauvin (andrew_gauvin@yahoo.com) ' Date Created: December 16, 2001 by Andrew Gauvin ' Last Modified: January 26, 2002 by Simone Pia (simonepia@earthlink.net) ' Modifications: ' -1-26-02 SMP: modified country pull down to grab list of countries from database ' -1-26-02 SMP: included global_content_lib.asp ' Table Dependencies: ' - country_lookup_tbl 'SMP 1-26-02 ' TODOs: ' ************************************** ' ************************************** ' Include lib files ' ************************************** %> <% ' ************************************** ' Declare page-scoped variables ' ************************************** Dim gs_PageTitle ' of page Dim gs_processPage ' path for login processing Dim i ' misc. iteration/count variable Dim go_rsCountries 'SMP 1-26-02 recordset to hold list of countries for pull down menu ' Input validation constants Dim gb_errFlag Dim gs_errMsg ' input fields... Dim gi_candidateLevel Dim gs_firstName Dim gs_lastName Dim gs_country Dim gs_workPhone Dim gs_email Dim gi_examYear Dim gs_registered Dim gi_comments Dim gi_surveyresults Dim gs_format Dim gs_radiochoice Dim gs_textchoice Dim gs_selectchoice Dim gs_checkchoice ' Date check Dim gdt_nowDate Dim gdt_nowTime Dim gdt_beginTime Dim gdt_endTime function EmailSurveyData ( gi_candidateLevel, gs_format, gs_email ) dim strSubject dim strMessage dim objMail strSubject = "Trial wCC page1" strMessage = "Trial wCC page 1 request received on " & date() & Chr(10) & Chr(10) & _ "Contact info..." & Chr(10) & Chr(10) & _ "candidate level: " & gi_candidateLevel & Chr(10) & _ "format: " & gs_format &Chr(10) &_ "email: " & gs_email & Chr(10) & Chr(10) ' send backup Set objMail = CreateObject("CDONTS.Newmail") objMail.MailFormat = 0 ' prevent unnecessary line breaks by sending object in MIME format objMail.Send gs_email, consts_EMAIL_FORM_RECEIVER, strSubject & " - backup", strMessage Set objMail = Nothing end function function EmailXMLData (gi_comments, ls_spResults, gs_firstName, gs_lastName, gi_candidateLevel, gi_examYear, gs_country, gs_workPhone, gs_email) dim strSubject dim strMessage dim objMail gi_comments = gi_comments & Chr(10) & ls_spResults strSubject = "Trial Sans Card - XML" strMessage = "<?xml version=""1.0""?>" & Chr(10) & _ "<trial_sans_card_request>" & Chr(10) & _ " <contact_info>" & Chr(10) & _ " <level>" & gi_candidateLevel & "</level>" & Chr(10) & _ " <first_name><![CDATA[" & gs_firstName & "]]></first_name>" & Chr(10) & _ " <last_name><![CDATA[" & gs_lastName & "]]></last_name>" & Chr(10) & _ " <country><![CDATA[" &gs_country & "]]></country>" & Chr(10) & _ " <email><![CDATA[" & gs_email & "]]></email>" & Chr(10) & _ " <exam_year><![CDATA[" & gi_examYear & "]]></exam_year>" & Chr(10) & _ " <comments><![CDATA[" & gi_comments & "]]></comments>" & Chr(10) & _ " <submit_date><![CDATA[" & now & "]]></submit_date>" & Chr(10) & _ " </contact_info>" & Chr(10) & _ "</trial_sans_card_request>" Set objMail = CreateObject("CDONTS.Newmail") objMail.MailFormat = 0 ' prevent unnecessary line breaks by sending object in MIME format objMail.Send gs_email, consts_EMAIL_FORM_RECEIVER, strSubject, strMessage Set objMail = Nothing end function function EmailCustComf (gs_email, gs_firstName) 'CBR 8/26/04 the above code is not working, but Larry has a different email he wants sent 'sendEmail gs_email, consts_EMAIL_NAME_TIPS_NEWS,"NONE", constas_EMAIL_TAGS_TIPS_NEWS,"DEFAULT" 'sendEmail gs_email, "trial sans cart","NONE", constas_EMAIL_TAGS_TIPS_NEWS,"DEFAULT" sendEmail gs_email, "trial sans cart", gs_firstName, "(^name^)" ,"DEFAULT" end function ' ************************************** ' Initialize page-scoped variables ' ************************************** gs_PageTitle = "CFA Exam Prep - Free Offer" gb_errFlag = false gs_errMsg = "Please fix the following errors:" ' AG 22-JUL-2002: Redirect depending on time ' study_plan.asp should run weekdays from 8:30 am to 5:30 pm. ' study_plan1.asp should run weekdays from 5:30 pm to 8:30 am, and from 5:30 ' pm Friday through 8:30 am Monday. gdt_nowDate = Date gdt_nowTime = Time gdt_beginTime = TimeValue("8:30:00 AM") gdt_endTime= TimeValue("5:30:00 PM") dim boLarryWantsItOn boLarryWantsItOn = "False" if (Request.QueryString("next") = "") and (boLarryWantsItOn = "True") then if Weekday(gdt_nowDate, vbSunday) = 1 OR Weekday(gdt_nowDate, vbSunday) = 7 then response.redirect "study_plan1.asp?" & request.querystring end if if gdt_nowTime < gdt_beginTime OR gdt_nowTime > gdt_endTime then response.redirect "study_plan1.asp?" & request.querystring end if end if if Request.QueryString("drpCandidateLevel") = "" then if session("candidate_level") = "" then gi_candidateLevel = 0 else gi_candidateLevel = session("candidate_level") end if else gi_candidateLevel = Request.QueryString("drpCandidateLevel") session("candidate_level") = Request.QueryString("drpCandidateLevel") end if if Request.QueryString("format-ps") = "" then gs_format = "" else gs_format = Request.QueryString("format-ps") end if if Request.QueryString("radiochoice") = "" then gs_radiochoice = "" else gs_radiochoice = Request.QueryString("radiochoice") end if if Request.QueryString("textchoice") = "" then gs_radiochoice = "" else gs_radiochoice = Request.QueryString("textchoice") end if if Request.QueryString("selectchoice") = "" then gs_radiochoice = "" else gs_radiochoice = Request.QueryString("selectchoice") end if if Request.QueryString("checkchoice") = "" then gs_radiochoice = "" else gs_radiochoice = Request.QueryString("checkchoice") end if if Request.QueryString("country") = "" then gs_country = "USA" ' default else gs_country = Request.QueryString("country") end if 'gs_firstName = Request.QueryString("first_name") 'gs_lastName = Request.QueryString("last_name") 'gs_workPhone = Request.QueryString("work_phone") gs_email = Request.QueryString("email") 'gi_examYear = Request.QueryString("exam_year") 'gi_examYear = 2005 'gs_registered = Request.QueryString("enrolled") 'gi_comments = "" 'gi_surveyresults = "" 'SMP 1-26-02 get list of countries for pull down menu (pull from db) 'set go_rsCountries = getCountries 'get list of countries from db ' ************************************** ' Input Validation ' ************************************** if Request.QueryString("next") = "Continue to Shipping" then ' ************************************** ' Input validation ' ************************************** if Request.QueryString("drpCandidateLevel") = "" then gs_errMsg = gs_errMsg & consts_ERROR_EMPTY_PREFIX & consts_CANDIDATE_LEVEL_LABEL gi_candidateLevel = Request.QueryString("drpCandidateLevel") gb_errFlag = true end if 'if gs_firstName = "" then ' gs_errMsg = gs_errMsg & consts_ERROR_EMPTY_PREFIX & consts_FIRST_NAME_LABEL ' gb_errFlag = true 'end if 'if gs_lastName = "" then ' gs_errMsg = gs_errMsg & consts_ERROR_EMPTY_PREFIX & consts_LAST_NAME_LABEL ' gb_errFlag = true 'end if 'if gs_country = "" then ' gs_errMsg = gs_errMsg & consts_ERROR_EMPTY_PREFIX & consts_COUNTRY_LABEL ' gb_errFlag = true 'end if if gs_format = "" then gs_errMsg = gs_errMsg & consts_ERROR_EMPTY_PREFIX & consts_FORMAT_LABEL gb_errFlag = true end if if gs_email = "" then gs_errMsg = gs_errMsg & consts_ERROR_EMPTY_PREFIX & consts_EMAIL_LABEL gb_errFlag = true else if isValidEmail(gs_email) = consti_FALSE then gs_errMsg = gs_errMsg & consts_ERROR_INVALID_PREFIX & consts_EMAIL_LABEL gb_errFlag = true end if end if if not gb_errFlag then dim RedirectTarget RedirectTarget = "https://www.allenresources.com/o/trial-2.asp" 'CBR 8/25/04 Restoryboarding the study plan pages 'Much of this code used to be in study_plan_confirm if isNotInEmailList(gs_email) = consti_TRUE then addToMailingList gs_email end if ' ************************************** ' Send notice w/ survey data to sales dpt. ' ************************************** 'EmailSurveyData gi_candidateLevel, gs_format, gs_email ' ************************************** ' Compose and send XML contact info email to generic address ' ************************************** 'EmailXMLData gi_comments, gi_surveyresults, gs_firstName, gs_lastName, gi_candidateLevel, gi_examYear, gs_country, gs_workPhone, gs_email ' ************************************** ' Send confirmation to customer ' ************************************** 'EmailCustComf gs_email, gs_firstName 'CBR 8/24/04 added contact loging so we can send Lighthouse sales info 'logContact gs_firstName, gs_lastName, gs_workPhone, gs_country, gi_candidateLevel, gs_registered 'redirect to confirmation page response.redirect RedirectTarget & "?" & request.querystring 'response.write "Redirecting to... " & RedirectTarget & "?" & request.querystring & "" end if end if %>  <script language="JavaScript">  </script> <style type="text/css">  </style> <table width="100%" bgcolor="#FFFFFF" class="text" valign="top"> <tr > <td colspan="2">  </td> </tr> <tr> <td colspan="2">   </td> </tr> <tr> <td valign="top" width="70%" bordercolor="#CCCCCC">  <% if gb_errFlag then response.write "" & gs_errMsg & "" end if %>  <form method="get" action="trial.asp" onSubmit="return study_plan_Validator(this)" target="_self" name="study_plan"> <table width="639" border="0" cellpadding="3" class="text"> <tr valign="top"> <td width="629"> <div align="left"> <table width="100%" height="82" border="0" cellpadding="3" cellspacing="0" class="text"> <tr class="style8"> <td colspan="3" align="right"> Try Allen for FREE...Offer ends Friday! To receive your free trial, complete the simple sign-up process. </td> <td width="173" rowspan="5" align="right" valign="top">Your email address is safe. We will not disclose your email address to third parties. Questions? Call 1-401-667-0487 M-F 9am-5pm EST <img src="../images/free7.gif" alt="CFA Exam Prep" width="101" height="25" align="top"></td> </tr> <tr class="style8"> <td width="130" align="right" valign="middle"> Your CFA Exam Level</td> <td width="146" align="left"> <input type="radio" name="drpCandidateLevel" value="1-June" <% if gi_candidatelevel = 1 then response.write " checked" %> /> I - June 2006 <input type="radio" name="drpCandidateLevel" value="2" <% if gi_candidatelevel = 2 then response.write " checked" %> /> II - June 2006 <input type="radio" name="drpCandidateLevel" value="3" <% if gi_candidatelevel = 3 then response.write " checked" %> /> III - June 2006 </td> <td width="148" align="left"> </td> </tr> <tr class="style8"> <td align="right" valign="bottom"><div align="right" class="style15"> <div align="right" style="font-family: Arial, Helvetica, sans-serif">Email Address </div> </div></td> <td colspan="2"> <input type="text" size="30" name="email" max="20" <% if gs_email <> "" then response.write " value = '" & gs_email & "' " %> /> </td> </tr> <tr class="style8"> <td width="130" align="right" valign="middle"> <div align="right" class="style15"> <div align="right" style="font-family: Arial, Helvetica, sans-serif">Choose Your System from the options numbered below.</div> </div> </td> <td colspan="2"> <input type="radio" name="format-ps" value="1&2" <% if gs_format = "DVD" then response.write " checked" %> > 1 & 2 - $495 <input type="radio" name="format-ps" value="1&4-DVD" <% if gs_format = "CD-ROM" then response.write " checked" %> > 1 & 4 - DVD video format - $550 <input type="radio" name="format-ps" value="1&4-CD" <% if gs_format = "DVD" then response.write " checked" %> > 1 & 4 - CD-ROM video format - $550 <input type="radio" name="format-ps" value="Kahuna-DVD" <% if gs_format = "CD-ROM" then response.write " checked" %> > The Big Kahuna, (1 - 6, DVD format) - $695 <input type="radio" name="format-ps" value="Kahuna-CDROM" <% if gs_format = "CD-ROM" then response.write " checked" %> > The Big Kahuna, (1 - 6, CD-ROM format) - $695 <input type="radio" name="format-ps" value="Friend-DVD" <% if gs_format = "CD-ROM" then response.write " checked" %> > You & A Friend, (Two sets of 1 - 6, DVD format) - $995 <input type="radio" name="format-ps" value="Friend-CDROM" <% if gs_format = "CD-ROM" then response.write " checked" %> > You & A Friend, (Two sets of 1 - 6 CD-ROM format) - $995</td> </tr>     </table> Free Trial Options: (click on any of the links below for product information) <ol class="style8"> <li> The CD version of <a href="javascript:popUpWin('popups/tb.asp', 600, 600);">TestBank Software</a> (over 7,443, 4,218, or 3,000 CFA exam questions for Levels I, II, and III, respectively).</li> <li class="style10"> The complete, final version of the <a href="javascript:popUpWin('popups/rh.asp', 600, 600);">Written Reading Highlights</a> (1,194, 1,156, or 978 pages for Levels I, II, and III respectively). Delivered to you in PDF format, giving you access to every page. </li> <li class="style10"> The complete, final version of the <a href="javascript:popUpWin('popups/fqm.asp', 600, 600);">LOS Flash QuizMaster</a> (720, 718, or 644 pages for Levels I, II, and III respectively). Delivered to you in PDF format, giving you access to every page. </li> <li class="style10"> The complete <a href="javascript:popUpWin('popups/videos.asp', 600, 600);">Core Blue Chip Video Seminar Series</a> (46, 45, or 25 hours for Levels I, II, and III respectively). Delivered in DVD or CD-ROM format. </li> <li class="style10"> The complete <a href="javascript:popUpWin('popups/audio.asp', 600, 600);">Core Audio Seminar Series</a> online (27, 22, or 24 hours for Levels I, II, and III respectively). Upon purchase, you may download the mp3 files and burn them to CDs. </li> <li class="style10"> The complete <a href="javascript:popUpWin('popups/problem_videos.asp', 600, 600);">Problem Solving Video Seminar Series</a> (21 hours. Level I only. Problem Solving is included in Core Blue Chip Videos for Levels II and III). Delivered in DVD or CD-ROM format. </li> </ol> <input type="submit" value="Continue to Shipping" name="next"> <img src="../images/free7.gif" alt="CFA Exam Prep" width="101" height="25" align="top"></div> </td> </tr> </table> </form>  </td> </tr> </table>