如何在两个多选框中传递数据?详细给分.

wangang2436 2001-07-04 05:35:13

设: 有两下多选框D1、D2，另有四个按钮选b1,b2,b3,b4分别表示->,>>.<-.<<
当按b1时将d1中多个选择项移至d2中........ 样式如下，如何实现?


[dssdsdsdsddsds] [ccddcsdcsd ]
[sdsdsdsdsddssd] -> [ ]
[ccdscsdc ] >> [ ]
[scdsdcsdc ] [ ]
[ ] <- [ ]
[ ] << [ ]
...全文
103 6 打赏 收藏 转发到动态 举报
写回复
用AI写文章
6 条回复
切换为时间正序
请发表友善的回复…
发表回复
gq 2001-07-06
  • 打赏
  • 举报
 回复


专栏：ASP 文章编号：1775 文章类别： 原创 作者： jaklin 加贴时间：2001-1-15 6:17:26

关于如何动态地在同一页面实现两个<select>互传 (s1 <==> s2)

关键词：ASP

关于如何动态地在同一页面实现两个<select>互传 (s1 <==> s2)

（jaklin )


hello! 先祝大家中秋节快乐！

我们常常会碰到这样一个问题： 如何将在同一页面上的一个<select>或<listbox>的值传到另一个<select>或<listbox>中 ？这是一个很烦人的问题。可是有时候你偏偏会遇到。 那什么办呢？

下面是我“烟酒”了一个上午， 现贴上来让大家共享。 用的方法是很笨也挺麻烦。不过总是有点成就感的。呵呵！大家看看， 指点指点.....

<%@ Language=VBScript %>
<HTML>
<HEAD>
<META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
</HEAD>
<script language="vbscript">

</script>
<body bgcolor="#ffffff">
<form name="form1" action="test01.asp" target="_self">
<p><TEXTAREA id=text01 name=text01></TEXTAREA></p>
<table>
<tr>
<td>
<select name="select1" language="javascript" size=5>
<option value=11111>11111</option>
<option value=22222>22222</option>
<option value=33333>33333</option>
</select>
</td>
<td>
<label onClick=do_select()><font color=#ff00dc><u>->> </u></font> </label><br><br>
<label onClick=do_select2()><font color=#ff00dc><u><<- </u></font> </label>
</td>
<%
str="function do_select() {" & vbCrlf & _
"if (document.form1.select1.options.length > 0) {"&vbCrlf&_
"var j=0;"&vbCrlf&_
"for(var i=0;i<document.form1.select1.options.length;i++) {"&vbCrlf & _
"if(document.form1.select1.options(i).selected) {"&vbCrlf& _
"j=j+1; break" & vbCrlf & "}"&vbCrlf & "}"&vbCrlf& _
"if (j > 0) {"&vbCrlf&_ "document.form1.sel2.options[document.form1.sel2.options.length] = new Option(" & _
"document.form1.select1.options[document.form1.select1.selectedIndex].value," & _
"document.form1.select1.options[document.form1.select1.selectedIndex].value);"& vbCrlf
Response.Write "<td><SELECT id=sel2 name=sel2 size=5>"
Response.Write "</select></td>"
str=str&vbCrlf&"document.form1.select1.options[document.form1.select1.selectedIndex]=null;"&vbCrlf & _
"if (document.form1.select1.options.length > 1) {"&vbCrlf '&_
str=str&vbCrlf & "}" & vbCrlf & "}" & vbCrlf& "}" & vbCrlf& "}" & vbCrlf
Response.Write "<SCR"& "IPT LANGUAGE=""JavaScript"">" & vbCrlf
Response.Write str & vbCrlf & "</SCR"&"IPT>"& vbCrlf

%>

<%
str=""
str="function do_select2() {" & vbCrlf & _
"if (document.form1.sel2.options.length > 0) {"&vbCrlf&_
"var j=0;"&vbCrlf&_
"for(var i=0;i<document.form1.sel2.options.length;i++) {"&vbCrlf & _
"if(document.form1.sel2.options(i).selected) {"&vbCrlf& _
"j=j+1; break" & vbCrlf & "}"&vbCrlf & "}"&vbCrlf& _
"if (j > 0) {"&vbCrlf&_
"document.form1.select1.options[document.form1.select1.options.length] = new Option(" & _
"document.form1.sel2.options[document.form1.sel2.selectedIndex].value," & _
"document.form1.sel2.options[document.form1.sel2.selectedIndex].value);"& vbCrlf
str=str&"document.form1.sel2.options[document.form1.sel2.selectedIndex] =null;" & vbCrlf &"}"& vbCrlf &"}"& vbCrlf &"}"
Response.Write "<SCR"& "IPT LANGUAGE=""JavaScript"">" & vbCrlf
Response.Write str & vbCrlf & "</SCR"&"IPT>"& vbCrlf
%>

</tr>
</table>
</form>
</body>
</HTML>

很笨吧， 哈哈！
若那位大虾有更好的方法， 可别忘了给我寄上一份哦。
E_Mail: fz_chenjl@163.net



--------------------------------------------------------------------------------

欢迎阅读China ASP的专栏文章,需要转载请与我们联系

Copyright ? 上海聚声计算机系统工程有限责任公司 1999-2000, All Rights Reserved


gq 2001-07-06
  • 打赏
  • 举报
 回复

<HTML>
<HEAD>
<META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
</HEAD>
<script language="vbscript">

</script>
<body bgcolor="#ffffff">
<form name="form1" action="test01.asp" target="_self">
<p><TEXTAREA id=text01 name=text01></TEXTAREA></p>
<table>
<tr>
<td>
<select name="select1" language="javascript" size=5>
<option value=11111>11111</option>
<option value=22222>22222</option>
<option value=33333>33333</option>
</select>
</td>
<td>
<label onClick=do_select()><font color=#ff00dc><u>->> </u></font> </label><br><br>
<label onClick=do_select2()><font color=#ff00dc><u><<- </u></font> </label>
</td>
<td><SELECT id=sel2 name=sel2 size=5></select></td><SCRIPT LANGUAGE="JavaScript">
function do_select() {
if (document.form1.select1.options.length > 0) {
var j=0;
for(var i=0;i<document.form1.select1.options.length;i++) {
if(document.form1.select1.options(i).selected) {
j=j+1; break
}
}
if (j > 0) {
document.form1.sel2.options[document.form1.sel2.options.length] = new Option(document.form1.select1.options[document.form1.select1.selectedIndex].value,document.form1.select1.options[document.form1.select1.selectedIndex].value);

document.form1.select1.options[document.form1.select1.selectedIndex]=null;
if (document.form1.select1.options.length > 1) {

}
}
}
}

</SCRIPT>
<SCRIPT LANGUAGE="JavaScript">
function do_select2() {
if (document.form1.sel2.options.length > 0) {
var j=0;
for(var i=0;i<document.form1.sel2.options.length;i++) {
if(document.form1.sel2.options(i).selected) {
j=j+1; break
}
}
if (j > 0) {
document.form1.select1.options[document.form1.select1.options.length] = new Option(document.form1.sel2.options[document.form1.sel2.selectedIndex].value,document.form1.sel2.options[document.form1.sel2.selectedIndex].value);
document.form1.sel2.options[document.form1.sel2.selectedIndex] =null;
}
}
}
</SCRIPT>


</tr>
</table>
</form>
</body>
</HTML>
wanwenguo 2001-07-06
  • 打赏
  • 举报
 回复
http://www.csdn.net/expert/topic/181/181513.shtm
wangang2436 2001-07-06
  • 打赏
  • 举报
 回复
提交后，如何从第二个<select>中获取的列表呢？
wangang2436 2001-07-05
  • 打赏
  • 举报
 回复
关注
BrentIvan 2001-07-05
  • 打赏
  • 举报
 回复
<html>
<head>
<title>List</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<script LANGUAGE="javascript">
<!--
var onecount;
onecount=0;

subcat = new Array();
subcat[0] = new Array("徐汇区","01","001");
subcat[1] = new Array("嘉定区","01","002");
subcat[2] = new Array("黄浦区","01","003");
subcat[3] = new Array("南昌市","02","004");
subcat[4] = new Array("九江市","02","005");
subcat[5] = new Array("上饶市","02","006");

onecount=6;

function changelocation(locationid)
{
document.myform.smalllocation.length = 0;

var locationid=locationid;
var i;
document.myform.smalllocation.options[0] = new Option('====所有地区====','');
for (i=0;i < onecount; i++)
{
if (subcat[i][1] == locationid)
{
document.myform.smalllocation.options[document.myform.smalllocation.length] = new Option(subcat[i][0], subcat[i][2]);
}
}

}

//-->
</script>
</head>
<body>
<form name="myform" method="post">
<select name="biglocation" onChange="changelocation(document.myform.biglocation.options[document.myform.biglocation.selectedIndex].value)">
<option value="01" selected>上海</option>
<option value="02">江西</option>
</select>
<select name="smalllocation">
<option selected value="">==所有地区==</option>
</select>
</form>
<script LANGUAGE="javascript">
<!--
changelocation(document.myform.biglocation.options[document.myform.biglocation.selectedIndex].value);
//-->
</script>
</body>
</html>
Python数据分析与挖掘
从海量数据中获得别人看不见的信息，创业者可以通过数据分析来优化产品，营销人员可以通过数据分析改进营销策略，产品经理可以通过数据分析洞察用户习惯，金融从业者可以通过数据分析规避投资风险，程序员可以通过...
html表单设置单选框,html如何实现表单的选择框效果？单选框与多选框的实现（代码实例）...
通过单选框代码和复选框代码实例，实现单选框样式和多选框样式，有一定的参考价值，有需要的朋友可以参考一下，希望对你有所帮助。一、选择框种类与语法html中有两种选择框，即单选框和复选框，两者的区别是单选框中...
在Vue中由后台数据循环生成多选框CheckBox时的注意事项
多选框是一种非常常见的功能,有时候我们会根据后台返回的数据进行多选框渲染,之前做项目时遇到循环生成多选框时,v-model绑定的值会随着选中与取消改变,但页面却不会变化 的情况,后来测试了一下,发现多选框的数据...
【Vue】多选框保留勾选数据
第一阶段:一开始是定义了两个集合用来保存:data的数据, 集合数据动态切换变化的时候直接获取最新的, 但是缺点是不能保存勾选状态.第二阶段:发现只能操作原:data的数据, 所谓的checked再往回赋值根本没用. 缺点是数据...
elementUI中table表格添加一列多选框（vue）
在elementUI中使用多选框checkbox在表格中有两种方法，第一种就像上图中第一列多选框一样，只需在elementUI中table的一列设置一个属性type="selection"即可，如下： <el-table :data="tableData" :current-...
ASP

28,391

社区成员

357,060

社区内容

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

加载中

查看更多榜单
社区公告
暂无公告

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

+ 用AI写文章