AddSwitch逻辑开关读不到逻辑字段值 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → AddSwitch逻辑开关读不到逻辑字段值

共有4067人关注过本帖树形打印复制链接主题：AddSwitch逻辑开关读不到逻辑字段值

有点蓝

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：超级版主帖子：112738 积分：574041 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2021/3/22 11:37:00 [显示全部帖子]

With .AddSwitch("permit","<img class='icon' src='/images/money.ico' /> 授权", dr("permit"))

.attribute="style='color: red;text-align: left;font-size: 14px;'"

End With

有点蓝

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：超级版主帖子：112738 积分：574041 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2021/3/22 14:26:00 [显示全部帖子]

逻辑列另外单独处理

f dr IsNot Nothing Then

Dim nms() As String = {"nickname","city","subscribe_time"}

For Each nm As String In nms

dr(nm) = e.PostValues(nm)

if e.PostValues.ContainsKey("permit") andalso e.PostValues("permit")="on" Then

dr("permit") = true

else

dr("permit") = false

end if

dr.Save()

主题：AddSwitch逻辑开关读不到逻辑字段值