有关于下拉菜单问题,有请高手指教!
产品> 系列 > 型号>我各做一个下拉菜单表。
代码如下:
<body>
<form id="form1" name="form1" method="POST" action="<%=MM_editAction%>">
<table width="750" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="35" align="left" valign="middle">请选择产品品牌:
<select name="cp" id="cp">
<option value=""></option>
<%
While (NOT pl_cp.EOF)
%>
<option value="<%=(pl_cp.Fields.Item("mctl_name_eng").Value)%>"><%=(pl_cp.Fields.Item("mctl_name_eng").Value)%></option>
<%
pl_cp.MoveNext()
Wend
If (pl_cp.CursorType > 0) Then
pl_cp.MoveFirst
Else
pl_cp.Requery
End If
%>
</select></td>
</tr>
<tr>
<td height="35" align="left" valign="middle">请选择品牌系列:
<select name="lx" id="lx">
<option value=""></option>
<%
While (NOT pl_lx.EOF)
%>
<option value="<%=(pl_lx.Fields.Item("ctl_name_eng").Value)%>"><%=(pl_lx.Fields.Item("ctl_name_eng").Value)%></option>
<%
pl_lx.MoveNext()
Wend
If (pl_lx.CursorType > 0) Then
pl_lx.MoveFirst
Else
pl_lx.Requery
End If
%>
</select></td>
</tr>
<tr>
<td height="35" align="left" valign="middle">请选择品牌型号:
<select name="xh" id="xh">
<option value=""></option>
<%
While (NOT pl_hx.EOF)
%>
<option value="<%=(pl_hx.Fields.Item("cpxh_name_eng").Value)%>"><%=(pl_hx.Fields.Item("cpxh_name_eng").Value)%></option>
<%
pl_hx.MoveNext()
Wend
If (pl_hx.CursorType > 0) Then
pl_hx.MoveFirst
Else
pl_hx.Requery
End If
%>
</select></td>
</tr>
</table>
<input type="hidden" name="MM_insert" value="form1">
</form>
</body>
如果我在下拉表选中某产品的就要转向该产品的系列和型号。
单击某菜单就显示该内容的选项