%
response.status = "301 moved permanently"
response.addheader "location", "http://www.polycontrols.com/flow-measurement.php?content=4-1&lang=en-CA"
response.end
%><%
Set conn = Server.CreateObject("ADODB.Connection")
connstring = "DRIVER={Microsoft Access Driver (*.mdb)}; " & "DBQ=" & server.mappath("/db/data.mdb")
conn.open connstring
'response.write(server.mappath("/website2/db/data.mdb"))
sql = "SELECT * FROM News ORDER BY Ordre DESC"
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open sql, conn, 3, 3
%>
<%
response.status = "301 moved permanently"
response.addheader "location", "http://www.polycontrols.com/flow-measurement.php?content=4-1&lang=en-CA"
response.end
%>
Polycontrols - Flow Measurement -
Since 1982 ,
Polycontrols is involved in the engineering, manufacturing and distribution of products in the flow measuring technology sector. Through its flow oriented business units, and its metrology department , Polycontrols is a trusted reference providing exceptional expertise and technical knowledge for many industries involved in flow applications.
<%
response.status = "301 moved permanently"
response.addheader "location", "http://www.polycontrols.com/flow-measurement.php?content=4-1&lang=en-CA"
response.end
%><%
rs.movefirst
for i=0 to rs.recordcount-1%>
<%
response.status = "301 moved permanently"
response.addheader "location", "http://www.polycontrols.com/flow-measurement.php?content=4-1&lang=en-CA"
response.end
%><%=rs("date")%>
<%
response.status = "301 moved permanently"
response.addheader "location", "http://www.polycontrols.com/flow-measurement.php?content=4-1&lang=en-CA"
response.end
%><%=rs("news")%>
<%
response.status = "301 moved permanently"
response.addheader "location", "http://www.polycontrols.com/flow-measurement.php?content=4-1&lang=en-CA"
response.end
%><%
rs.movenext
next
%>
<%
response.status = "301 moved permanently"
response.addheader "location", "http://www.polycontrols.com/flow-measurement.php?content=4-1&lang=en-CA"
response.end
%><%
rs.close
set rs = nothing
conn.close
set close = nothing
%>