<% Set Conn = Server.CreateObject("ADODB.Connection") connstring="DRIVER={Microsoft Access Driver (*.mdb)};" _ & " DBQ=" & Server.MapPath("data/admajoris.mdb") Conn.Open connstring SQL="SELECT * FROM news where etatpubli='encours' order by daten DESC" Set rsql = server.createobject("ADODB.Recordset") rsql.Open SQL,Conn , 3, 3 %>
AD majoris
Die Thermoplastindustrie im Blickpunkt
Farben und Spezialrezepturen
<<Accueil
Offres d'emplois
Page en cours…
<%Conn.close : Set Conn=nothing %>
