<%@ language="VBScript" %> <% Dim DataConn 'As Data Connection Dim strPage 'As String Dim rsPage 'As Recordset 'Open Data Connection Set DataConn = OpenDatabase() 'Retrieve Page Information strPage = Layout_GetContentFileOfCurrentPage(DataConn, "") strSQL = "CM_Select_Content_Tree_ByContentFile '" & strPage & "'" Set rsPage = DataConn.Execute(strSQL) %> <% Layout_TemplateHeader1 DataConn, rsPage, "" Layout_TemplateHeader2 DataConn, rsPage, "" %>

Military Youth Saves — Group Saver Pledge

<% If Request.ServerVariables("REQUEST_METHOD") <> "POST" Then 'NOT RECEIVED VIA POST %>
Military Youth Saves Eagle

Military Youth Saves is a social marketing program designed to encourage kids and teens to develop good savings habits at a young age. We want you to be a responsible saver but we also want you to spread the savings message to your family and friends!!

We promise to help ourselves by saving money and using debt responsibly or not at all.

We promise to help our families, our friends, and our neighbors by encouraging them to do the same.

First Name:
Last Name:
Title:
Organization Name:
Enter name above as you wish it to appear on your certificate.
Organization Type:
City:
State:
Installation:
Email Address:
Telephone:
 

Your personal information is safe with Military Saves. We do not sell or distribute your contact information.
Please see our privacy policy for more information.

<% Else 'RECEIVED VIA POST If Request("email") <> "" Then 'SEND CFA NOTIFICATION 'strSaverEmailTo = "info@militarysaves.org" strSaverEmailTo = "julie@militarysaves.org" strSaverBCC = "bruce.spates@finra.org" strSaverEmailFrom = Request("email") strSaverEmailSubject = "Military Saves Organization Certificate: " & Request("organization") strSaverEmailBody = "The following organization created a Military Saves pledge certificate: " & vbCrLf & vbCrLf _ & "Organization: " & Request("organization") & vbCrLf & vbCrLf _ & "Organization Type: " & Request("orgtype") & vbCrLf & vbCrLf _ & "Contact Name: " & Request("firstname") & " " & Request("lastname") & vbCrLf & vbCrLf _ & "Title: " & Request("title") & vbCrLf & vbCrLf _ & "City: " & Request("City") & vbCrLf & vbCrLf _ & "State: " & Request("State") & vbCrLf & vbCrLf _ & "Installation: " & Request("Installation") & vbCrLf & vbCrLf _ & "Telephone: " & Request("phone") & vbCrLf & vbCrLf _ & "E-Mail: " & Request("email") & vbCrLf & vbCrLf CDONTS_Email strSaverEmailTo, strSaverEmailFrom, "", strSaverBCC, strSaverEmailFrom, "", strSaverEmailSubject, strSaverEmailBody End If %>
Congratulations on Taking the Group Saver Pledge!

 

We welcome the <%= Request("organization") %> to the Military Youth Saves campaign!

','CertificateWin','1024','650');">Click here to display your pledge certificate.

You may print your certificate from the new window.

For the best results, we recommend that you print your certificate in landscape mode.

 
<% End If %>
<% Layout_TemplateFooter DataConn, rsPage, strParameter %> <% DataConn.Close Set DataConn = Nothing %>