<%@ LANGUAGE="JScript" %> <% OBJdbConnection = Server.CreateObject("ADODB.Connection"); CheminBase='DRIVER={Microsoft Access Driver (*.mdb)}; ' + "DBQ=" + Server.MapPath('/') + '/microel/bases/memoireded.mdb'; OBJdbConnection.Open(CheminBase); Trouver=false; Memorise=''; %>

 

   

">
<% tmp = ""; tmp +=Request.Form("Type"); if (tmp!="undefined") { %>

    

">
<%}%>
<% RequeteSQL = "SELECT * FROM OffreMemoire where Type =" + "'" + Request.Form("Type") + "' AND Bus='" + Request.Form("Bus") + "'"; if (!Trouver) RequeteSQL = "SELECT * FROM OffreMemoire where Type =" + "'" + Request.Form("Type") + "' AND Bus='" + Memorise + "'"; RS = OBJdbConnection.Execute(RequeteSQL); %> <%while(!RS.EOF) {%> <%for(toto=3; toto <%if (zipo!="null"){%> <%=RS(toto).Name%> <%=zipo%>
<%}%> <%}%> <% RS.MoveNext();}%>