Vbscript：复选框中选中的值怎样赋值给一个变量？

来源：百度知道 编辑：UC知道 时间：2024/05/21 17:19:17
下面为表单Html代码！
<p>你的爱好：
<input type="checkbox" name="enjoys" value="上网">
上网
<input type="checkbox" name="enjoys" value="音乐">
音乐
<input type="checkbox" name="enjoys" value=" 运动">
运动
<input type="checkbox" name="enjoys" value="看书">
看书</p>
<p>        其它
<input name="others" type="text" id="others">
</p>
<p>你的意见：<span class="STYLE38">*</span><br>
下面为ASP页面中Vbscript代码！
<%
dim i,others,aihao,a
for i=1 to request.form("enjoys").count'遍历每一个被选中的复选框
a=request.Form("enjoys")(i) & "," '将选中复选框的值赋值给变量a
next
others=re

你的想法有问题。
解决方案：
Dim i ,others,aihao,a,arr

a=request.Form("enjoys")'所有的值存进a变量
arr=split(a,",")'把所有的值转为数组arr
for i=0 to ubound(arr)
response.write(arr(i))'输出所有复选框的值
next