<% SendToEmail="flavors@md4.vsnl.net.in" Function SendMail(FromEmail, ToEmail, SubjectText, MsgText) Set mailobj = Server.CreateObject("CDONTS.NewMail") mailobj.From = FromEmail mailobj.To = ToEmail mailobj.MailFormat = 0 mailobj.BodyFormat = 0 mailobj.Subject = SubjectText mailobj.Body = MsgText mailobj.Send Set mailobj = NOTHING End Function CommentsText= Request("Comments") If CommentsText <> "" then isUrgent = Request("Urgent") SubjectText = Request("Subject") Specifics = Request("R1") SenderName = Request("SenderName") SenderEmail = Request("Email") SenderTele = Request("Telephone") SenderFax = Request("Fax") FromEmail="Inquiry" ToEmail = SendToEmail MsgText = "Inquiry about " & Specifics & "
" MsgText = MsgText + "Comments : " & CommentsText & "
" MsgText = MsgText + "Sender Details : " & "
" MsgText = MsgText + "Name : " & SenderName & "
" MsgText = MsgText + "Email : " & SenderEmail & "
" MsgText = MsgText + "Telephone : " & SenderTele & "
" MsgText = MsgText + "Fax : " & SenderFax & "
" If isUrgent <> "" then MsgText = MsgText + "This message is marked urgent by " & SenderName & ". Please reply this asap." End If 'Response.Write MsgText SendMail "flavors@md4.vsnl.net.in", ToEmail, SubjectText, MsgText Response.Write "Thank you for your comments. We shall get back to you as soon as we can." Else %>
The Flavors India ( P ) Ltd

Enquiry Form

What Product you are Looking For?
 For Beverage  (Alcoholic/ Non Alcoholic)
 For Bakery and Confectionery
For Pharmaceuticals
For Dairy & Tea Industry

Subject

Enter your comments in the space given below

Tell us how to get in touch with you.
Name
Email
Tel
Fax

Please contact me as soon as possible regarding this matter.

 

<% End IF %>

Click to go  Home Page