asp多选的值写入数据库

[wm_gj]

asp页面的多选按钮，（复选框）
复选框的选定值是从数据库中读出来的值，
<input name="fenguan" type="checkbox" id="fenguan" value="<%=rs3("group_name")%>">
我现在要通过循环去判断哪些被选定，然后将值写入数据库
这里有点问题就是，因为是多选，所以不是说所选的值都写进一条记录的字段中
而是要一个选中的值，就添加一条记录，有两个选中，就添加两条记录，以此类推

if request("user_add")="add" then
fenguan=request.Form("fenguan")
for i=0 to ubound(fenguan)
conn.execute("insert into work (fenguan)values('"&fenguan&"')")
next

想过这样去做，但是这样会把多选的值写到一条记录中，请教该怎么写这个循环？

[Atai-Lu]

你直接判断fenguan是否为空即可

获取的值是以,号隔开的字符串，并非数组

要转换成数组的话，还需要split函数

[wm_gj]

我的意思很明确啊，不能将多选的值写到一条记录里，要一个值一条记录的这样做
以,号分割的字符串集不行

[Atai-Lu]

我也说得很明白，你获取的是一个以逗号分割的字符串，并非数组
要转换成数组，还得用split函数

[Atai-Lu]

fenguan=request.Form("fenguan")'fenguan是一个以逗号分割的字符串，并非数组
for i=0 to ubound(fenguan) '你这里把fenguan当做一个数组来操作，不报错是怪事
'要想让获取的值变成数组，你还需要用split转换。恩，就这样吧，闪人。

[tank_pp]

if request("user_add")="add" then 
fenguan=request.Form("fenguan")
aa=split(request("fenguan")&",",",")
for i=0 to ubound(aa) 
conn.execute("insert into work (fenguan)values('"&aa(i)&"')") 
next 

[tank_pp]

if request("user_add")="add" then 
fenguan=request.Form("fenguan")
aa=split(request("fenguan")&",",",")
for i=0 to ubound(aa) 
conn.execute("insert into work (fenguan)values('"&aa(i)&"')") 
next 

[dreat]

搞定了，可是我修改的页面怎么搞呢？？？？
怎么读循环去获取多选按钮的状态是否checked

[wm_gj]

搞定了，可是我修改的页面怎么搞呢？？？？
怎么读循环去获取多选按钮的状态哪些是checked呢

[aquayhy]

[Quote=引用 8 楼 wm_gj 的回复:]
搞定了，可是我修改的页面怎么搞呢？？？？
怎么读循环去获取多选按钮的状态哪些是checked呢
[/Quote]
貌似你还不理解复选框的工作方式，你可以把一堆复选框取一样的名字
<%
set rs=server.createobject("adodb.recordset")
sql1="select * from 存储选择项的数据表"
rs.open sql1,conn,1,3
do while not rs.eof %>
<input type="checkbox" name="选择结果" value="<%=rs("项目")%>">
<%=rs("项目")%><br>
<% rs.movenext
loop
rs.close
%>
在接受的asp里面用
a=request("选择结果")
a就会保存形如
"选择项1, 选择项2, 选择项3"
这种东西

[aquayhy]

[Quote=引用 8 楼 wm_gj 的回复:]
搞定了，可是我修改的页面怎么搞呢？？？？
怎么读循环去获取多选按钮的状态哪些是checked呢
[/Quote]
不好意思，我上面的回复理解有误。
<input name="fenguan" type="checkbox" id="fenguan" value=" <%=rs3("group_name")%>"
<%
set rs=server.createobject("adodb.recordset")
sql1="select * from fenguan where fenguan='"&rs3("group_name")&"'"
rs.open sql1,conn,1,3
if not rs.eof then
response.write " checked"
end if
%>
>