<%
if request.form("Email") <> "" then
Set mail = Server.CreateObject("CDONTS.NewMail")
mail.From = "thomson@digitallabz.com"
mail.To = "info@digitallabz.com"
Message = "
Name = " + request.form("name")
Message = Message + "Email =
" + request.form("email")
Message = Message + "Company =
" + request.form("com")
Message = Message + "Telephone=
" + request.form("phone")
Message = Message + "Website URL =
" + request.form("url")
Message = Message + "Description =
" + request.form("desc")
mail.Subject = "Submit Form"
mail.Body = Message
mail.Send
Set mail = Nothing
Response.Write ("Congratulations! message has been successfully submitted! Thank You.")
else
%>
|
