Please fill up all the fields
<% if Request("Submit")<>"Submit" then %>

        Full Name: 

         Address :

  Phone Number: 

  Mobile Number: 

             E-mail: 

 
<% else '---------------Mail Dim MyBody Dim MyCDONTSMail Set MyCDONTSMail = CreateObject("CDONTS.NewMail") MyCDONTSMail.From= Request("email") MyCDONTSMail.To= "marketing@belanis.com" MyCDONTSMail.Subject="Moore Heights :: Download Brochure from website" MyCDONTSMail.Body=""& "Name : " & Request("name") _ & "
" & "Address : " & Request("address") _ & "
" & "Phone Number : " & Request("phone") _ & "
" & "Mobile Number : " & Request("mobile") _ & "
" & "Email Id : " & Request("email") _ & "" MyCDONTSMail.MailFormat = 0 MyCDONTSMail.BodyFormat = 0 MyCDONTSMail.Send set MyCDONTSMail=nothing '---------------Mail %>
<% end if %>