Foxtable(狐表)用户栏目专家坐堂 → 单选列表项


  共有2194人关注过本帖树形打印复制链接

主题:单选列表项

帅哥哟,离线,有人找我吗?
yetle
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:858 积分:6381 威望:0 精华:0 注册:2017/2/13 9:04:00
单选列表项  发帖心情 Post By:2019/5/24 11:11:00 [显示全部帖子]

单选列表项是这么定义的
                    With wb.AddRadioGroup("form2","选择","选择消费")
                        .Add("消费早餐","消费早餐")
                        .Add("消费中餐","消费中餐")
                        .Add("消费晚餐","消费晚餐")
                    End With
获取数据是这么写的:
                    Dim hpr = DataTables("报餐").sqlFind("[姓名] = '" & name  & "' And [工号] = '" & gh  & "' and [报餐日期] = '" & Date.Today  & "'")
                    If hpr Is Nothing Then '在这里,再处理你网页提交过来的值
                        Dim dr As DataRow = DataTables("报餐").AddNew() '新增一行,录入各列数据
                        dr("消费早餐") = e.PostValues("消费早餐")
                        dr("消费中餐") = e.PostValues("消费中餐")
                        dr("消费晚餐") = e.PostValues("消费晚餐")
这里e.PostValues来获取是否有选择,可以这么写吗?

 回到顶部
帅哥哟,离线,有人找我吗?
yetle
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:858 积分:6381 威望:0 精华:0 注册:2017/2/13 9:04:00
  发帖心情 Post By:2019/5/26 13:57:00 [显示全部帖子]

是新增的行,可是单选列表项勾选了(明明勾选了消费早餐),可还是没有获取到数据,其他列都有获取到数据。
_Identify _Locked _SortKey 姓名 工号 早餐 中餐 晚餐 报餐日期 报餐时间            消费早餐消费中餐消费晚餐 报餐
29 0 30.00000000000000 小王 10931NULLNULL NULL NULL 2019-05-26 00:00:00.000 NULL NULL NULL       9999

 回到顶部
帅哥哟,离线,有人找我吗?
yetle
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:858 积分:6381 威望:0 精华:0 注册:2017/2/13 9:04:00
  发帖心情 Post By:2019/5/26 21:07:00 [显示全部帖子]

复选列表是:
                            If e.PostValues("消费中餐")="on"
                                hdr("消费中餐") = "on"
                            End If
单选列表不是这么写:
                            If   消费早餐.checked = True
                                hdr("消费早餐") = True
                            End If


 回到顶部