怎样提交复选框的内容？

[twenth]

从admin.htm提交到login.asp的表单内容
我应该如何获得所有的复选框被选中的值，
我用了比如下面的语句：

<script language="JavaScript" runat="server">
var form1=request.Form
for(var i=0;i<form1.length;i++)
{
if(form1.elements(i).type==checkbox)
{
response.Write(form1.elements(i).value)
}
response.Write(i&" ")
}
</script>

请教是怎么回事？应该怎写？
谢谢？

[angelheavens]

<%
for each x in request.form
y=request.form(x)
response.write x&"="&y&"<br>"
next
%>

[jgjgbb]

楼上说的那样似乎太简单了。这个有一个好办法。首先用INSTR判断是否提交多个instr(chieckbox,",")因为INPUT CHECK传过来的如果是多个值那么是用，分隔的一个数组。取它的上边界做循环操作，我给的例子是做插入的操作啊。这可是我自己写的啊。要给分啊。

首先获得 com_id=request("com_id")//com_id是check的NAME
If instr(com_id,",") > 0 Then //如果证明有多个被选择
arrcom_id = split(com_id,",") //用逗号切分开
For i = 0 to UBound(arrcom_id) //从0到这个数组的上边界做循环
strSql = "insert into cmailbox
(cmid,company,title,mailtext,sendname,sdate)
values(" & arrcom_id(i) & ",'" & company& "','" & title& "','" &
mailtext& "','" & sendname& "','" & date()& "')"
/*以上是插入程序。我为了详细。把自己最近写的都给你贴上了。不给分我可不干：）*/
conn.execute(strSql)
Next
Else//如果只有一个被选中的，就做如下操作。
strSql = "insert into cmailbox (cmid,company,title,mailtext,sendname,sdate)
values(" & com_id & ",'" & company & "','" & title& "','" & mailtext& "','" &
sendname& "','" & date()& "')"
conn.execute(strSql)
End If
rs.close
set rs=nothing

[stefli]

Javascript 有运行服务器版的么？？？
<%
thearr = request("checkboxname")
thearr = left(thearr,len(thearr)-1)
arr = split(thearr,",")
for i= lbound(arr) to ubound(arr)
thevalue = arr(i)
Response.write "这就是数组中的第"&i&"个值:"&thevalue
next
%>