%=(C02.Fields.Item("t_typeid").Value)%>');
  <%howmanygroups=howmanygroups+1%>
  <%
  C02.MoveNext()
Wend
If (C02.CursorType > 0) Then
  C02.MoveFirst
Else
  C02.Requery
End If
%>

document.form2.s3.length = 0;
document.form2.s3.options[0] = new Option('==请选择==','');
}

function changeselect3(sub1,sub2)
{
document.form2.s3.length = 0;
document.form2.s3.options[0] = new Option('==请选择==','');
for (i=0; i<subval.length; i++)
{
if ((subval[i][0] == sub1) & (subval[i][1] == sub2))
{document.form2.s3.options[document.form2.s3.length] = new Option(subval[i][2], subval[i][3]);}
}
}
//-->
</script>

<form name="form2">

三级联动：

<select name="s1" onChange="changeselect2()">
  <option value="">==请选择==</option>
  <%
While (NOT C01.EOF)
%>
  <option value="<%=(C01.Fields.Item("t_typeid").Value)%>"><%=(C01.Fields.Item("t_name").Value)%></option>
  <%
  C01.MoveNext()
Wend
If (C01.CursorType > 0) Then
  C01.MoveFirst
Else
  C01.Requery
End If
%>
</select>

<select name="s2" onChange="changeselect3(document.form2.s1.value,this.value)">
<option>==请选择==</option>
</select>

<select name="s3" onChange="alert(this.value)">
<option>==请选择==</option>
</select>
</form>

<!-- 三级联动 Over -->
</body>
</html>
<%
C01.Close()
Set C01 = Nothing
%>
<%
C02.Close()
Set C02 = Nothing
%>
<%
C03.Close()
Set C03 = Nothing
%>

上一页  [1] [2] [3] 

【发表评论】【打印此文】【关闭窗口】【点击数： 】