% response.status = "301 moved permanently" response.addheader "location", "http://www.polycontrols.com/gas-mixer.php?content=2-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/gas-mixer.php?content=2-1&lang=en-CA" response.end %>
|
|
|
|
|||||||||||||||||||||||||||||||||||||||
|