
asp中request.Form复选框数值;然后把数值分开赋值。
request.Form("Checkbox")'接收复选框数据Response.Write(request.Form("Checkbox"))'比如复选框输出01,02...
request.Form("Checkbox")'接收复选框数据
Response.Write(request.Form("Checkbox"))'比如复选框输出01,02,04,06
我想把输出的结果 01,02,04,06 用数组自动分开赋值。
比如for i = 0 to 3
a(数组i)=request.Form("Checkbox")
next
自动赋值结果为
a0=01
a1=02
a2=04
a3=06
....输出更多自动以数组生成更多。 展开
Response.Write(request.Form("Checkbox"))'比如复选框输出01,02,04,06
我想把输出的结果 01,02,04,06 用数组自动分开赋值。
比如for i = 0 to 3
a(数组i)=request.Form("Checkbox")
next
自动赋值结果为
a0=01
a1=02
a2=04
a3=06
....输出更多自动以数组生成更多。 展开
3个回答
展开全部
request.Form("Checkbox")
接受到的是一串用,隔开的字符串,可以用Split函数来做到数组里。
Dim arr() '定义数组
arr=split(request.Form("Checkbox"),",")
这样arr(0)里面就是01,arr(1)里就是02。。。。。
接受到的是一串用,隔开的字符串,可以用Split函数来做到数组里。
Dim arr() '定义数组
arr=split(request.Form("Checkbox"),",")
这样arr(0)里面就是01,arr(1)里就是02。。。。。
展开全部
发现不定义数组长度会出现下标越界
修改了一下测试可以
dim c,a()
c=request.Form("checkbox1").count
redim a(c)
for i=1 to c
a(i)=request.Form("checkbox1")(i)
response.Write a(i)&"<br>"
next
修改了一下测试可以
dim c,a()
c=request.Form("checkbox1").count
redim a(c)
for i=1 to c
a(i)=request.Form("checkbox1")(i)
response.Write a(i)&"<br>"
next
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
这样写最简单
chkArr=split(request.Form("Checkbox"),",")
for i=0 to ubound(chkArr)
response.Write chkArr(i)
next
chkArr=split(request.Form("Checkbox"),",")
for i=0 to ubound(chkArr)
response.Write chkArr(i)
next
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询