<% 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="export@anilspecialsteel.com,marketing@anilspecialsteel.com" 'This is the e-mail address the e-mail will be delivered to myMail.From=Request.Form("Email") myMail.TextBody="Type: " & Request.Form("grade") & vbCrLf & "Outer Diameter: " & Request.Form("outerdiameter") & vbCrLf & "Blank Thickness: " & Request.Form("blankthickness") & vbCrLf & "Internal Diameter: " & Request.Form("internaldiameter") & vbCrLf & "KERF: " & Request.Form("kerf") & vbCrLf & "Teeth Profile: " & Request.Form("teethprofile") & vbCrLf & "Quantity: " & Request.Form("quantity") & vbCrLf & "Expected Date of Delivery: " & Request.Form("expecteddate_of_delivery") & vbCrLf & "Application: " & Request.Form("application") & vbCrLf & "Destination: " & Request.Form("destination") & vbCrLf & "Other Specifications: " & Request.Form("otherspecifications") & "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

Circular Saws/Steel Discs

<< Back To Enquiry
* Mandatory Fields  
Type
Dimensions
Outer Diameter
Blank Thickness
Internal Diameter
Kerf
Teeth Profile
Quantity (In Numbers)
Expected Date of Delivery
Application
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