<%@ LANGUAGE="JScript" %>
<%
OBJdbConnection = Server.CreateObject("ADODB.Connection");
CheminBase='DRIVER={Microsoft Access Driver (*.mdb)}; ' + "DBQ=" + Server.MapPath('/') + '/microel/bases/memoireded.mdb';
OBJdbConnection.Open(CheminBase);
RequeteSQL = "SELECT DISTINCT Type FROM OffreMemoire";
RS = OBJdbConnection.Execute(RequeteSQL);
%>
Le Catalogue AREA NETWORK
<%RS.Close();%>
<% OBJdbConnection.close(); %>