:: PARAGON :: Electronic SwitchGear Instruments For Process Control

<% Else %>

<% if request.QueryString("ans")="mail" then%> <% btext = btext & "" btext = btext & "

Personal Details
Company Name	" btext = btext & request.form("txt_name") btext = btext & "
Contact Person	" btext = btext & request.form("txt_person") btext = btext & "
Designation	" btext = btext & request.form("txt_desg") btext = btext & "
Address	" btext = btext & request.form("txt_add") btext = btext & "
Phone	" btext = btext & request.form("txt_ph") btext = btext & "
Email	" btext = btext & request.form("txt_email") btext = btext & "
Query	" btext = btext & request.form("txt_query") btext = btext & "

" %> <% '=btext%> <% sch = "http://schemas.microsoft.com/cdo/configuration/" Set cdoConfig = Server.CreateObject("CDO.Configuration") cdoConfig.Fields.Item(sch & "sendusing") = 2 cdoConfig.Fields.Item(sch & "smtpserver") = "localhost" cdoConfig.fields.update Set cdoMessage = Server.CreateObject("CDO.Message") Set cdoMessage.Configuration = cdoConfig cdoMessage.From = request.Form("txt_email") cdoMessage.To = "support@binaryinfotech.co.in" cdoMessage.Bcc = "support@binaryinfotech.co.in" cdoMessage.Subject = "Feedback from the www.paragoncontrol.com" cdoMessage.HTMLBody = btext cdoMessage.Send Set cdoMessage = Nothing Set cdoConfig = Nothing %> <% msg1 = "Dear "& request.Form("txt_person") &",

" msg1 =msg1 & "Thank you for asking your question.
" msg1= msg1 &"We thank you for showing interest and for placing an enquiry.

" msg1= msg1 &"PARAGON AUTO CONTROL
" msg1= msg1 &"F/4, Laxmi Industrial Estate,
Jay Ambe Temple Road, Off,
Station Road,
Bhayandar (West),
THANE - 401101 (M.S) INDIA." msg1= msg1 &"Tel : 91-22-28149014
Fax : 91-22-8180978
" msg1= msg1 &"Email : : paragoncontrol@vsnl.net
" msg1= msg1 &"Website : www.paragoncontrol.com" Set cdoMessage1 = Server.CreateObject("CDO.Message") Set cdoMessage1.Configuration = cdoConfig cdoMessage1.From = "www.paragoncontrol.com" cdoMessage1.To = request.Form("txt_email") cdoMessage1.Subject = "Response from www.paragoncontrol.com" cdoMessage1.HTMLBody = msg1 cdoMessage1.Send Set cdoMessage1 = Nothing Set cdoConfig = Nothing %> <%'=msg1%>

Thank You, <%=request.form("txt_person")%>

All field marked by [*] are mandatory.

Company Name* :

Contact Person* :

Designation :

Address :

Phone* :

E-mail* :

Query :

<% end if %>