%@LANGUAGE="VBSCRIPT"%> <% ' *** Send Feedback From A Web Page - ASPMail ' *** UltraSuite Server Behavior - 4513 - version 1.0 ' *** Created by Jag S. Sidhu - www.ultrasuite.com Set Mailer = Server.CreateObject("SMTPsvg.Mailer") Mailer.FromAddress= cStr(Request("textFrom")) Mailer.RemoteHost = "mail.scbec.org" Mailer.AddRecipient "", "tedgerton@scbec.org" Mailer.Subject = "HELLO WEBMASTER : WEB" Mailer.BodyText = "----- WEBSITE FEEDBACK -----" & Chr(13) & Chr(10)_ & "Name: " & cStr(Request("Name"))& Chr(13) & Chr(10)_ & Chr(13) & Chr(10)_ & "Phone: " & cStr(Request("Phone"))& Chr(13) & Chr(10)_ & Chr(13) & Chr(10)_ & cStr(Request("Note"))& Chr(13) & Chr(10)_ & Chr(13) & Chr(10)_ & "Email: " & cStr(Request("textFrom")) If (cStr(Request("Submit")) <> "") Then Mailer.SendMail Response.Redirect("thankyou.htm") End If %>
![]() |
||||
![]() |
Maintenance by SCBEC's Webmaster Tammie Edgerton
|
|||
![]() |
||||