 |
 Shop Amazon and support Hoagies' Page. 
Thanks!
|
|
||||
          ↑Teachers find help here ↑ Everyone needs community |
||||||
| |||||||||||
|
Click on Shop Hoagies' Page before you visit your favorite on-line stores including Amazon and many more of your favorite stores. Thanks for making Hoagies' Gifted community possible!
Donations
|
<%
Set Mail = Server.CreateObject("Persits.MailSender")
Mail.Host = "64.202.165.28"
Mail.Port = 25
Mail.From = request.form("Email")
Mail.FromName = request.form("Name")
Mail.AddAddress "webmaster@hoagiesgifted.org" 'this is a method - no = used
'Mail.AddCC 'this is a method - no = used
'Mail.AddBCC 'this is a method - no = used
'Mail.AddReplyTo 'this is a method - no = used
Mail.Subject = request.form("Subject")
strBody = "Comment Type - " & request.form("CommentType") & chr(13) & chr(10)
strBody = strBody & "Found Out - " & request.form("FoundOut") & chr(13) & chr(10)
strBody = strBody & "Subject - " & request.form("Subject") & chr(13) & chr(10)
strBody = strBody & "Comment - " & request.form("Comment") & chr(13) & chr(10)
strBody = strBody & "Name - " & request.form("Name") & chr(13) & chr(10)
strBody = strBody & "Location - " & request.form("CityStateCountry") & chr(13) & chr(10)
strBody = strBody & "E-mail address - " & request.form("Email") & chr(13) & chr(10)
strBody = strBody & "Connection Speed - " & request.form("Speed") & chr(13) & chr(10)
strBody = strBody & "IP Address - " & Request.ServerVariables("REMOTE_ADDR") & chr(13) & chr(10)
strBody = strBody & "Remote Host - " & Request.ServerVariables("REMOTE_HOST") & chr(13) & chr(10)
Mail.IsHTML = False
Mail.Body = strBody
On Error Resume Next
Mail.Send
if Err <> 0 Then
Response.Write "An error occurred: " & Err.Description
end if
%>
Thanks for your feedback. You will receive a response shortly.Click to return to Hoagies' Gifted Education Page... |
|
|
