<%@ 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();}%>