%@ LANGUAGE="VBSCRIPT"%>
05-03-2012 |
|
|
Tell me what you think about my web site. I welcome all of your comments and suggestions. <% if ((Request.Form("submit") = "Submit") OR ((Request.Form("submit") = "") and (Request.QueryString("submit") = "y"))) then Set Mail = CreateObject("CDONTS.NewMail") Mail.From = Request.Form("address") Mail.To = "paul@npkhan.co.uk" Mail.Subject = "Feedback from www.npkhan.co.uk" Mail.BodyFormat = "1" Mail.MailFormat = "1" Mail.Importance = "1" Mail.Body = "Remote PC address: " & request.servervariables("remote_addr") & vbcrlf & _ "From: " & Request.Form("name") & vbcrlf & _ vbcrlf & _ Request.Form("message") Mail.Send Set Mail = Nothing %> Form has been submitted! <% else %> Contact form <% end if %> |
This site was last updated 03/02/12