%@ LANGUAGE=vbscript enablesessionstate=false LCID=1033 %> <% if Request.Form("ProcForm")="Yes" then Set objNewMail = CreateObject("CDONTS.NewMail") sFrom="njasro@dwp.net" 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 "
|
|
|||||||||||
|
|
|||||||||||
|
Email us at escanlon.njasro@gmail.com
|
||||||||||
|
|
|||||||||||
|
|
|||||||||||
<% %>