查看: 4080|回复: 1

[问与答] 复选框问题求助

[复制链接]
随缘 发表于 2015-5-7 17:06:06 | 显示全部楼层 |阅读模式
我用asp做了个动态复选框,表单代码如下:<form name="form1" class="form2" id="form1" action="/form action/hdxx_action.asp">
      <table width="629" border="1" align="left" cellpadding="0" cellspacing="0">
        <tr>
          <td width="108" bgcolor="#FFFFFF"><div align="center">类型</div></td>
          <td width="195" bgcolor="#FFFFFF"><div align="center">活动</div></td>
          <td width="103" bgcolor="#FFFFFF"><div align="center">时间</div></td>
          <td width="60" bgcolor="#FFFFFF"><div align="center">容量</div></td>
          <td width="60" bgcolor="#FFFFFF"><div align="center">已选人数</div></td>
          <td width="46" bgcolor="#FFFFFF"><div align="center">选定</div></td>
        </tr>
        <%
While ((Repeat1__numRows <> 0) AND (NOT Recordset2.EOF))
%>
  <tr>
    <td bgcolor="#FFFFFF"><div align="center"><%=(Recordset2.Fields.Item("type").Value)%></div></td>
    <td bgcolor="#FFFFFF"><div align="center"><%=(Recordset2.Fields.Item("name").Value)%></div></td>
    <td bgcolor="#FFFFFF"><div align="center"><%=(Recordset2.Fields.Item("time").Value)%></div></td>
    <td bgcolor="#FFFFFF"><div align="center"><%=(Recordset2.Fields.Item("num").Value)%></div></td>
    <td bgcolor="#FFFFFF"><div align="center"></div></td>
    <td bgcolor="#FFFFFF"><div align="center">
          <input type="checkbox" name="choose" value="<%=(Recordset2.Fields.Item("id").Value)%>" id="choose" />
    </div></td>
  </tr>
  <%
  Repeat1__index=Repeat1__index+1
  Repeat1__numRows=Repeat1__numRows-1
  Recordset2.MoveNext()
Wend
%>
      </table>
      <input name="vo_id" type="hidden" id="vo_id" value="<%=(Recordset1.Fields.Item("vo_id").Value)%>" />
      <label for="checkbox"></label>
<div align="right"></div>
      <p> </p>
      <div align="center" class="form2">
      <input type="submit" name="tijiao" id="tijiao" value="提交" />
    </div>
    </form>
其中里面的表格包括复选框是重复区域,自动读取数据库内容并插入的,但是我发现这样生成的复选框,在读取时根本读取不了,我试过用代码去读取复选框个数以及被选择的个数和值,都是0或空白的,我用下面的代码是可以读到不是重复区域生成的复选框的,但当换成上述重复区域下的复选框就读取不了,请问大神该怎样解决:
<%
chooses=Request.Form("choose")
if chooses="" then
response.write"<script language=JavaScript>window.alert('对不起,您没有选择任何活动,请选择后再提交!');window.location.href='../vohdxx.asp';</script>"
else
arr = split(chooses,",")
set conn=server.createobject("adodb.connection")
conn.open "Driver={Microsoft Access Driver (*.mdb)};DBQ="&server.MapPath("../database/vouser.mdb")
for i=0 to ubound(arr)
set rs=server.CreateObject("adodb.recordset")
sql = "select * from [vo_activity] where id is null"
rs.open sql,conn,1,3
rs.addNew
rs("activity_id") = arr(i)
rs("vo_id")=request.Form("vo_id")
rs.update
rs.close
set rs = nothing
  next
End if
response.write"<script language=JavaScript>window.alert('成功提交活动选择!');window.location.href='../vohdxx.asp';</script>"
response.end
%>
ttasp 发表于 2015-5-7 21:15:21 | 显示全部楼层
要学习ASP 还是建议手写代码,Dreamweaver不太适合学习编程。

  1. <%If Request.Form("checkbox")<>"" Then        Response.Write("你选择了:" & Request.Form("checkbox"))End If%><form method="post" action=""><input name="checkbox" value="1" type="checkbox">1<input name="checkbox" value="2" type="checkbox">2<input name="checkbox" value="3" type="checkbox">3<input name="checkbox" value="4" type="checkbox">4<input type="submit" value="提交" /></form>
复制代码

参考下基本方法
您需要登录后才可以回帖 登录 | 注册

本版积分规则

快速回复 返回顶部 返回列表

在线客服

售前咨询
售后咨询
服务热线
023-58418553
微信公众号