<% If Request.Form("submit") <> "" Then Set myMail=CreateObject("CDO.Message") myMail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 1 myMail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "127.0.0.1" myMail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25 myMail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = 0 myMail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusername") = "" myMail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendpassword") = "" myMail.Configuration.Fields.Update myMail.Subject= "Contact Us From Website" 'This is the subject of the e-mail myMail.To="piyush20737@gmail.com" 'This is the e-mail address the e-mail will be delivered to myMail.From=Request.Form("Email") myMail.TextBody="Hardened Tempered Steel" & vbCrLf & "Grade : " & Request.form("Grade") & vbCrLf & "Width : " & Request.form("Width") & vbCrLf & "Thickness : " & Request.form("Thickness") & vbCrLf & "Hardness : " & Request.form("Hardness") & vbCrLf & "Surface Finish : " & Request.form("Surface") & vbCrLf & "Edge : " & Request.form("Edge") & vbCrLf & "Coil Weight : " & Request.form("Coil_Weight") & vbCrLf & "Quantity : " & Request.form("Quantity") & vbCrLf & "Expected Date of Delivery : " & Request.form("ExpectedDD") & vbCrLf & "Applications : " & Request.form("Applications") & vbCrLf & "Destination : " & Request.form("Destination") & vbCrLf & "Any Other Specifications : " & Request.form("Specifications") & vbCrLf & " " & vbCrLf & "Company's Information " & vbCrLf & " " & vbCrLf & "Organization : " & Request.form("Organization") & vbCrLf & "Address : " & Request.form("Address") & vbCrLf & "Pin : " & Request.form("Pin") & vbCrLf & "Country : " & Request.form("Country") & vbCrLf & "Phone : " & Request.form("Phone") & vbCrLf & "Fax : " & Request.form("Fax") & vbCrLf & "Email : " & Request.form("Email") & vbCrLf & "Contact Person : " & Request.form("ContactPerson") & vbCrLf & "Designation : " & Request.form("Designation_new") & vbCrLf myMail.Send set myMail= nothing Response.Redirect("thankyou.html") End If %> Anil Special Steel
An ISO:9001 Certified Company

Enquiry

Hardened & Tempered (H&T) Steel Strips

<< Back To Enquiry
* Mandatory Fields  
* Grade of Material
Size : * Width
* Thickness
* Hardness
* Surface Finish
* Edge
* Coil Weight
* Quantity (MT)
* Expected Date of Delivery
* End Use/Applications
* Destination
* Any Other Specifications
Please Fill In Your Company's Information, For Us To Contact You
* Organization
Address
Zip/Postal code
Country
Phone
Fax
* E-mail
* Contact Person
Designation