在线纠错，急！。。。。

[skywave2008]

以下是我做的select下拉菜单联动（只有二级联动），有问题！！！！
希望大虾MMDD指导！在线。。。

<%
Response.Write("<script language='javascript'>")
Response.Write("var onecount;")
Response.Write("onecount=0;")
Response.Write("subcat = new Array();")
sql="select S_bigtype.Btypename as Btypename,S_smalltype.Stypename as Stypename from S_bigtype,S_smalltype"
set rs2=server.CreateObject("ADODB.RecordSet")
rs2.open sql,conn,1,1
if not rs2.eof and not rs2.bof then
for i=0 to rs2.recordcount
Response.Write("subcate["&i&"]=new Array('"&rs2("Stypename")&"','"&rs2("Btypename")&"','"&rs2("Stypename")&"');")
next
Response.Write("onecount="&rs2.recordset&"; ")
end if
rs2.close
Response.Write("</script>")
%>
<script LANGUAGE="javascript">
<!--

function skywave02(locationid)
{
document.PubBar.Stypename.length = 0;

var locationid=locationid;
var i;
document.PubBar.Stypename.options[0] = new Option('==子类==','');
for (i=0;i < onecount; i++)
{
if (subcat[i][1] == locationid)
{
document.PubBar.Stypename.options[document.PubBar.Stypename.length] = new Option(subcat[i][0], subcat[i][2]);
}
}

}

//-->
</script>

<form action="" method="post" name="PubBar" id="PubBar">
select name="Btypename" id="Btypename" onChange="skywave02(document.PubBar.Btypename.options[document.PubBar.Btypename.selectedIndex].value)">
<option value="0" selected>==大类==</option>
<%
sql="select * from S_bigtype"
rs.open sql,conn,1,1
if not rs.eof then
do while not rs.eof
%>
<option value="<%=rs("id")%>"><%=rs("Btypename")%></option>
<%
rs.movenext
loop
end if
rs.close
%>
</select>
<select name="Stypename" id="Stypename">
<option value="0" selected>==子类==</option>
</select>
</form>

[skywave2008]

运行之后，白版，什么也没有，没有报错信息！

[skywave2008]

好像缺少什么对象。
并且感觉<%%>和<script></script>联系不上，

指教

[loveme2000ok]

你再急也没有用呀，
你应该把你的运行情误情况说一下呀，
要不然，别人怎么知道哪里出问题了
QQ：22168264