% ' GATHER ALL THE GLOBAL VARIABLES AND THE COMPONENTS THEY ARE APPLYING FOR DIM Contact_Email, Contact_Telephone, Apply_Credit_Card,Apply_Personal_Loan, Current_CST_Customer, Date_Time, Browser_Details, valScript Contact_Email = Request.Form("Contact_Email") Contact_Telephone = Request.Form("Contact_Telephone") Current_CST_Customer = Request.Form("Current_CST_Customer") Apply_Personal_Loan = Request.Form("Apply_Personal_Loan") Apply_Credit_Card = Request.Form("Apply_Credit_Card") 'Date_Time = (time & " " & FormatDateTime(Date, 1)) Date_Time = (FormatDateTime(Date, 1)) Browser_Details = Request.Form("Browser_Details") valScript = Request.Form("valScript") ' GATHER ALL THE CREDIT CARD INFORMATION DIM Credit_Card_Description, Additional_Credit_Card_Holder, Credit_Card_Credit_Limit, adc adc = Request.Form("Additional_Credit_Card_Holder") IF adc = "" THEN adc = "no" Else adc = "yes" END IF Additional_Credit_Card_Holder = adc Credit_Card_Description = Request.Form("Credit_Card_Description") Credit_Card_Credit_Limit = Request.Form("Credit_Card_Credit_Limit") Credit_Card_Transfer_Balance = Request.Form("Credit_Card_Transfer_Balance") ' GATHER ALL THE PERSONAL LOAN INFORMATION DIM Personal_Loan_Term_Months, Personal_Loan_Amount, Personal_Loan_Term_Years, Personal_Loan_Type, Nbr_of_Personal_Loan_Applicants, Personal_Loan_Type_Other, Personal_Loan_Term Personal_Loan_Amount = ("$" & Request.Form("Personal_Loan_Amount")) Nbr_of_Personal_Loan_Applicants = Request.Form("Nbr_of_Personal_Loan_Applicants") Personal_Loan_Term_Months = Request.Form("Personal_Loan_Term_Months") Personal_Loan_Term_Years = Request.Form("Personal_Loan_Term_Years") Personal_Loan_Type = Request.Form("Personal_Loan_Type") Personal_Loan_Type_Other = Request.Form("Personal_Loan_Type_Other") Personal_Loan_Term = (Personal_Loan_Term_Years & " years " & Personal_Loan_Term_Months & " months") ' DETERMINE WHICH EMAIL RESPONSE FILE TO SEND IF Apply_Credit_Card = "yes" AND Apply_Personal_Loan = "no" THEN Response_Email_Code = "CC00" ELSEIF Apply_Credit_Card = "yes" AND Apply_Personal_Loan = "yes" THEN Response_Email_Code = "CCPL" ELSEIF Apply_Credit_Card = "no" AND Apply_Personal_Loan = "yes" THEN Response_Email_Code = "PL00" END IF %>