网上的联动代码是不是有问题啊,我的怎么调不通

alertor 2006-09-08 08:44:35
<script language=javascript>
<%
dim sql_getjx_project
sql_getjx_project = "select * from jx_project"
set rs_getjx_project = server.createobject("adodb.recordset")
rs_getjx_project.open sql_getjx_project,conn,1,1
%>
var temp,temp_2;
temp=0;
related =new array();
<%
temp_2=0
while not rs_getjx_project.eof
%>
related[<%=temp_2%>] =new array("<%=rs_getjx_project("id")%>","<%=rs_getjx_project("projname")%>","<%=rs_getjx_project("projclass")%>");
<%
temp_2 = temp_2 + 1
rs_getjx_project.movenext
wend
%>
temp = <%=temp_2%>;
function ChangeLocation(id)
{
var id = id;
document.form1.jx_project.length=0;
var i = 0;
document.form1.jx_project.options[0]=new option('-------','');
for(i=0;i< temp;i++)
{
if(related[i][2]==id)
{
document.form1.jx_project.options[document.form1.jx_project.length] = new option(related[i][1], related[i][0]);
}
}
}
</script>

-------------
<%
dim sql2,sql3
sql2 = "select * from jx_class"
sql3 = "select * from jx_project"
set rs2=server.CreateObject("adodb.recordset")
rs2.Open sql2,conn,1,1
set rs3=server.CreateObject("adodb.recordset")
rs3.Open sql3,conn,1,1
%>
<form name=form1 style="margin:0;" method="post">
<select name=jx_class onchange="ChangeLocation(form1.jx_class.options[form1.jx_class.selectedIndex].value);">
<%
if rs2.RecordCount<0 then
response.write "<option value=''>无相关类</option>"
else
while not rs2.eof
response.write "<option value="&rs2("id")&">" &rs2("classname")&"</option>"
rs2.movenext
wend
end if
%>
</select>
<select name=jx_project>
</select>
</form>
</td>
</tr>
</table>
<%
rs2.close
set rs2 = nothing
%>
<%
rs3.close
set rs3 = nothing
%>
...全文
111 3 打赏 收藏 举报
写回复
用AI写文章
3 条回复
切换为时间正序
请发表友善的回复…
发表回复
hongzi001179 2006-09-08
  • 打赏
  • 举报
回复
学习
zy51 2006-09-08
  • 打赏
  • 举报
回复
去找一份无错的下载就是了啊,到处都有,一个不行,换一个就是了啊。
yowbell 2006-09-08
  • 打赏
  • 举报
回复
作个记号,帮顶!

28,402

社区成员

发帖
与我相关
我的任务
社区描述
ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
社区管理员
  • ASP
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧