<%@language="vbscript"%>
<%response.buffer=true%>
<%response.expires=0%>
<%
msubmit=request.form("submit")
success="N"
if msubmit="submit" then
set mymail=server.createobject("CDONTS.NewMail")
mymail.To="support@mehta-mehta.com,dipti@mehta-mehta.com"
mymail.BCC="ashykad@yahoo.com"
if not request.form("email")="" then
mymail.from=request.form("email")
else
mymail.from=request.form("name")
end if
if not request.form("name")="" then
mymail.subject="Enquiry From"&request.form("name")
else
mymail.subject="Enquiry From."
end if
mbody = ""
mbody=""
mbody=mbody&"
"
mbody=mbody&"
"
mbody=mbody&"
* Enquiry from mehta-mehtaadvisory.com *
"
mbody=mbody&"
"
mbody=mbody&"
"
mbody=mbody&"
"
if not ( Request.Form("name") = "" ) then
mbody = mbody & "
Name : " & Request.Form("name") & " "
end if
if not ( Request.Form("address") = "" ) then
mbody = mbody & "
Address : " & Request.Form("address") & " "
end if
if not ( Request.Form("phone") = "" ) then
mbody = mbody & "
Telephone : " & ucase(Request.Form("phone")) & " "
end if
if not ( Request.Form("email") = "" ) then
mbody = mbody & "
E-Mail : " & Request.Form("email") & " "
end if
if not ( Request.Form("fax") = "" ) then
mbody = mbody & "
Fax No. : " & ucase(Request.Form("fax")) & " "
end if
if not ( Request.Form("query") = "" ) then
mbody = mbody & "
Enquiry regarding : " & Request.Form("query") & " "
end if
mbody=mbody&"
"
mbody=mbody& "
"
mbody=mbody&""
mymail.Body = mbody
mymail.Importance = 1
mymail.BodyFormat = 0
mymail.MailFormat = 0
mymail.Send
success = "Y"
set mymail = nothing
end if
%>
Mehta & Mehta
ENQUIRY
FORM
Do you have queries regarding any of our services?
Please let us know by filling the form below and we
would certainly help you solve the same.
