% @language="vbscript" %>
<%
if request.form("hdnSubmit") <> "" then
strName = Request.form("txtName")
strCompany = Request.form("txtCompName")
strAdd = Request.form("txtAddress")
strMail = Request.form("txtEmail")
strPhone = Request.form("txtPhone")
strFax = Request.form("txtFax")
strArea = Request.form("txtEnquiry")
strBody ="
Name | "&strName&" |
Company | "&strCompany&" |
Address | "&strAdd&" |
Email ID | "&strMail&" |
Telephone | "&strPhone&" |
Fax | "&strFax&" |
Enquiry to | "&strArea&" |
"
Set mail = server.CreateObject("JMail.SMTPMail")
'mail.ServerAddress = "203.199.200.56:25"
mail.ServerAddress = "202.54.63.214:25"
mail.Sender = "customer@technicolab.com"
'mail.AddRecipient "paulms@accelfrontline.in"
mail.AddRecipient "technicolab@airtelbroadband.in"
mail.AddRecipient "technicolaboratory@vsnl.net"
mail.Subject = "Enquiry Details"
mail.Body = strBody
mail.ContentType = "text/html"
mail.ISOEncodeHeaders = false
mail.ContentTransferEncoding = "8bit"
mail.Priority = 1
mail.Execute
set mail = nothing
end if
%>
Welcome to TECHNICO LABORATORY PVT. LTD.