%@LANGUAGE="VBSCRIPT"%> <% ' *** Send Feedback From A Web Page - CDOMail_103 Dim usxCDO Set usxCDO = Server.CreateObject("CDONTS.NewMail") usxCDO.From = cStr(Request("textFrom")) usxCDO.To = "nancy@webwish.com" usxCDO.Subject = "Quick Contact Form" usxCDO.Body = Chr(13) & Chr(10) & "Name: " & cStr(Request("textName")) & Chr(13) & Chr(10) & Chr(13) & Chr(10) & "Feedback: " & cStr(Request("textBody")) If (CStr(Request("Submit")) <> "") Then usxCDO.Send Set usxCDO = Nothing Response.Redirect("home.asp") End If %>
![]() ![]() ![]() |
|||||||||
| Seminars by Solutions Forward | |||||||||
Please use the form on the home page to let us know which seminars you are interested in. If you have an idea for a seminar topic, please send that to us as well. We are developing new seminars all the time. |
|
Home | About Us | Seminars | Contact Us . |