<script language="JavaScript">
<!--
var subcat = new Array();
<%
sql="select * from [class]"
set obj=conn.execute(sql)
i=0
do while not obj.eof
%>
subcat[<%=i%>]=new Array("<%=trim(obj("class_1_ID"))%>","<%=trim(obj("class_2_name"))%>");
<%
i=i+1
obj.movenext
loop
obj.close
set obj=nothing
%>
function changeselect1(class2id)
{
document.form1.class2.length = 0;
document.form1.class2.options[0] = new Option('==请选择小类==','');
for (i=0; i<subcat.length; i++)
{
if (subcat[i][0] == class2id)
{document.form1.class2.options[document.form1.class2.length] = new Option(subcat[i][1], subcat[i][2]);}
}
}
//-->
</script>
<%
dim class2
class2=request("class2")
%>
<FORM METHOD="POST" name="form1" ENCTYPE="multipart/form-data" ACTION="ado_upload.asp?c=<%=class2%>">
大类:
<select name="class1" onChange="changeselect1(this.value)">
<option value="" selected>===请选择大类===</option>
<%
sql2="select distinct class_1_ID,class_1_name from [class]"
set obj2=conn.execute(sql2)
j=0
do while not obj2.eof
%>
<option value="<%=trim(obj2("class_1_ID"))%>"><%=trim(obj2("class_1_name"))%></option>
<%
obj2.movenext
loop
obj2.close
set obj2=nothing
%>
</select>
小类:
<select name="class2" >
<option>==请选择小类==</option>
</select>
简单描述:<BR><TEXTAREA NAME="detail"></TEXTAREA><BR>
<input onClick="return check()"; name="Submit" value=" OK ">
</FORM>