Sur la page suivante : http://dadou/quidordine/annuaire/recherche/default.asp, je voudrais faire en sorte, que la listbox Sous Rubrique ne se remplisse que lorque j'ai selectionné la rubrique. Sachant que ces deux listbox sont générées à partir d'une base.
Source :
<form name="form2" method="post" action="">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="100" class="normal"><b>Vous Recherchez : </b></td>
<td>
<input type="text" name="research" size="40">
</td>
</tr>
<tr>
<td><span class="normal"><b>Rubrique : </b></span></td>
<td><span class="normal">
<select name="Id_Rubrique">
<%
While (NOT RecRub.EOF)
%>
<option value="<%=(RecRub.Fields.Item("Id_Rubrique").Value)%>"><%=(RecRub.Fields.Item("Nom_Rubrique").Value)%></option>
<%
RecRub.MoveNext()
Wend
If (RecRub.CursorType > 0) Then
RecRub.MoveFirst
Else
RecRub.Requery
End If
%>
</select>
</span></td>
</tr>
<tr>
<td><span class="normal"><b>Sous-Rubrique : </b></span></td>
<td><span class="normal">
<select name="Id_Sous_Rubrique">
<%
While (NOT RecSousRub.EOF)
%>
<option value="<%=(RecSousRub.Fields.Item("Id_Sous_Rubrique").Value)%>"><%=(RecSousRub.Fields.Item("Nom_Sous_Rubrique").Value)%></option>
<%
RecSousRub.MoveNext()
Wend
If (RecSousRub.CursorType > 0) Then
RecSousRub.MoveFirst
Else
RecSousRub.Requery
End If
%>
</select>
</span></td>
</tr>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="100" valign="top" class="normal"><b>Dans la Zone :</b></td>
<td><img src="../../images/carte/normandie.gif" width="340" height="270"></td>
</tr>
</table>
<p align="center">
<input type="submit" name="Submit" value="Recherche">
</p>
</form>
***************
Dadou
***************