我们常常会碰到这样一个问题: 如何将在同一页面上的一个<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
Java Asp PHP .Net XML C/C++ CGI VB Jsp J2ee J2se J2me EJB Servlet Tomcat Resin Struts Weblogic Eclipse ANT GUI JMS Web servise IDEA Webphere Hibernate Spring Jboss Applet Swing Socket Javamail Perl Ajax P2P 安全 模式 框架 测试 开源 游戏
Windows XP Windows 2000 Windows 2003 Windows Me Windows 9.x Linux UNIX 注册表 操作系统 服务器 应用服务器