再提一个关于列表框的新问题。。。多谢各位

hxy2003 2003-10-13 09:24:28
我想用一个列表框与数据库相连,
当改变列表框中的选项时在在列表框的下面有一个表格列出与它相对应的表的内容 

要求是在本页内完成这个动作,不要按提交就行了的那种
...全文
79 10 打赏 收藏 转发到动态 举报
写回复
用AI写文章
10 条回复
切换为时间正序
请发表友善的回复…
发表回复
qhdsnow 2003-10-14
  • 打赏
  • 举报
回复
<SCRIPT language=javascript>
function reloadMC(pSelf)
{
var gr=pSelf.parentElement.children("fMCID");
var bcID = pSelf.options[pSelf.selectedIndex].value;
for(i=gr.length;i>=0;i--)
gr.options[i]=null;
j = 0
for(i=1;i<=MC[0].length;i++)
if (MC[0][i-1]==bcID)
{
var voption=new Option(MC[2][i-1]);//voption为一个Option对象
gr.options[j]=voption;
gr.options[j].value=MC[1][i-1];
j = j + 1;
}
}

var MC=new Array(2);
MC[0]=new Array(395);
MC[1]=new Array(395);
MC[2]=new Array(395);
for(i=1;i<=数据库中数据个数;i++)
MC[0][0]=5;
MC[1][0]=3;
MC[2][0]="1";
</script>


下面是下拉菜单
<SELECT name=fBCID onchange=reloadMC(this)> <OPTION selected
value=5>NH-500</OPTION> <OPTION value=6>NH-900</OPTION> <OPTION
value=7>天津</OPTION> <OPTION value=8>重庆</OPTION> <OPTION
value=9>河北</OPTION> <OPTION value=10>山西</OPTION> <OPTION
value=11>内蒙古</OPTION> <OPTION value=12>辽宁</OPTION> <OPTION
value=13>吉林</OPTION> <OPTION value=14>黑龙江</OPTION> <OPTION
value=15>江苏</OPTION> <OPTION value=16>浙江</OPTION> <OPTION
value=17>安徽</OPTION> <OPTION value=18>福建</OPTION> <OPTION
value=19>江西</OPTION> <OPTION value=20>山东</OPTION> <OPTION
value=21>河南</OPTION> <OPTION value=22>湖北</OPTION> <OPTION
value=23>湖南</OPTION> <OPTION value=24>广东</OPTION> <OPTION
value=25>广西</OPTION> <OPTION value=26>海南</OPTION> <OPTION
value=27>四川</OPTION> <OPTION value=28>贵州</OPTION> <OPTION
value=29>云南</OPTION> <OPTION value=30>陕西</OPTION> <OPTION
value=31>西藏</OPTION> <OPTION value=32>甘肃</OPTION> <OPTION
value=33>青海</OPTION> <OPTION value=34>宁夏</OPTION> <OPTION
value=35>新疆</OPTION></SELECT>省 <SELECT name=fMCID> <OPTION
selected value=3>朝阳</OPTION> <OPTION value=4>海淀</OPTION>
<OPTION value=5>丰台</OPTION> <OPTION value=6>延庆</OPTION>
<OPTION value=7>怀柔</OPTION> <OPTION value=8>通州</OPTION>
<OPTION value=9>大兴</OPTION> <OPTION value=10>密云</OPTION>
<OPTION value=11>顺义</OPTION> <OPTION value=12>平谷</OPTION>
<OPTION value=13>昌平</OPTION> <OPTION value=14>房山</OPTION>
<OPTION value=15>门头沟</OPTION> <OPTION value=16>崇文</OPTION>
<OPTION value=17>宣武</OPTION> <OPTION value=18>东城</OPTION>
<OPTION value=19>西城</OPTION> <OPTION
value=20>石景山</OPTION></SELECT>
Jaron 2003-10-14
  • 打赏
  • 举报
回复
我以前写的部分代码,你自已看着改吧
<script LANGUAGE="javascript">
/*****************************************************************
SiteManagerV4 data autoload scripts
last modified 2002-9-20 written by jaron@jdinfo.net
usage: OnChange="JavaScript:getdata('HuKou','HuKouCity','city')
comment: parameter1: current option , parameter2 destination option
parameter3: SYSTEM DICT pattern
//<iframe width=0 height=0 src="" id="hiddenframe"></iframe>
//if you do like this interface please write to us
*****************************************************************/
function getdata(ObjName,DesName,skind){
document.frames["hiddenframe"].location.replace('loaddata.asp?svalue='+document.forms[0].elements[ObjName].value+'&ObjName='+ObjName+'&DesName='+DesName+'&skind='+skind);
}
</script>
<form>
<iframe width=0 height=0 src="" id="hiddenframe"></iframe>
<select name="Province" OnChange="JavaScript:getdata('Province','City','city');">
....
</select> <select name="City" style="width:100px"></select>
</form>

<SCRIPT LANGUAGE=javascript>
/*****************************************************************
jiangdu.net data autoload scripts
last modified 2002-9-20
written by jaron@jdinfo.net
//if you do like this interface please write to us
*****************************************************************/
<!--
if( self == top ){
location = "/error.asp?id=10003";
}
function GetObjID(ObjName)
{ for (var ObjID=0; ObjID < parent.document.forms[0].elements.length; ObjID++)
if (parent.document.forms[0].elements[ObjID].name == ObjName )
{ return(ObjID);
break;
}
return(-1);
}
function ActiveChangeOption(ObjName,DesName,ActiveData){
ObjID = GetObjID(ObjName);
DesObjID = GetObjID(DesName);
if ( ObjID != -1 && DesObjID != -1 )
{
CatValue = parent.document.forms[0].elements[ObjID].value.substring(0, 2);
if ( CatValue == "0" )
parent.document.forms[0].elements[DesObjID].length=0;
else
{ //PARSING
parent.document.forms[0].elements[DesObjID].length=0;
var tt = ActiveData;
var SubCategory = tt.split(";");
//GENERATE OPTIONS
j=0;
parent.document.forms[0].elements[DesObjID].options[j]= new Option( "---请选择---", "0000");
j=1;
for (var i=0; i< SubCategory.length; i++ )
{
pp = SubCategory[i].split(",");
if ( pp[0].substring(0,2) == CatValue && pp[0].substring(2,4) != "00" ){
parent.document.forms[0].elements[DesObjID].options[j]= new Option( pp[1], pp[0]);
j++;
}//if
}//for
}//if
}//if
}
//-->
</SCRIPT>
<%
svalue=request("svalue")
skind=request("skind")
Set rs_ = Server.CreateObject("ADODB.Recordset")
Query = "Select * From sysdict WHERE (name NOT LIKE '%不限%') AND (kind = '"&skind&"' and left(code,2)='"&left(svalue,2)&"') order by code"
rs_.Open Query,MyConn,1,1
Do While Not rs_.EOF
CityCity=rs_("code")&","&rs_("name")&";"&CityCity
rs_.MoveNext
loop
rs_.Close
Set rs_ = Nothing
Response.Write "<script>"&chr(13)
'response.write "parent.loadremind.innerHTML='<font color=FF0000>正在加载数据,请稍候...</font> <img src=/images/loadgraphic.gif width=94 height=17>';"
Response.write "ActiveChangeOption('"&request("ObjName")&"','"&request("DesName")&"','"&CityCity&"');"&chr(13)
'response.write "parent.loadremind.innerHTML='';"
Response.Write "</script>"
%>
</div>
hxy2003 2003-10-14
  • 打赏
  • 举报
回复
我想要具体点的代码啊。。。
谁有,多谢。。、
hxy2003 2003-10-13
  • 打赏
  • 举报
回复
UP
61 2003-10-13
  • 打赏
  • 举报
回复
用onchange()事件
pp4u 2003-10-13
  • 打赏
  • 举报
回复
那可以在页面里加一个iframe,当改变列表框中的选项时刷新IFRAME
avonqin 2003-10-13
  • 打赏
  • 举报
回复
onchange()就行了呀,楼主还有什么问题吗?
hxy2003 2003-10-13
  • 打赏
  • 举报
回复
gz
shepherdy 2003-10-13
  • 打赏
  • 举报
回复
onchange()事件可以让列表选项在改变时做出反应。
hxy2003 2003-10-13
  • 打赏
  • 举报
回复
gz

28,406

社区成员

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

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