<% if request.form("hidmail") <> "" then ' response.write request.form("hidmail") 'response.end end if CONST MAILSERVER = "mail.corekenindia.com" CONST SUBJECT = "Feedback from the site" CONST TO_EMAIL = "info@corekenindia.com" CONST CONFIRM = "response.htm" Dim bHTML, str,sFromEmail bHTML = True sFromEmail = Request.Form("email") if Request.Form("hidmail") <> "" then str = "" str = str & "Following is customer details:

" if Request.Form("company") <> "" then str = str & "" str = str & "Company Name : " & Request.Form("company") str = str & "
" end if if Request.Form("key") <> "" then str = str & "" str = str & "Person : " & Request.Form("key") str = str & "
" end if if Request.Form("subject") <> "" then str = str & "" str = str & "Designation : " & Request.Form("subject") str = str & "
" end if if Request.Form("Physical_address") <> "" then str = str & "" str = str & "Address : " & Request.Form("Physical_address") str = str & "
" end if if Request.Form("telephone") <> "" then str = str & "" str = str & "Phone No : " & Request.Form("telephone") str = str & "
" end if if Request.Form("fax") <> "" then str = str & "" str = str & "Fax : " & Request.Form("fax") str = str & "
" end if if Request.Form("email") <> "" then str = str & "" str = str & "Email : " & Request.Form("email") str = str & "
" end if if Request.Form("inquiry") <> "" then str = str & "" str = str & "Inquiry : " & Request.Form("inquiry") str = str & "
" end if set oMail = Server.CreateObject("Persits.MailSender") oMail.Host = MAILSERVER oMail.From = sFromEmail oMail.AddAddress TO_EMAIL oMail.Subject = SUBJECT oMail.IsHTML = bHTML oMail.Body = str if not oMail.Send Then ErrStr = Err.Description Else Response.Redirect("response.htm") End if 'set mailobj = server.CreateObject("cdonts.newmail") 'mailobj.BodyFormat = 0 'mailobj.MailFormat = 0 'mailobj.From = Request.Form("email") 'mailobj.To = "rajesh@corekenindia.com" 'mailobj.Subject = "Users FeedBack" 'mailobj.Body = str 'mailobj.Send 'set mailobj = nothing end if %> Coreken Industries *Feedback*

ImageGO TO HOME Company Name
Send EmailAbout usProductsFeedback

 

Name of Company :
Name of the Person :
Designation of the Person:
Physical Address :
Telephone(s) :
Fax :
Email Address :
Comments :  
 
<% If ErrStr <> "" Then %> Message was not sent due to the following error: <% = ErrStr %> <% End If %>

 

About us  |  Products  |  Picanol/Saurer  |  Vamatex/Panter  |  Dornier  | 

Other Products  |  Rings  |  Business Proposal   |

_________________________________________________________________________________

COREKEN INDUSTRIES

10, Dhanlaxmi Industrial Estate, Nr. Police Commissioner's Office,
Shahibaug Road, Ahmedabad - 380 004. Gujarat, India.
Phone : +91 - 079 - 25621833 - 093270 31527 Fax : +91 - 079 - 25621833
Mobile: 098250 09224

Top