Foxtable(狐表)用户栏目专家坐堂 → AddCheckGroup传值问题


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

主题:AddCheckGroup传值问题

帅哥,在线噢!
有点蓝
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110662 积分:563224 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/5/9 20:09:00 [显示全部帖子]

没有问题。怎么接收数据的?

增加复选列表项的语法是:

Add(ID, Text)
Add(ID, Text, Checked)

 ID  列表项ID。
 Text  复选列表项的文本内容。
 Checked  逻辑型,可选参数,复选列表项默认是否勾选。


复选列表项的属性有:

 Value  字符型,勾选后传递给服务端的值,如果不设置,将传递ID值给服务端。
 Enabld  逻辑型,设置为False,将无法勾选此列表项。

 回到顶部
帅哥,在线噢!
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110662 积分:563224 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/5/9 20:41:00 [显示全部帖子]

values(index)一样是字符串来的。我测试没有问题。

自己调试一下前端和接收的数据。不会调试就上传实例

 回到顶部
帅哥,在线噢!
有点蓝
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110662 积分:563224 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/5/9 20:58:00 [显示全部帖子]

没看到有接收这些数据的代码。还是那句话,不会调试就上传实例

For Each key As String In e.PostValues.Keys
    MsgBox(key)
Next 

 回到顶部
帅哥,在线噢!
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110662 积分:563224 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/5/9 22:33:00 [显示全部帖子]


        If values.length > 0 Then
            For Index As Integer = 0 To values.Length - 1
                cdg.add("登轮人员" & CStr(Index),values(index)).value = values(index)

            Next
        End If

接收
dim s as string
For Each key As String In e.PostValues.Keys
    if key like "登轮人员*" then s = s & "," & e.PostValues(key)
Next 
msgbox(s)


 回到顶部
帅哥,在线噢!
有点蓝
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110662 积分:563224 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/5/9 23:02:00 [显示全部帖子]

If values.length > 0 Then
            For Index As Integer = 0 To values.Length - 1
if dr("登轮人员") like "*" & values(index) & "*"
                cdg.add("登轮人员" & CStr(Index),values(index),true).value = values(index)
else
cdg.add("登轮人员" & CStr(Index),values(index)).value = values(index)
end if
            Next
        End If

 回到顶部