<h1>industrial cables, industrial products, electrical cables, electronics cables, automotive harness, electronics harness, flexible cables, computer interface cables, telephone cables, communication cables</h1> Home | E-mail | Sitemap | Resources  
Electrical & Electronic cables Electrical & Electronic Cables Supplier Industrial Cables & Products Electrical Cables Supplier Industrial Cables Manufacturer
industrial cables, industrial products, electrical cables, electronics cables, automotive harness, electronics harness, flexible cables, computer interface cables, telephone cables, communication cables
title Enquiry title
<% Function SendMail(MailTo, MailFrom, MailSubject, MailBody, MailReplyto, MailType) Set objConfiguration = CreateObject("CDO.Configuration") Set objFields = objConfiguration.Fields With objFields .Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2 .Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "mail.cablemen.com" .Item("http://schemas.microsoft.com/cdo/configuration/sendusername") = "info@cablemen.com" .Item("http://schemas.microsoft.com/cdo/configuration/sendpassword") = "123456" .Item("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = 0 .Update End With Set objMessage = CreateObject("CDO.Message") With objMessage Set .Configuration = objConfiguration .From ="info@cablemen.com" .To = "pksethi@cablemen.com" .Cc = "visioninternational@cablemen.com" .Bcc = "info@rutujacreation.com" .Subject = MailSubject .AutoGenerateTextBody = False if MailType="TEXT" then .TEXTBody = MailBody end if if MailType="HTML" then .HTMLBody=MailBody end if .Send end with Set objConfiguration = nothing Set objFields = nothing End Function %> <% if Request.QueryString("action") = "submit"then myHTML = myHTML & "
Inquiry Report:
" myHTML = myHTML & "" myHTML = myHTML & "" myHTML = myHTML & "" myHTML = myHTML & "" myHTML = myHTML & "" myHTML = myHTML & "" myHTML = myHTML & "" myHTML = myHTML & "" myHTML = myHTML & "" myHTML = myHTML & "" myHTML = myHTML & "" myHTML = myHTML & "" myHTML = myHTML & "" myHTML = myHTML & "" myHTML = myHTML & "
Company Name :"& Request.Form("cname") & "
Contact Person :"& Request.Form("cperson") & "
Address:"& Request.Form("caddress") & "
City: "& Request.Form("ccity") & "
Pincode: "& Request.Form("cpincode") & "
Country: "& Request.Form("ccountry") & "
State: "& Request.Form("cstate") & "
Product Dealing In: "& Request.Form("cproduct") & "
Business Type: "& Request.Form("chksd")& "
Phone: "& Request.Form("pcountry") &" - "& Request.Form("pcity") &"- "& Request.Form("pphoneno") & "
Fax: "& Request.Form("fcountry") &" - "& Request.Form("fcity") &"- "& Request.Form("ffaxno") & "
EMail: "& Request.Form("email") &"
Website: "& Request.Form("website") &"
Product Specification: "& Request.Form("pspecification")& "
" call SendMail("info@cablemen.com",Request.Form("txtemail"),"WEB Reuqest",myHTML,"info@cablemen.com","HTML") Response.Write "
Your mail has been sent.....
" end if %>
Company Information All fields marked (*) are mandatory.
Company Name : *
Contact Person : *
Address :
City :
Zip code :
Country : *
State : *
Product Dealing In :
Business Type : Wholesaler   Retailer   Manufacturer
    Agent   Impoter/Exporter
Contact Information
 
Phone    :
Country Code : City Code : Phone No. :
*
 
Fax       :
Country Code : City Code : Fax No. :
e-mail   : *
Website :
Product Interested *

Product Specification
(Technical specification of product required & packing required by you.)

 :

 

      
Powered by #1 Vinayak InfoSoft Home  |  About Us  |  Products  |  Reach Us  |  Enquiry  |  Resources | Sitemap  
  COPYRIGHT©2006, Vision International. AHMEDABAD, GUJARAT, INDIA  
Rubber Insulated Cables | PTFE Cables | Thermocouple Cables | Coaxial Cables | LT & HT Cables | Telecommunication Cables
Instrumentation Cables | Flexible Wires | Molded Power Cords | Wiring Harnesses | Computer Cables