|
|
Thank you for sending your contact details. We shall
get in touch with you shortly.
<%
MailFrom="contact@swiftvisionhire.com"
MailTo="rajeswari@ohmsol.com"
MailBcc="rajeswari@ohmsol.com"
feedback=""
feedback=feedback & ""
feedback=feedback & "| Name | " & Request.form("contactname") & " | "
feedback=feedback & "| Company Name | " & Request.form("coname") & " | "
feedback=feedback & "| Address | " & Request.form("address") & " | "
feedback=feedback & "| City | " & Request.form("city") & " | "
feedback=feedback & "| Phone | " & Request.form("telephone") & " | "
feedback=feedback & "| Email | " & Request.form("emailid") & " | "
feedback=feedback & "| Services Required | " & Request.form("services") & " | "
feedback=feedback & "| Additional Details | " & Request.form("addldet") & " | "
feedback=feedback & " "
'response.write(feedback)
MailSubject = "Contact form from website"
SendMail MailFrom,MailTo,MailBcc,MailSubject,feedback
Function SendMail (MailFrom, MailTo, MailBcc, MailSubject, MailBody)
set Mailobj = server.CreateObject ("CDONTS.NewMail")
Mailobj.From = MailFrom
Mailobj.To = MailTo
if MailBcc<>"" then
Mailobj.bCc = MailBcc
end if
Mailobj.Subject = MailSubject
Mailobj.Body = MailBody
Mailobj.BodyFormat = 0
Mailobj.MailFormat = 0
Mailobj.Send
set Mailobj = Nothing
End Function
%>
|
 |