%@ LANGUAGE=vbscript enablesessionstate=false LCID=1033 %> <% if Request.Form("ProcForm")="Yes" then Set objNewMail = CreateObject("CDONTS.NewMail") sFrom="flpdsro@aol.com" sTo=Request.Form("mailto") sSubject="N.J.A.S.R.O. Website Inquiry" sBody="N.J.A.S.R.O. Website Inquiry:" & vbNewLine sBody=sBody & "-----------------------------------------------" & vbnewline sBody=sBody & "Name: " & Request.Form("Name") & vbNewLine sBody=sBody & "Agency: " & Request.Form("Agency") & vbNewLine sBody=sBody & "Agency Mailing Address: " & Request.Form("address") & vbNewLine sBody=sBody & "City: " & Request.Form("city") & vbNewLine sBody=sBody & "State: " & Request.Form("State") & vbNewLine sBody=sBody & "zip: " & Request.Form("zip") & vbNewLine sBody=sBody & "Phone Number: " & Request.Form("phone") & vbNewLine sBody=sBody & "E-mail: " & Request.Form("email") & vbNewLine sBody=sBody & "Message: " & Request.Form("message") & vbNewLine call objNewMail.Send(sFrom,sTo,sSubject,sBody) Set objNewMail = Nothing Response.Write "
|
|
|||||||||||
|
|
|||||||||||
|
|||||||||||
|
|
|||||||||||
|
| HOME | MEMBERSHIP | TRAINING | RESOURCES | CONFERENCE | ABOUT US | EXECUTIVE BOARD | NEWS | CONTACT US |
|
|||||||||||
<% %>