For
enquiry, Please fill in the following
particulars. Fields marked with
* are mandatory.
<%
if request("hidSubmit")="Y" then
Cname=request("Cname")
company=request("company")
phone=request("phone")
email=request("email")
comments=request("comments")
MailMsg="| Name : | " & cname & " | | Company Name : | " & company & " | | Phone : | " & phone & " | | EMail : | " & email & " | | Comments : | " & comments & " |
"
Set objCDO = Server.CreateObject("CDONTS.NewMail")
objCDO.To = "jeetuminani@yahoo.com"
objCDO.Cc = "motwaniharish@yahoo.com"
'objCDO.bcc =
objCDO.From = email 'FromAddress
objCDO.MailFormat = 0
objCDO.BodyFormat = 0
objCDO.Subject = "Enquiry from MDFRUITS.com"
objCDO.Body = MailMsg
objCDO.Send
' if objCDO.Send then
' SendMail = "Y"
' else
' SendMail = "N"
' end if
set objCDO = nothing
response.write("Thanks For Your Feedback/Enquiry ")
end if
%>
|
