% Dim MyBody Dim MyCDONTSMail strEmail = request("Contact_Email") strName = request("Contact_FirstName") & request("Contact_LastName") strAddress = request("Contact_StreetAddress") strPhone = request("userPhone") strComments = request("comments") strbody = strbody & "******************************" & vbcrlf strBody = strBody & "Name: " & strName & vbcrlf strBody = strBody & "Email: " & strEmail & vbcrlf strbody = strbody & "Phone: " & strPhone & vbcrlf strbody = strbody & "Comments: " & strComments & vbcrlf strbody = strbody & "Date&Time: " & now() & vbcrlf %> <% Set MyCDONTSMail = CreateObject("CDONTS.NewMail") MyCDONTSMail.From= strEmail MyCDONTSMail.To= "linda@anandazone.nu" MyCDONTSMail.Subject="Playing for a Cure Information Request" MyBody = strBody MyCDONTSMail.Body= MyBody MyCDONTSMail.Send set MyCDONTSMail=nothing %>
The John S. Pickering
Foundation
|
![]() |
|
|
|
The John S. Pickering Foundation, Inc. is a Georgia Nonprofit Organization |
|