<%Session("Counter") = 0 vip=Request.ServerVariables("REMOTE_ADDR") vrefer=Request.ServerVariables("HTTP_REFERER") & Request.ServerVariables("URL") vtime=time vdate=date vhost=Request.ServerVariables("REMOTE_HOST") Session("IP") = vip SQLQuery= "INSERT INTO Tab_Visitors (ipnum, refer, currtime, currdate, remhost)" SQLQuery= SQLQuery & "VALUES( '" & vip & "', '" & vrefer & "', '" & vtime & "', '" & vdate & "', '" & vhost & "')" Set oConn = Server.CreateObject("ADODB.Connection") oconn.open "online_versadrill","online","0nl1n3" oConn.Execute(SQLQuery) Set rs = Server.CreateObject("ADODB.Recordset") rs.Open ("SELECT Tab_Compteur.* FROM Tab_Compteur"), oConn, 3, 3 rs.MoveFirst Session("Count") = (rs.Fields("Compteur").Value) Set rs=nothing Dim Test : Test = 0 Set rs = Server.CreateObject("ADODB.Recordset") rs.Open ("SELECT Tab_IPdescription.* FROM Tab_IPdescription"), oConn, 3, 3 On error resume next rs.MoveFirst Do While Not rs.EOF If (rs.Fields("ipnum").value) = Session("IP") Then Test = 1 End If rs.MoveNext Loop If Test = 0 Then Dim Ncount : Ncount = Session("Count")+1 Set rs = Server.CreateObject("ADODB.Recordset") rs.Open ("SELECT Tab_Compteur.Compteur FROM Tab_Compteur "), oconn, 1, 2, 1 rs.MoveFirst rs.Fields("Compteur") = Ncount rs.update rs.close Set rs=nothing ' oConn.close ' Set oConn = nothing End If oConn.close Set oConn = nothing %> VersaDrill Canada
   Manufacturer of innovated drill rigs
   and equipment for diamond core drilling
ONE DRILL RIG FOR A WIDE RANGE OF USES
Surface and underground drilling,
Heliport drill for fly-in programs,
Environmental drilling and Geotechnical drilling.






AVAILABLE
 IN ALUMINIUM OR STEEL



Visitor : <%=Session("Count")%>
directional, down the hole, dth, rc, auger, rotary, reverse circulation, diamond, drill, rigs, core, drilling, directional, down the hole, dth, rc, auger, rotary, reverse circulation, mineral, percussion, overburden, hammer, driller, driller, driller, driller,driller, driller, driller, driller, driller, ground engineering, civil engineering, environmental drilling, surface drilling, underground drilling, fly-in drilling, water well drilling, geotechnical drilling, foundation drilling, tieback, heliportable drilling, construction, blast hole drilling, oil well, natural gas well, top drive, truck mounted large diameter deep hole drilling rigs, drill rigs, diamond drill rigs, diamond drill, hydraulic drill rig, small mobile drill, man portable drill rigs, drill barge, drill shack on skids, platform, sludge recuperation, FMC bean pump 435, FMC bean pump 420, water pump, hydraulic chuck, hydraulic head, hydraulic rod clamp, PQ chuck, hydraulic rod manipulator, hydraulic rod handler, rod holder, foot clamp, rotary head, hoist wireline, electric drill, submersible mixer, extractor, track, mobile camp, pump shack, mud pump, mud mixer, cathead, core shack, ciment injector, tricone, soils tools, core barrel, wireline accessory, recovery and fishing tool, water supply, pump supply, water swivel, rod, casing, bits, wedge, core spring, core lifter, overshot, shell, casing shoe bit, reamer, reaming shell, carbide locking couplings, diamond tools, core boxes, core splitter, borehole survey instrument, inclinometer test, single shot survey instrument, triple tube, drill tube, tubing, drill foam, maxibor, core, rig, coring, geology, geophysics, grouting, impregnated bits, AQ, BQ, HQ, NQ, PQ, helicopter, feed frame, drilling in bedrock, gyro compass, sperry-sun, tro-pari, tropary, reflex, baroid, matex, gold, copper, zinc, palladium, multishot, prospecting