|
#2
yms1232013-02-22 17:50
 程序代码：<HTML> <BODY onload="fun_window()" > <script language="vbscript"> '下拉菜单增加选项 function fun_window() '循环添加10个 for i=0 to 10 Set NewOpt = document.CreateElement("option")'创建一个下拉菜单选项 NewOpt.value=i'选项值 NewOpt.Text="数据"&i'选项文本 select1.Add NewOpt'将选择添加到下拉菜单 next end function '删除选中的下拉菜单选择 function deloption() 'remove删除选项，参数selectedIndex当前选中的是第几项 select1.remove(select1.selectedIndex) select1.selectedIndex=0'设置为0就是设置为当前未选中任何选项 end function </script> <SELECT NAME="select1"> </SELECT> <input type=button value="del" onclick=deloption()> </BODY> </HTML> |
比如说我想实现下拉菜单里面有1到10个数，通过循环输出，使下拉菜单显示10条选项，服务器端脚本我会，但是我不想让代码在服务器端执行，这样会增加服务器端的压力，用客户端脚本如何使现此功能？？想了好久也没弄明白，脚本高手帮忙啊，最好是VB代码！