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