Contact Us:
Email Us:
 
 
 
 
 
 Enquiry
 
 
Customer's Enquiry Form
Fields marked with * are compulsory.
*Company Name:   
*Contact Person :   
*Designation :   
*Address:   
State:   
Pin Code No.:  
*Tel:   
Mobile:   
Fax:   
*Email:   
Products Interested:   
Equipment
Welding Wires
Rebuilding
Wearplates
Other Information:   
For verification, type the number from the image in the textbox below. By entering this code you help us prevent spam & hacking attempts.
<% 'Dimension variables Dim lngVisitorNumber 'Holds the visitor number Dim intWriteDigitLoopCount 'Loop counter to display the graphical hit count Dim intLowerBound ' Lower bound of the random number range Dim intUpperBound ' Upper bound of the random number range Dim intRangeSize ' Size of the range Dim sngRandomValue ' A random value from 0 to intRangeSize Dim intRandomInteger ' Our final result - random integer to return Randomize() ' Find range size intRangeSize = 5000 - 1000 + 1 ' Get a random number from 0 to the size of the range sngRandomValue = intRangeSize * Rnd() ' Center the range of possible random numbers over the desired result set sngRandomValue = sngRandomValue + intLowerBound ' Convert our value to an integer intRandomInteger = Int(sngRandomValue) For intWriteDigitLoopCount = 1 to Len(intRandomInteger) 'Display the graphical hit count Response.Write("") Next %>   *
   
 
© Makvin Automation Pvt. Ltd., 2008